Re: Greek PHP mailing list

> kyk():Prgm:Local a,b,c: 13->a: "|------------+------------|"->b:ClrIO:Output > 0,-1,left(b,a)&"¥"&right(b,a):While abs(13-a)<13:getKey()->c:If > abs(50-c)=1 > Then:a+c-50->a:Output > 0,-1,left(b,a)&"¥"&right(b,26-a):EndIf:EndWhile:EndPrgm > > Play with the 1 and 3 keys. Guess what it does by just looking at the code, > and win a free donut (should arrive within 6-8 weeks, and shouldn't be too > stale by then). 1 and 3 have character codes 49 and 51, respectively, if you > want to take this on... Talking about OT! Is this a so-called kiloliner? From the times when a home computer had 1k, 16k or 64k? I say it is a game where you steer a Yen-sign along the line with the 1 and 3. If you go too far left or right you end the program (while). |-----------¥-+------------| 3 |------------¥+------------| 3 |-----------¥-+------------| 1 |------------¥+------------| 3 |------------+¥------------| 3 |------------+-¥-----------| 3 ... |------------+----------¥--| 3 |------------+-----------¥-| 3 |------------+------------¥| 3 end I'm not familiar with these toys, i'm a biologist. So i can't tell what the 0,-1 in the output does. It may be the location of the output, so it is just a one line you see, with a moving Y. It can also mean it scrolls, then the suggestion of a road is made and you seem to move along the road. It is not too exciting though as the only way to move is to press a button. The + sign does not mean anything but the middle line of the road (if it is a road) and as you see, i guess it skips one place when you cross it. Satisfied? Chris -------------------------------------------------------------------- -- C.Hayes Droevendaal 35 6708 PB Wageningen the Netherlands -- --------------------------------------------------------------------