beep it! < to beep it!" _21,12 ;1;0;7;"y" c32,5;0;"press < > for credits" d22,12 ;1;0;7;"r" h="r"2300 m="y"372t r 360h t u 800  va$= w p=0 xl=15 { 390 | p=0 } 390 ~ p=12  390  p=24 ="1"320@ ="R"1800 ="p"440 ="z"550& ="s"5600 ="x"570: ="d"580D ="c"590N ="v"600X ="g"610b ="b"620l ="h"630v ="n"640 ="j"650 ="m"660 ="q"670 ="2"680 ="w"690 ="3"700 ="e"710 ="r"720 ="5"730 ="t"740 ="6"750 ="y"760 ="7"770 ="u"780  ="i"790 ="0"1280 ="l"437 ="P"1900l  390 ="l"437 l  376x ="p"440 p=0382~ p=12 384 p=24380| &0.01z# =*l,0+p '="z"550& + 390 00.01z# =*l,1+p 1="s"5600 5 390 :0.01z# =*l,2+p ;="x"570: ? 390 D0.01z# =*l,3+p E="d"580D I 390 N0.01z# =*l,4+p O="c"590N S 390 X0.01z# =*l,5+p Y="v"600X ] 390 b0.01z# =*l,6+p c="g"610b g 390 l0.01z# =*l,7+p m="b"620l q 390 v0.01z# =*l,8+p w="h"630v { 390 0.01z# =*l,9 +p ="n"640  390 0.01z# =*l,10 +p ="j"650  390 0.01z# =*l,11 +p ="m"660  390 0.01z# =*l,12 +p ="q"670  390 0.01z# =*l,13 +p ="2"680  390 0.01z# =*l,14+p ="w"690  390 0.01z# =*l,15+p ="3"700  390 0.01z# =*l,16+p ="e"710  390 0.01z# =*l,17+p ="r"720  390 0.01z# =*l,18+p ="5"730  390 0.01z# =*l,19+p ="t"740  390 0.01z# =*l,20+p ="6"750  390 0.01z# =*l,21+p ="y"760  390 0.01z# =*l,22+p ="7"770  390  0.01z# =*l,23+p  ="u"780   390 0.01z# =*l,24+p ="i"790  390  10 ,80P *150,0 +10 ,30 ,150,0 4y=015010 >10 +y,80P H0,-502 Ry \y=04 f18+y,80P p0,-30 zy y=04 28+y,80P 0,-30 y y=04 480+y,80P 0,-30 y y=04 58:+y,80P 0,-30 y y=04 68D+y,80P 0,-30 y $y=04 .88X+y,80P 80,-30 By Ly=04 V98b+y,80P `0,-30 jy ty=04 ~118v+y,80P 0,-30 y y=04 128+y,80P 0,-30 y y=04 138+y,80P 0,-30 y 15,22;"beep it!" (2,2;0;7;"9" 2,4;"Repeat" (4,2;0;7;"0" 4,4;"Single" .6,2;0;7;"shift+R" 6,10 ;"Random" (8,2;0;7;"P" 8,4;"Octave" )8,12 ;0;7;"L" 8,14;"Length"  374v  m=0 n=15  1300  m=0  1300  m=12  1300  m=24 ="z"1400x ="s"1410 ="x"1420 ="d"1430 ="c"1440 ="v"1450 ="g"1460 ="b"1470 ="h"1480 ="n"1490 ="j"1500 ="m"1510  ="q"1520 !="2"1530 "="w"1540 #="3"1550 $="e"1560 %="r"1570" &="5"1580, '="t"15906 (="6"1600@ )="y"1610J *="7"1620T +="u"1630^ ,="i"1640h -="9"375w .="l"1360P /="p"1370Z 0="1"320@ 1="R"1800 2="P"1900l F 1300 P="l"1360P Qn R 1281 Z="p"1370Z [m=01285 \m=12 1287 ]m=241283 x0.01z# =*n,0+m }="z"1405} ~ 1300 0.01z# =*n,1+m ="s"1415  1300 0.01z# =*n,2+m ="x"1425  1300 0.01z# =*n,3+m ="d"1435  1300 0.01z# =*n,4+m ="c"1445  1300 0.01z# =*n,5+m ="v"1455  1300 0.01z# =*n,6+m ="g"1465  1300 0.01z# =*n,7+m ="b"1475  1300 0.01z# =*n,8+m ="h"1485  1300 0.01z# =*n,9 +m ="n"1495  1300 0.01z# =*n,10 +m ="j"1505  1300 0.01z# =*n,11 +m ="m"1515  1300 0.01z# =*n,12 +m ="q"1525  1300 0.01z# =*n,13 +m ="2"1535  1300 0.01z# =*n,14+m  ="w"1545   1300 0.01z# =*n,15+m ="3"1555  1300 0.01z# =*n,16+m ="e"1565  1300 "0.01z# =*n,17+m '="r"1575' ( 1300 ,0.01z# =*n,18+m 1="5"15851 2 1300 60.01z# =*n,19+m ;="t"1595; < 1300 @0.01z# =*n,20+m E="6"1605E F 1300 J0.01z# =*n,21+m O="y"1615O P 1300 T0.01z# =*n,22+m Y="7"1625Y Z 1300 ^0.01z# =*n,23+m c="u"1635c d 1300 h0.01z# =*n,24+m m="i"1645m n 1300 =12 ,1;0;" " "13 ,11 ;0;" " !13 ,14;0;" " #13 ,16;0;" " !13 ,20;0;" " !11 ,11 ;0;" " #11 ,13 ;0;" " !11 ,17;0;" " "11 ,19;0;" " !14,12 ;0;" " !14,14;0;" " !14,16;0;" " !14,18;0;" " !14,20;0;" " !10 ,11 ;0;" " !10 ,13 ;0;" " !10 ,15;0;" " !10 ,17;0;" " !10 ,20;0;" " !15,12 ;0;" " !15,16;0;" " !15,20;0;" "  9 ,11 ;0;" "  9 ,13 ;0;" "  9 ,15;0;" "  9 ,17;0;" "  9 ,20;0;" " !16,12 ;0;" " !16,16;0;" "  8,13 ;0;" "  8,17;0;" "  8,20;0;" "  7,13 ;0;" "  7,20;0;" "  340T t=1202  ="l"1805  10.01z# =*t,-60<+(*129+0.5) ="0"1300 !="P"1900l &="9"390 0="l"1860D : 1810 Dt N 1800 l z=0 va=19 { 1950  z=0  1950  z=12  1950  z=24 ="z"2000 ="s"2010 ="x"2020 ="d"2030 ="c"2040 ="v"2050 ="g"2060  ="b"2070 ="h"2080  ="n"2090* ="j"21004 ="m"2110> ="q"2120H ="2"2130R ="w"2140\ ="3"2150f ="e"2160p ="r"2170z ="5"2180 ="t"2190 ="6"2200 ="y"2210 ="7"2220 ="u"2230 ="i"2240 ="9"375w ="R"1800 ="1"320@ ="0"1280 ="l"1982 ="p"1990  1950 ="l"1982 a  1910v ="p"1985 z=01930 z=12 1940 z=241920 0.01z# =*a,-12 +z  0.5*a 0.01z# =*a,-0+z ="z"2000  1950 0.01z# =*a,-11 +z  0.5*a 0.01z# =*a,1+z ="s"2010  1950 0.01z# =*a,-10 +z  0.5*a 0.01z# =*a,2+z ="x"2020  1950 0.01z# =*a,-9 +z  0.5*a 0.01z# =*a,3+z ="d"2030  1950 0.01z# =*a,-8+z  0.5*a 0.01z# =*a,4+z ="c"2040  1950 0.01z# =*a,-7+z  0.5*a 0.01z# =*a,5+z ="v"2050  1950  0.01z# =*a,-6+z  0.5*a 0.01z# =*a,6+z ="g"2060   1950 0.01z# =*a,-5+z  0.5*a 0.01z# =*a,7+z ="b"2070  1950  0.01z# =*a,-4+z " 0.5*a #0.01z# =*a,8+z $="h"2080  % 1950 *0.01z# =*a,-3+z , 0.5*a -0.01z# =*a,9 +z .="n"2090* / 1950 40.01z# =*a,-2+z 6 0.5*a 70.01z# =*a,10 +z 8="j"21004 9 1950 >0.01z# =*a,-1+z @ 0.5*a A0.01z# =*a,11 +z B="m"2110> C 1950 H0.01z# =*a,-0+z J 0.5*a K0.01z# =*a,12 +z L="q"2120H M 1950 R0.01z# =*a,1+z T 0.5*a U0.01z# =*a,13 +z V="2"2130R W 1950 \0.01z# =*a,2+z ^ 0.5*a _0.01z# =*a,14+z `="w"2140\ a 1950 f0.01z# =*a,3+z h 0.5*a i0.01z# =*a,15+z j="3"2150f k 1950 p0.01z# =*a,4+z r 0.5*a s0.01z# =*a,16+z t="e"2160p u 1950 z0.01z# =*a,5+z | 0.5*a }0.01z# =*a,17+z ~="r"2170z  1950 0.01z# =*a,6+z  0.5*a 0.01z# =*a,18+z ="5"2180  1950 0.01z# =*a,7+z  0.5*a 0.01z# =*a,19+z ="t"2190  1950 0.01z# =*a,8+z  0.5*a 0.01z# =*a,20+z ="6"2200  1950 0.01z# =*a,9 +z  0.5*a 0.01z# =*a,21+z ="y"2210  1950 0.01z# =*a,10 +z  0.5*a 0.01z# =*a,22+z ="7"2220  1950 0.01z# =*a,11 +z  0.5*a 0.01z# =*a,23+z ="u"2230  1950 0.01z# =*a,12 +z  0.5*a 0.01z# =*a,24+z ="i"2240  1950  ="r"2305 a$= ="1"320@ ="q"2400` ="w"2410j ="e"2420t ="r"2430~ ="t"2440 ="y"2450 ="u"2460 ="i"2469 ="o"2474 ="p"2480 $/1,1;"beep it! beta version 2008" %J3,1;"programmed by Yes, Robot using a Sinclair ZX Spectrum" &-6,1;"now press <1> to go back" 'O8,1;"or press for some fx sounds ( stops sound)" (11 ,1;"have fun" )13 ,1;"" . 2320 `x=0243 a0.05|L,0+x b0.05|L,4+x c0.05|L,7+x d="m"2320 ex f 2320 jx=0243 k0.05|L,7-x l0.05|L,4-x m0.05|L,0-x n="m"2320 ox p 2320 tx=072H2 u0.005y# =,480-x v="m"2320 wx x 2320 ~x=072H2 0.005y# =,-24+x ="m"2320 x 2320 x=024 0.01z# =,0+x 0.01z# =,12 +x ="m"2320 x 2320 x=0246 0.005y# =,0+x x x=060<10 0.01z# =,24-x ="m"2320 x 2320 x=0100d2 0.001wn*x,0 0.001wn*x,12 0.001wn*x,24 ="m"2320 x 2320 x=04809 0.005y# =,480-x ="m"2320 x 2320 x=0 100010 0.0001sQX*x,20 ="m"2320 x /0.05|L,-60<+(*129+0.5) ="m"2320 2480  "pxA