Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- :ClrHome
- :5->A:5->B:1->W
- :While W
- :Output(A,B,"^
- :getKey->K
- :If K=24 or K=25 or K=26 or K=34
- :Then
- :A-(K=25)(A>1)+(K=34)(A<8->A
- :B-(K=24)(B>1)+(K=26)(B<16->B
- :Output(A,B,"(space)
- :End
- :End
Add Comment
Please, Sign In to add comment