12.07.2015 Views

page-1983-101-timex-sinclair-programming-tricks

page-1983-101-timex-sinclair-programming-tricks

page-1983-101-timex-sinclair-programming-tricks

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Program Listing10 LET X=INT(30*RND)20 LET Y=INT(20*RND)30 LET C=INT(256*RND)40 PRINT AT Y,X;CHR$ C50 GOTO 1092 Flashing DotWant a blinking dot in the upper left-hand corner ofthe screen? You've got it!This program clears the screen and causes that dotto blink. Timing loops in lines 20 and 40 control the lengthof time the dot is on and off.See ASCII number list for other characters to displayas a dot. We use 128.Program Listing10 CLS20 PAUSE 2030 PRINT AT O,O;CHR$ 12840 PAUSE 4050 GOTO 1093 SnowfallWhite flakes sprinkle down the screen, over andover-until you press the BREAK key. It may be uselessbut it's a lot of fun to watch!Program Listing100 FOR X=S TO 63110 FOR Y=lO TO 43120 PLOT X,Y130 NEXT Y110

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!