Discussion
TheExcession said:
Hoofy said:
Bungleaio said:
I can't even display that on my laptop monitor in full size! It will take some serious time to get it anywhere near complete.
CTRL + "-"!Dim FlipFlop As Boolean, StopTime As Date, FlipFlopTime As Date
FlipFlop = False
Application.Wait Now + TimeValue("00:00:05")
StopTime = Now + TimeValue("00:10:30")
Do Until Now > StopTime
FlipFlop = Not FlipFlop
FlipFlopTime = Now + TimeValue("00:00:10")
Do Until Now > FlipFlopTime
If FlipFlop Then
Application.SendKeys "{LEFT}"
Application.Wait Now + TimeValue("00:00:01")
Application.SendKeys "{DOWN}"
Application.Wait Now + TimeValue("00:00:01")
Else
Application.SendKeys "{RIGHT}"
Application.Wait Now + TimeValue("00:00:01")
Application.SendKeys "{DOWN}"
Application.Wait Now + TimeValue("00:00:01")
End If
Loop
Loop
AppActivate "Microsoft Excel"
MsgBox "Done!"
End Sub
Well this is just weird. 2048 meets Flappy Bird http://www.kotaku.co.uk/2014/04/23/just-flappy-48-...
Hoofy said:
kestonian said:
19920? YOU !I give up. I was almost getting 20100 to beat the last new lowest score but 19920 I can't see me getting without changing the way I'm doing things.
Finally got 4096 tile with a score of 44256 and my best score for 2048 tiles is 20116. TBH i thought there would be more some message for reaching 4096. has anyone worked out what the max score you can achieve is.
I will include pics when i get home.... This has been my time waster at work and i can't upload pics from my work's computer.
I will include pics when i get home.... This has been my time waster at work and i can't upload pics from my work's computer.
Hoofy said:
kestonian said:
19920? YOU !I give up. I was almost getting 20100 to beat the last new lowest score but 19920 I can't see me getting without changing the way I'm doing things.
bks to it now.
Gassing Station | Video Games | Top of Page | What's New | My Stuff