ZXTape! 0Created with Ramsoft MakeTZXbounce oO) Logic 3 Bouncing ball 0:7:0: "a",00000011,00001111,00011111,00111111?,01111111,11101111,11101111,11101111 "b",11000000,11110000,11111000,11111100,11111110,10000111,11101111,11101111 ("c",11101111,11101111,01101111o,01100001a,00111111?,00011111,00001111,00000011 2"d",11011111,11100111,11110110,10001110,11111100,11111000,11110000,11000000 dn=14 nq$ xj=07 r q$+j,r j n  " " x=0 y=0 dx=1 dy=1 xo=x yo=y x=x+dx y=y+dy .x=30dx=-1:0.03{u\,11 "+x=0dx=1:0.03{u\,7 ,.y=19dy=-1:0.03{u\,14 6,y=0dy=1:0.03{u\,17 @yo,xo;" ":Rub out old ball Jyo+1,xo;" " T y,x;"" ^y+1,x;"" hg=05:g r 240 dxrQdxy  hdhouse fh! )h The Wee Hoose 0:0:7: "a",00000001,00000011,00000111,00001111,00011111,00111111?,01111111,01111111 "b",10000000,11000000,11100000,11110000,11111000,11111100,11111110,11111111 ("c",00011000,00011000,00011000,11111111,11111111,00011000,00011000,00011000 2j=02 <q$ Fk=07 Pr Z q$+k,r dk nj xvblack=0:blue=1:red=2:purple=3:green=4:cyan=5:yellow=6:white=7 black blue:green :paint sky "j=12 21:paint grass /j,0;"" j red:paint walls j=1811 -1 'j,4;"" j black:paint roof j=10 5-1 j,13 -j;""; "k=14-j17+j:"";:k "" j " Chimney ,red 64,10 ;"" @3,10 ;"" J2,10 ;"" Twhite ^1,10 ;"O o O" h0,10 ;"o o" r Windows |green:white k=6215 j=12 15  j,k;"" j k Door black j=13 18 j,24;" " j yellow:Dorrknob 16,26;"o" 510:loop stop rQclaclueurplreeyaellohitreaction .c%&0 Reaction time &0:0:0:7: "Reaction Time Program" ( 2 "Press any key as soon as you" 0.1}L500 8te=1:tx=(32 *):ty=(2+16*) ex=t+(10 +40(*)  ty,tx;""; Check if target life up ext550&  ty,tx;" "; &ty=-1:tx=-1:te=0 & t=t+1 0 170 Xbullet hits top of screen b b=0 l n=n-1 v0.2~L,3 n>0170  '4,4;"FINAL SCORE WAS ";s g=11000:g  10  Direct hit  1 0.05|L,27  ty,tx;""  s=s+ex-t g=1100d:g  0  b=0  520 tsn b+ xgcd C Great Circle Distance 0:7:0:  ($"This program gives you the Great" 2#"Circle distance between any two" <"places on the earth. " F"You will be asked for the " P""latitude and longitude of each" Z "place in degrees. Use minus " d"values for places SOUTH of" n!"the Equator or EAST of Green-" x#"wich. For example, the position" "of GENEVA (45 degrees 12' N," #"6 degrees 7' E ) would be given" $"as : 45.2, -6.11667 and SYDNEY" $"would be (roughly) at -32, -141." (r=3980:Mean radius of the Earth "Name of first place ?";a$ -"lat. and long. of first place ? ";la1,lo1 "Name of second place ?";b$ -"lat. and long. of second place ? ";la2,lo2 Dd=((lo1-lo2)*/180) :d=difference of longitudes in radians 4la1=la1*/180 :convert latitudes to radians la2=la2*/180 'a=((la1)*(la2)+(la1)*(la2)*(d))  "The Great Circle distance" "between ";a$ ""and ";b$ , 6( "is ";(a*r+0.5);" miles." @ J""Hit any key to run the program" T "again." ^x$= h x$=""350^ rx$= |x$""370r  20 rAaa{5oBsa{5odaq5X 7