For those of you who love type-in programs I share an oneliner MSX Basic game that I wrote in 1991; and two derived versions, which I tried to fit in the 140 character limit of a tweet.
This is the oneliner that I wrote in 1991 for publication in MSX Computer Magazine:
1screen1:keyoff:input"1-32";b:width32:fori=0to0step0:s=s+1:ifvpeek(6144+x)=42thenscreen0:print"score:"selsevpoke6144+x,2:locaternd(1)*b,23:print"*":a=stick(0):ifa=7thenx=x-1-(x<1):nextelseifa=3thenx=x+1+(x>b-2):nextelsenext
Below are the two tweetable versions:
- An oneliner with a length of 119 characters and a hyperlink that consumes the remaining 21 characters of the tweet:
1screen1:width32:fori=9to9:locaternd(1)*32,23:?"*":x=x+(i=8)-(i=4)and31or6144:ifvpeek(x)=32thenvpokex,2:i=stick(0):next
You can find a tweet of this version, including a screenshot over here: twitter.com/#!/blaset/status/122598805081305088 .
- A slightly more polished version that uses all the available 140 characters:
1screen1:width32:x=16:fori=9to9:locaternd(1)*32,23:?"*":x=x+(i=8)-(i=4)and31or6144:ifvpeek(x)=32thenvpokex,2:s=s+1:i=stick(0):nextelsecls:?s
Please, don't take this too seriously: it is just for fun. Enjoy! :-)
Login or register to post comments
