Home » Personal collection » Acorn hard disk » demos » Demo » !Demo/!Runimage
!Demo/!Runimage
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn hard disk » demos » Demo |
Filename: | !Demo/!Runimage |
Read OK: | ✔ |
File size: | 3C6B bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
5REM>adfs::afrance.$.dlnew.!demo.!Runimage 10:MODE15:MODE13:OFF:SYS262300TOaa,ba,ca,da,ea,fa:ga=60*72*16:SYS262299,aa,ga,ga,ga,ea,fa::PROCJ:ONERRORPROCK 15SYS"A3010_ReadMode":PROCL:PROCM:PROCN::REPEAT:PROCO:PROCP::PROCQ:PROCR:PROCS:PROCT:PROCU:PROCV::PROCW:PROCX:PROCZ:PROC_:PROC`:PROCaa:PROCba:PROCca:UNTILFALSE 20DEFPROCK:ONERROROFF 25SYSr,1:SYS262383,-1:END 30 35DEFPROCO:PROCc("AcornA3010"):PROCd("A3010",-640,P,k,k):PROCd("Acorn",-640,0,k,k):PROCa(300):ENDPROC 40 45DEFPROCP:PROCn:PROCc("Hardware"):PROCd("Computer+M",-640,32,k,k):PROCc("Action"):PROCa(50):PROCd("Action",0,P,0,0):PROCd("Pack",ha,P,k,k):PROCc("Hardware"):PROCa(50):PROCb(f,"Monitor",-640,360):PROCa(20):PROCb(A,"TVdesktop",H,D):PROCc("Zool"):PROCa(100):X=FNe(80*1024):SYSu,0,X 50SYSr,2:ia=448:ja=436:ka=832:la=712:b=(ia+ka)/2:e=(ja+la)/2:VDU24,448;436;832;712; 55a$="Zool":ma=-640:na=140:B=1/2:C=1/2:PROCe(a$,ma,na,TRUE):Q=ma+g*B*R/4:S=na+j*C:T=1.4:oa=INT(LN(65536/256)/LN(T)):n=0:REPEAT:SYSo:SYSu,X,0:IFn<30THEN 60SYS70,pa+n*362,362:IFn=29SYSu,0,X 65ENDIF 70IFn>10THEN 75t=T^oa:x=Q+(ma-Q)/t:y=S+(na-S)/t:SYSqa,m,x,y,g,j,65536/t,65536/t:oa-=1 80ENDIF 85n+=1:UNTILoa<0:SYSo:SYSu,X:SYSqa,m,x,y,g,j,65536/t,65536/t:PROCa(200)::SYSu,,X:SYS47,0,24TO,,K:K=(K>>>8)AND(15790320):ra=(K=15790320):q=0:FORI=0TO15:SYSo:IFNOTraVDU19,0,24,q*17,q*17,q*17 90SYSL,X,0,0,320,256,I,0:SYSqa,m,x,y,g,j,65536,65536:q=I:NEXT:IFNOTraVDU19,0,24,q*17,q*17,q*17 95SYSo:SYSL,X,0,0,320,256,15,0:SYSqa,m,x,y,g,j,65536,65536:PROCa(100):SYSr,1:ENDPROC 100 105DEFPROCQ:PROCn:PROCc("Hardware"):PROCb(f,"smw_A3010",0,P):PROCd("Computer+M",-640,32,k,k):PROCb(f,"smw_acorn",ha,0):ENDPROC 110 115DEFPROCR:M=0:FORsa=0TO1:RESTORE+0 120DATA "32-bit power" 125DATA "2MB of ROM" 130DATA "Up to 4MB RAM" 135FORF=0TO2:READe$:CASEsaOF 140WHEN0:PROCf(e$,z$,48,-640,700-F*170,M,k) 145WHEN1:PROCda(e$,z$,48,-640,700-F*170,M,k,255) 150ENDCASE 155M=MEOR1:NEXT:IFsa=0PROCa(300) 160NEXT:ENDPROC 165 170DEFPROCS:PROCb(f,"Monitor",-640,360):PROCj(f,H$,j$,30,-640,ta):PROCx("News",5,H,D,3):PROCx("TVdesktop",1,H,D,0):PROCa(100):PROCo("TVdesktop",H,D,1/2,1/2,0):PROCea(k,k,255):ENDPROC 175 180DEFPROCx(r$,ua,b,e,va):IFua>1THEN 185FORwa=1TOua:PROCl(r$+STR$wa,w,h,b(wa)):NEXT:r$+="1" 190ENDIF 195PROCe(r$,b,e,TRUE):xa=TIME:IFvaAND1THEN 200FORya=0TO16:PROCg(0,ya,8):NEXT 205ENDIF 210PROCp(0,224,8,5):PROCp(224,248,8,10):PROCp(248,254,2,4):PROCg(254,16,20):PROCg(255,16,40):PROCg(256,16,400):IFvaAND2THEN 215PROCg(255,16,40):PROCg(253,16,40):PROCg(250,16,40):PROCp(255,0,-4,0) 220ENDIF 225ENDPROC 230 235DEFPROCp(za,Z,oa,Aa):FORp=zaTOZSTEPoa:PROCg(p,16,Aa):NEXT:PROCg(Z,16,0):ENDPROC 240 245DEFPROCg(Ba,ya,Ca):Da=TIME:REPEAT:IFTIME>xa+6ANDua>1THEN 250a=m:REPEAT:m=b(RND(ua)):UNTILm<>a:xa=TIME 255ENDIF 260SYSo:SYS"A3010_TVInterference",m,b,e,g,j,Ba,ya:UNTILTIME>Da+Ca:ENDPROC 265 270DEFPROCT:RESTORE+0 275DATA "High capacity disc drive",disc_1600 280DATA "One high density disc will hold twice as much information as an ordinary disc - enough text to cover 350 pages (16000000 bytes)" 285DATA "but can still use standard discs",disc_800 290DATA "These hold just over 800,000 characters or about 170 pages" 295DATA "Will even access any MSDOS disc!",disc_pc 300DATA "This allows you to transfer data to and from a PC without fuss" 305DATA "Internal Hard disc optional","" 310DATA "A typical hard disc would be large enough to store 10,000 pages of text" 315M=0:SYSr,2:SYSu:VDU26 320FORFa=1TO4:READI$,l$,A$:IFFa=4M=k 325PROCf(I$,j$,30,-640,ta,M,k):PROCfa(l$,264):PROCa(30):PROCga(A$):PROCa(4*LENA$):PROCha(l$,264):PROCia:PROCy(f):M=MEOR1:NEXT:VDU26 330ENDPROC 335 340DEFPROCfa(l$,G):IFl$<>""THEN 345PROCb(f,l$,266*4,G):Ga=0:Ha=G:PROCe(l$,Ga,G,TRUE):GCOL0,63TINT192:RECTANGLEFILL266*4,Ha,g*4,j*4:SYSrTOIa,Ja:SYSr,1:FORJ=266TO220STEP-1:WAIT:SYSKa,m,J,G,g,j,Ja:NEXT:SYSr,2:SYSu 350ENDIF 355ENDPROC 360 365DEFPROCha(l$,G):IFl$<>""THEN 370SYSrTOIa,Ja:SYSr,1:Ga=0:Ha=G:PROCe(l$,Ga,G,TRUE):FORJ=220TO266STEP2:WAIT:SYSKa,m,J,G,g,j,Ja:NEXT:SYSr,2:SYSu:PROCh(f,"",266*4,Ha) 375ELSE:PROCa(100) 380ENDIF 385ENDPROC 390 395DEFPROCga(e$):SYSr,1:PROCl("TVdesktop",g,j,a):PROCja:VDU24,H;D;1279;D+(j-1)*4; 400GCOL128:GCOL63TINT192:VDU5,30 405e$+=" ":La=gDIV6:Ma=0:REPEAT:Na=INSTR(e$," "):p$=LEFT$(e$,Na-1):IFMa+LENp$>LaTHEN 410PRINT:Ma=0 415ENDIF 420FORi=1TOLENp$:WAIT:WAIT:VDUASCMID$(p$,i,1):MOVEBY -8,0 425NEXT:Ma+=(LENp$+1):MOVEBY 32-8,0:e$=MID$(e$,Na+1):UNTILe$="":VDU26,4:OFF 430SYSr,2:SYSu 435*FX20 440ENDPROC 445 450DEFPROCja:FORi=0TO(127-32-1)*10-1:VDUi?Oa 455NEXT:ENDPROC 460 465DEFPROCia:PROCl("TVdesktop",g,j,a):VDU24,H;D;H+(g-1)*4;D+(j-1)*4;16,26 470SYSo:SYSu:ENDPROC 475 480DEFPROCU:Pa=24:Qa=128:PROCf(J$,j$,30,-640,ta,1/2,1):PROCb(f,"Stick0",Pa,Qa):PROCb(f,"Stick0",ha-Pa,Qa):PROCb(A,"PacMaze",H,D):SYSr,1:Ra=H+0*64+12:Sa=D+1*64+12+20:d=2:g$="221":CASERND(4)OF 485WHEN1:g$+="2221443" 490WHEN2:g$+="2122344" 495WHEN3:g$+="1443222" 500WHEN4:g$+="4412232" 505ENDCASE 510CASERND(2)OF 515WHEN1:g$+="3232" 520WHEN2:g$+="322" 525ENDCASE 530REPEAT:PROCu(d):d=VALLEFT$(g$,1):g$=MID$(g$,2):PROCk("Stick"+STR$d,Pa,Qa,0):p=0:FORi=0TO15:WAIT:PROCu(5):Ra+=4*c(d):Sa+=4*d(d):PROCu(p):IFi=12ANDd<>VALLEFT$(g$,1)THEN 535PROCk("Stick0",Pa,Qa,0) 540ENDIF 545WAIT:IFiMOD2p=d-p 550NEXT:UNTILg$="":PROCk("Stick0",Pa,Qa,0):PROCz("PacMaze",H,D):SYSr,2:SYSu:PROCa(100):PROCh(A,"PacMaze",H,D):PROCy(f):ENDPROC 555 560DEFPROCu(Ta):SYS46,290,l,"pac"+STR$Ta,Ra,Sa:ENDPROC 565 570DEFPROCV:PROCf(K$,j$,30,-640,ta,1/2,1):PROCd("Maestro",H,D,k,k):PROCd("Speaker",32,420,k,k):PROCd("Speaker",ha-32,420,k,k):PROCc("Stereo"):PROCa(40):Ua=68:Va=192:PROCl("Stereo",Wa,Xa,Za):_a=Ua+4*(WaDIV2):FORi=0TO(WaDIV2)+2:VDU24,_a-i*4;0;_a+i*4;1023; 575SYS46,290,l,"Stereo",Ua,Va:SYSo:NEXT:VDU26 580PROCa(400):ENDPROC 585 590DEFPROCW:PROCA:PROCc("Wimp"):PROCv(12):COLOUR7,0,0,0:COLOUR128+7:CLS:PROCka:`a=920:ab=600:bb=100:FOR_=1TO3:SYS47,_,25TO,,cb:a(_,0)=(cb>>>8)AND255:a(_,1)=(cb>>>16)AND255:a(_,2)=(cb>>>24)AND255:NEXT:SYS"A3010_ReadMode":SYSr,2:SYSu:PROCd("!sm12_A3010",0,P,k,k):PROCa(80) 595PROCb(f,"!Desktop12",0,0):`=g:db=j:eb=2*(g+(640-g)/2):fb=g*2+32:gb=512:hb=4*(g/2/2):ib=4*(j/2):PROCf(B$,j$,30,-640,780,1/2,1):PROCa(80):PROCq(1):PROCb(f,"iconbar12",0,0):PROCz("!Desktop12",0,0):PROCa(80):PROCq(3):MOUSETOhb,ib:SYS46,292,l,"Pointer",1 600*Pointer 1 605MOUSEON1 610FORjb=0TO15:PROCB(jb):NEXT:PROCa(80):PROCq(0):PROCb(f,"Filer12",80,400):PROCa(80):PROCla(144,472):PROCq(2):PROCb(f,"Menu12",48,148):PROCa(100):FORw=0TO3:PROCC(w,2):NEXT:PROCa(50):FORw=0TO3:PROCC(w,1):NEXT:PROCi(A,B$,j$,30,-640,780):FORjb=15TO0STEP-1:PROCB(jb):NEXT:MOUSEOFF:ENDPROC 615 620DEFPROCka:FORi=0TO(16+4)*6-1:VDUi?kb 625NEXT:ENDPROC 630 635DEFPROCB(lb):WAIT:FOR_=1TO3:VDU19,_,25 640FORi=0TO2:VDU255-lb*(255-a(_,i))/16 645NEXT:NEXT:ENDPROC 650 655DEFPROCla(mb,nb):MOUSEB,C,ob:pb=mb-B:qb=nb-C:rb=SQR(pb*pb+qb*qb):sb=rbDIV8:FORi=1TOsb:WAIT:MOUSETOB,C:B+=(pb/sb):C+=(qb/sb):NEXT:MOUSETOmb,nb:ENDPROC 660 665DEFPROCq(n):PROCf(LEFT$(a$(n),1),s$,48,`a,ab-n*bb,k,k):PROCj(A,MID$(a$(n),2),q$,32,`a+72,ab-n*bb+12):ENDPROC 670 675DEFPROCC(n,z):CASEzOF 680WHEN1:PROCi(A,LEFT$(a$(n),1),s$,48,`a,ab-n*bb) 685WHEN2:PROCi(A,MID$(a$(n),2),q$,32,`a+72,ab-w*bb+12) 690ENDCASE 695ENDPROC 700 705DEFPROCr(L$,d$,M$):PROCa(50):PROCf(L$,t$,32,-eb,600,k,k):PROCa(50):PROCb(f,M$,tb,ub):d$+="|":G=gb:REPEAT:F=INSTR(d$,"|"):b$=LEFT$(d$,F-1):d$=MID$(d$,F+1):PROCj(A,b$,u$,20,fb,G):G-=64:UNTILd$="":PROCa(150):ENDPROC 710 715DEFPROCs:SYS46,264,lTO,,,vb:N=1:REPEAT:SYS131118,269,l,U,64,NTO;V:V=((VAND1)=0):IFVTHEN 720IF?U=ASC"!"THEN 725N+=1 730ELSE:SYS46,281,l,U 735ENDIF 740ENDIF 745UNTILNOTV:PROCm("Woids",`*2,0,640-`,db):PROCh(A,"Woids",`*2,0):ENDPROC 750 755DEFPROCX:PROCb(f,"!Desktop12",0,0):PROCc("!Paint"):PROCm("!Desktop12",0,0,`,db):PROCf(C$,j$,30,-640,780,1/2,1):PROCr("Paint",N$,"PaintIcon"):wb=120:xb=72:PROCb(f,"PaintWind",wb,xb):PROCa(100):RESTORE+0 760FORyb=1TO13:READW,a$,x,y:PROCk(a$,wb+2+x,xb+48+y,W):PROCa(70):NEXT:PROCa(400):PROCs:ENDPROC 765 770DATA 0,s0,466,112 775DATA 3,s1,0,160 780DATA 3,s2,508,132 785DATA 3,s3,0,0 790DATA 3,s4,0,164 795DATA 3,s5,510,272 800DATA 3,s6,42,24 805DATA 3,s7,18,352 810DATA 3,s8,12,288 815DATA 3,s9,162,156 820DATA 3,s10,164,188 825DATA 3,s11,530,288 830DATA 3,s12,206,412 835 840DEFPROCZ:PROCb(f,"!Desktop12",0,0):PROCc("!Draw"):PROCm("!Desktop12",0,0,`,db):PROCr("Draw",O$,"DrawIcon"):zb=96:Ab=32:PROCb(f,"DrawWind",zb,Ab):PROCk("DrawTools",zb-80,Ab+44,0):PROCa(50):PROCb(f,"Arm",zb+4,Ab+48):PROCa(400):PROCh(f,"Arm",zb+4,Ab+48):PROCa(100):RESTORE+0 845FORyb=1TO18:READW,a$,x,y,Aa:PROCk(a$,zb+8+x,Ab+32+y,W):PROCa(Aa):NEXT:PROCa(200):PROCs:PROCi(A,C$,j$,30,-640,780):ENDPROC 850 855DATA 0,a,64,340,80 860DATA 0,b,526,80,80 865DATA 0,a-fill,64,340,80 870DATA 0,b-fill,526,80,80 875DATA 3,d1,102,336,15 880DATA 3,d2,140,332,10 885DATA 3,d3,178,328,9 890DATA 3,d4,218,328,8 895DATA 3,d5,254,308,7 900DATA 3,d6,292,284,6 905DATA 3,d7,330,264,5 910DATA 3,d8,360,240,4 915DATA 3,d9,386,216,4 920DATA 3,d10,410,196,4 925DATA 3,d11,436,172,4 930DATA 3,d12,460,148,4 935DATA 3,d13,484,128,4 940DATA 3,d14,504,104,4 945 950DEFPROC_:PROCb(f,"!Desktop12",0,0):PROCc("!Maestro"):PROCm("!Desktop12",0,0,`,db):PROCf(D$,j$,30,-640,780,1/2,0):PROCr("Maestro",P$,"MusicIcon"):Bb=24:Cb=24:PROCb(f,"MaestroWind",Bb,Cb):VDU24,Bb+2;Cb+128;Bb+800;Cb+524; 955FORDb=0TO1208STEP8:IFDb>1200x=1200ELSEx=Db 960SYSo:SYS46,290,l,"music",Bb+2-x,Cb+128:IFDb=8PROCa(100) 965NEXT:VDU26 970PROCa(300):PROCs:ENDPROC 975 980DEFPROC`:PROCb(f,"!Desktop12",0,0):PROCc("!Start"):PROCm("!Desktop12",0,0,`,db):PROCr("StartWrite",Q$,"StartIcon"):Fb=16:Gb=144:PROCb(f,"StartWind",Fb,Gb):SYSr,1:PROCma:PROCna(Hb):SYSr,2:SYSu:PROCa(400):PROCs:ENDPROC 985 990DEFPROCma:v$="*QWERTYUIOP*ASDFGHJKL*ZXCVBNM,.*":y=0:Ib=FALSE:Jb=0:b$="":X$="":Kb=FNc(u$,20):SYS262290,Kb,0,1,6:Lb=816:Mb=348:Nb=32:Ob=372:Pb=Lb-2*Nb:SYS262281,,1,PbTO,Qb,Pb:SYS262276,KbTO,,Rb,,Sb:Tb=Sb-Rb:Ub=5:Vb=40:ENDPROC 995 1000DEFPROCna(Wb):ORIGINFb+2,Gb+44:WHILE?Wb<>0:PROCoa(CHR$?Wb):Wb+=1:ENDWHILE:ORIGIN0,0:ENDPROC 1005 1010DEFPROCoa(m$):CASEm$OF 1015WHEN"~":PROCa(40+RND(30)) 1020WHENCHR$10:b$="":PROCD 1025WHENCHR$127,"<":IFb$<>""PROCF:PROCa(5) 1030OTHERWISE:IFm$>=" "THEN 1035IFRND(40)=1ANDm$<>" "ANDVb=0THEN 1040PROCG(FNf(m$)):PROCa(20+RND(20)):PROCF:PROCa(20+RND(20)):Vb=20 1045ELSE:IFVb>0Vb-=1 1050ENDIF 1055PROCa(RND(7)+2):PROCG(m$) 1060ENDIF 1065ENDCASE 1070ENDPROC 1075 1080DEFPROCG(c$):b$+=c$:SYS262305,Kb,b$,1<<20,Pb,0TO,,,,,,,Xb:Zb=(LENb$>Xb):IFZbTHEN 1085WHILEMID$(b$,Xb,1)<>" ":Xb-=1:ENDWHILE:PROCH(LENb$-Xb):b$=MID$(b$,Xb+1):PROCD 1090ENDIF 1095PROCpa(b$):ENDPROC 1100 1105DEFPROCD:IFy=UbTHEN 1110GCOL128:RECTANGLEFILL0,0,Lb,MbTO0,Tb:GCOL2:LINE26,0,26,Tb:LINE800,0,800,Tb 1115ELSE:y+=1 1120ENDIF 1125ENDPROC 1130 1135DEFPROCF:PROCH(1):b$=LEFT$(b$):ENDPROC 1140 1145DEFPROCpa(R$):SYS262278,Kb,R$,16,Fb+Nb,Gb+Ob-y*Tb:ENDPROC 1150 1155DEFPROCH(_b):SYS262277,,b$,Pb,Pb,-1,LENb$TO,,`b:SYS262277,,LEFT$(b$,LENb$-_b),Pb,Pb,-1,LENb$TO,,ac:ac=acDIVQb:`b=`bDIVQb:GCOL0:RECTANGLEFILLNb+ac-2,Ob-y*Tb-2,`b-ac,-Tb-6:ENDPROC 1160 1165DEFFNf(k$):bc=(k$>="a"ANDk$<="z"):IFbc k$=CHR$(ASCk$-32) 1170IFINSTR(v$,k$)>0THEN 1175REPEAT:n$=MID$(v$,INSTR(v$,k$)+SGNRND,1):UNTILn$<>"*":k$=n$ 1180ENDIF 1185IFbcANDk$>="A"ANDk$<="Z"k$=CHR$(ASCk$+32) 1190=k$ 1195DEFPROCaa:PROCi(A,D$,j$,30,-640,780):PROCb(f,"!Desktop12",0,0):PROCh(A,"!Desktop12",0,0):PROCh(A,"!sm12_A3010",0,P):WAIT:COLOUR0,0,0,0:COLOUR128:CLS:SYSu:ENDPROC 1200 1205DEFPROCba:PROCv(13):SYSr,2:PROCc("Game1"):PROCa(50):PROCw("Fun","Zool","Game2"):PROCw("And","Lemmings","Game3"):PROCw("Games","ChuckRock",""):ENDPROC 1210 1215DEFPROCw(e$,S$,F$):PROCb(f,S$,0,-512):IFF$<>""PROCc(F$) 1220PROCa(240):CLG:SYSo:CLG:SYSo:PROCb(f+1,e$,-640,-512):PROCa(120):PROCo(e$,-640,-512,k,k,0):ENDPROC 1225 1230DEFPROCca:PROCn:PROCc("Computer"):PROCd("Computer",-640,P,1/2,0):RESTORE+0 1235FORFa=1TO2:READw$:PROCj(f,w$,t$,40,-640,360):F=244:READb$:REPEAT:PROCa(40):IFLEFT$(b$,1)="/"THEN 1240PROCj(f,MID$(b$,2),q$,30,-640,F) 1245ELSE:PROCj(f,b$,x$,30,-640,F) 1250ENDIF 1255F-=80:READb$:UNTILb$="*":PROCa(400):CASEFaOF 1260WHEN1:RESTORE+0 1265F=244:READw$,b$:REPEAT:IFLEFT$(b$,1)="/"THEN 1270PROCi(f,MID$(b$,2),q$,30,-640,F) 1275ELSE:PROCi(f,b$,x$,30,-640,F) 1280ENDIF 1285F-=80:READb$:UNTILb$="*":PROCi(f,w$,t$,40,-640,360) 1290WHEN2:PROCn:PROCA 1295ENDCASE 1300NEXT 1305DATA "It�s Entertaining . . ." 1310DATA "32-bit power, superb graphics," 1315DATA "stereo sound and joysticks" 1320DATA "enhance the realism and make" 1325DATA "the A3010 an ideal games machine" 1330DATA * 1335DATA ". . . and Educational" 1340DATA "The A3010 is one of the range" 1345DATA "of Acorn computers used in" 1350DATA "almost all U.K. schools." 1355DATA "/- The educated choice. " 1360DATA * 1365ENDPROC 1370 1375DEFPROCM:PROCv(13):SYSr,2:DIMc(4),d(4),b(10),cc 10,a(3,2),a$(3):c()=0,0,1,0,-1:d()=0,1,0,-1,0:Oa=FNb("A3010Data93:Narrow"):kb=FNb("A3010Data93:WimpPal"):pa=FNb("A3010Data93:Crack"):Hb=FNb("A3010Data93:Words"):f=0:A=2:dc=3:ec=4 1380fc=0:gc=1:hc=0:ic=1:k=1/2:ha=10000:P=10000:ta=800:H=444:D=452:tb=660:ub=20:RESTORE+0 1385READH$:READJ$:READK$:READB$:READC$:READD$:READN$:READO$:READP$:READQ$:READZ$:READ_$:a$()="Windows","Icons","Menus","Pointer" 1390DATA "Will connect to a domestic TV" 1395DATA "Supports standard joysticks" 1400DATA "Can connect to external speakers" 1405DATA "Easy to use operating system" 1410DATA "Built-in applications include:" 1415DATA "Bundled software includes:" 1420DATA "A simple to use|yet very versatile|painting program." 1425DATA "An object-based|drawing package|that can be used|for all sorts of|computer aided|design." 1430DATA "A huge range of|musical styles|can be composed|and played using|Maestro.|MIDI capability|can be added to|the A3010." 1435DATA "A no nonsense|word processor|simply type and|print! " 1440DATA ". . . It grows your mind" 1445DATA "It blows your mind . . ." 1450ENDPROC 1455 1460DEFPROCN:DIMU 64:SYS41,28,"A3010Sprites93:"TO,,,jc:DIMb$(jc),e(jc),f(jc):kc=0:lc=0:REPEAT:SYS12,10,"A3010Sprites93:",U,1,kc,64TO,,,,kc:IFkc<>-1THEN 1465f$="":i=20:WHILEU?i<>0:f$+=CHR$(U?i):i+=1:ENDWHILE:DIMmc U!8:SYS8,255,"A3010Sprites93:"+f$,mc:b$(kc)=FNd(f$):e(kc)=mc+20:f(kc)=U!8-20:SYS"A3010_LoadSquashed","A3010Sprites93:"+f$TOnc:IFnc>lc lc=nc 1470ENDIF 1475UNTILkc=-1:lc+=64:DIMl lc:!l=lc:l!8=16:SYS46,265,l:SYS272129,8,lcTOoc:DIMpc oc:ENDPROC 1480DEFPROCJ:v=FNa("OS_SpriteOp"):qc=FNa("A3010_ReadMode"):rc=FNa("A3010_PlotShrunk"):sc=FNa("A3010_ClearArea"):u=FNa("A3010_CopyMemory"):L=FNa("A3010_PlotFaded"):r=FNa("A3010_Banks"):o=FNa("A3010_SwapBanks"):Ka=FNa("A3010_PlotOnWhite") 1485tc=FNa("A3010_TVInterference"):uc=FNa("A3010_LoadSquashed"):qa=FNa("A3010_MaskShrunk"):ENDPROC 1490 1495DEFFNa(T$):SYS57,,T$TOvc:=vc 1500DEFPROCc(a$):a$=FNd(a$):N=jc+1:REPEAT:N-=1:UNTILa$=b$(N)ORN=0:IFN=0ERROR214,"Sprites not found" 1505SYS272129,4,pc,e(N),f(N),l+4,lc-4:ENDPROC 1510 1515DEFFNd(i$):o$="":FORwc=1TOLENi$:c$=MID$(i$,wc,1):IFc$>="A"ANDc$<="Z"c$=CHR$(ASCc$+32) 1520o$+=c$:NEXT:=o$ 1525DEFPROCqa(a$,b,e,W):PROCe(a$,b,e,FALSE):SYSo:SYSv,290,l,a$,b,e,W:ENDPROC 1530 1535DEFPROCk(a$,b,e,W):PROCe(a$,b,e,FALSE):SYSv,290,l,a$,b,e,W:SYSo:SYSv,290,l,a$,b,e,W:ENDPROC 1540 1545DEFPROCm(a$,b,e,w,h):SYSv,272,l,a$,0,b,e,b+(w-1)*R,e+(h-1)*4:SYSv,310,l,a$:ENDPROC 1550 1555DEFPROCz(a$,b,e):PROCe(a$,b,e,FALSE):SYSv,272,l,a$,0,b,e,b+(g-1)*R,e+(j-1)*4:SYSv,310,l,a$:ENDPROC 1560 1565DEFPROCb(s,a$,b,e):PROCe(a$,b,e,TRUE):za=15:IFMODE=12THEN 1570IFs=f s=dc:za=8 1575IFs=A s=ec:za=8 1580ENDIF 1585FORI=zaTO0STEP-1:SYSo:SYSL,m,b,e,g,j,I,s:IFMODE=12WAIT 1590NEXT:SYSo:SYSL,m,b,e,g,j,0,s:ENDPROC 1595 1600DEFPROCh(s,a$,b,e):PROCe(a$,b,e,TRUE):Z=15:IFMODE=12THEN 1605IFs=f s=dc:Z=8 1610IFs=A s=ec:Z=8 1615ENDIF 1620FORI=0TOZ:SYSo:SYSL,m,b,e,g,j,I,s:NEXT:SYSo:SYSL,m,b,e,g,j,Z,s:ENDPROC 1625 1630DEFPROCd(a$,b,e,B,C):PROCe(a$,b,e,TRUE):Q=b+g*B*R/4:S=e+j*C:T=1.2:sb=INT(LN(65536/128)/LN(T)):FORi=sbTO0STEP-1:t=T^i:x=Q+(b-Q)/t:y=S+(e-S)/t:SYSo:SYSrc,m,x,y,g,j,65536/t,65536/t:NEXT:SYSo:SYSrc,m,x,y,g,j,65536/t,65536/t:ENDPROC 1635 1640DEFPROCo(a$,b,e,B,C,xc):PROCe(a$,b,e,TRUE):Q=b+g*B*R/4:S=e+j*C:T=1.2:sb=INT(LN(65536/128)/LN(T)):FORi=0TOsb:t=T^i:x=Q+(b-Q)/t:y=S+(e-S)/t:SYSo:SYS"A3010_ClearArea",xc,b,e,g,j:SYSrc,m,x,y,g,j,65536/t,65536/t:NEXT:SYS"A3010_ClearArea",xc,b,e,g,j:SYSo 1645SYS"A3010_ClearArea",xc,b,e,g,j:ENDPROC 1650 1655DEFPROCj(s,d$,h$,a%,b,e):PROCt(d$,h$,a%,b,e):PROCb(s,"",b,e):ENDPROC 1660 1665DEFPROCi(s,d$,h$,a%,b,e):PROCt(d$,h$,a%,b,e):PROCh(s,"",b,e):ENDPROC 1670 1675DEFPROCy(s):PROCI:PROCh(s,"",yc,zc):ENDPROC 1680 1685DEFPROCf(d$,h$,a%,b,e,B,C):PROCt(d$,h$,a%,b,e):PROCd("",b,e,B,C):ENDPROC 1690 1695DEFPROCda(d$,h$,a%,b,e,B,C,xc):PROCt(d$,h$,a%,b,e):PROCo("",b,e,B,C,xc):ENDPROC 1700 1705DEFPROCea(B,C,xc):PROCI:PROCo("",yc,zc,B,C,xc):ENDPROC 1710 1715DEFPROCI:SYSv,296,O,"words"TO,,,g,j:SYSv,280,O,"words"TO,,m:m=m+m!32:ENDPROC 1720 1725DEFPROCe(a$,RETURNx,RETURNy,Ac):IFa$<>""PROCl(a$,g,j,m) 1730IFx<0x=-x-(g*R)/2 1735IFx>1280x=1280-(g+1)*R-(ha-x) 1740IFy<0y=-y-(j*4)/2 1745IFy>1024y=1024-(j+1)*4-(P-y) 1750IFAcTHEN 1755x=xDIV4:y=256-(yDIV4)-j 1760ENDIF 1765ENDPROC 1770 1775DEFPROCl(a$,RETURNw,RETURNh,RETURNa):SYSv,296,l,a$TO,,,w,h:SYSv,280,l,a$TO,,a:a=a+a!32:ENDPROC 1780 1785DEFPROCa(Ca):Da=TIME:REPEATUNTILTIME>Da+CaANDNOTINKEY-99:ENDPROC 1790 1795DEFPROCL:u$="Trinity.Medium":z$=u$+".Italic":U$="Trinity.Bold":t$=U$+".Italic":x$="Homerton.Medium":q$=x$+".Oblique":V$="Homerton.Bold":j$=V$+".Oblique":s$="Corpus.Medium":`$=s$+".Oblique":W$="Corpus.Bold":aa$=W$+".Oblique" 1800SYS262281,,1280,1TO,Bc,Cc:y$="":FORc=32TO126:y$+=CHR$c:NEXT:y$+="����":PROCra(48*1024):ENDPROC 1805 1810DEFPROCt(d$,h$,a%,RETURNJ,G):Dc=FNc(h$,ABSa%):SYS262295,Dc,y$TO,,Fc,,Gc:SYS262295,Dc,d$TO,Hc,,Ic:Jc=4*INT(-Fc/(Cc*4)+0.5):Kc=8*INT(Ic/(Cc*8)+0.5):Lc=4*INT((Gc-Fc)/(Cc*4)+0.5):CASEMODEOF 1815WHEN12:SYS262290,Dc,7,6,-6 1820WHEN13:IFa%<0THEN 1825SYS262291,,0,1,14,0,-256 1830ELSE:SYS262291,,0,1,14,-256,0 1835ENDIF 1840SYS262290,Dc,0,1,14 1845OTHERWISE:ERROR1,"Bad mode" 1850ENDCASE 1855IFJ<0J=-J-Kc/2 1860Mc=16*(JDIV16):Kc=(Kc+J-Mc+2)ANDNOT2:PROCsa(Kc,Lc+4):SYS262278,Dc,d$,16,J-Mc,Jc+4:SYS262274,Dc:PROCta:J=Mc:yc=J:zc=G:ENDPROC 1865 1870DEFFNc(h$,a%):SYS262273,,h$,a%*16,a%*16,0,0TONc:SYS262282,Nc:=Nc 1875DEFPROCsa(Oc,Pc):IFMODE=12THEN 1880g=OcDIV2 1885ELSE:g=OcDIV4 1890ENDIF 1895j=PcDIV4:SYSv,271,O,"words",0,g,j,MODE:SYSv,316,O,"words":SYSv,280,O,"words"TO,,m:m=m+m!32:IFMODE=12THEN 1900GCOL128+7 1905ELSE:IFa%<0THEN 1910GCOL128+0TINT0 1915ELSE:GCOL128+63TINT192 1920ENDIF 1925ENDIF 1930CLG:ENDPROC 1935 1940DEFPROCta:SYSv,316,O,,1:ENDPROC 1945 1950DEFPROCra(Qc):DIMO Qc:!O=Qc:O!8=16:SYSv,265,O:ENDPROC 1955 1960DEFPROCn:SYSu,,l+4:SYS47,0,24TO,,K:K=(K>>>8)AND(15790320):ra=(K=15790320):q=0:FORI=0TO15:SYSo:IFNOTraVDU19,0,24,q*17,q*17,q*17 1965SYSL,l+4,0,0,320,256,I,0:q=I:NEXT:IFNOTraVDU19,0,24,q*17,q*17,q*17 1970SYSo:SYSL,l+4,0,0,320,256,15,0:ENDPROC 1975 1980DEFPROCA:SYSu,,l+4:SYS47,0,24TO,,K:K=(K>>>8)AND(15790320):Rc=(K=0):q=15:FORI=0TO15:SYSo:IFNOTRcVDU19,0,24,q*17,q*17,q*17 1985SYSL,l+4,0,0,320,256,I,2:q=15-I:NEXT:IFNOTRcVDU19,0,24,q*17,q*17,q*17 1990SYSo:SYSL,l+4,0,0,320,256,15,2:ENDPROC 1995 2000DEFPROCv(Sc):SYSu:WAIT:MODE15:MODESc:OFF:SYS"A3010_ReadMode":IFSc=12R=2 2005IFSc=13R=4 2010ENDPROC 2015 2020DEFFNb(G$):REPEAT:SYS131080,5,G$TO,,,,nc;V:UNTIL(VAND1)=0:DIMmc nc:REPEAT:SYS131080,255,G$,mcTO;V:UNTIL(VAND1)=0:=mc 2025DEFFNe(Tc):SYSv,264,lTO,,Uc,,,Vc:IFUc-Vc<TcERROR1,"Out of memory" 2030=l+Vc
+�>adfs::afrance.$.dlnew.!demo.!Runimage Y:�15:�13:�:ș262300�aa,ba,ca,da,ea,fa:ga=60*72*16:ș262299,aa,ga,ga,ga,ea,fa::�J:��K Zș"A3010_ReadMode":�L:�M:�N::�:�O:�P::�Q:�R:�S:�T:�U:�V::�W:�X:�Z:�_:�`:�aa:�ba:�ca:�� ��K: șr,1:ș262383,-1:� #P��O:�c("AcornA3010"):�d("A3010",-640,P,k,k):�d("Acorn",-640,0,k,k):�a(300):� ( -���P:�n:�c("Hardware"):�d("Computer+M",-640,32,k,k):�c("Action"):�a(50):�d("Action",0,P,0,0):�d("Pack",ha,P,k,k):�c("Hardware"):�a(50):�b(f,"Monitor",-640,360):�a(20):�b(A,"TVdesktop",H,D):�c("Zool"):�a(100):X=�e(80*1024):șu,0,X 2Rșr,2:ia=448:ja=436:ka=832:la=712:b=(ia+ka)/2:e=(ja+la)/2:�24,448;436;832;712; 7�a$="Zool":ma=-640:na=140:B=1/2:C=1/2:�e(a$,ma,na,�):Q=ma+g*B*R/4:S=na+j*C:T=1.4:oa=�(�(65536/256)/�(T)):n=0:�:șo:șu,X,0:�n<30� <"ș70,pa+n*362,362:�n=29șu,0,X A� F �n>10� KIt=T^oa:x=Q+(ma-Q)/t:y=S+(na-S)/t:șqa,m,x,y,g,j,65536/t,65536/t:oa-=1 P� U�n+=1:�oa<0:șo:șu,X:șqa,m,x,y,g,j,65536/t,65536/t:�a(200)::șu,,X:ș47,0,24�,,K:K=(K>>>8)�(15790320):ra=(K=15790320):q=0:�I=0�15:șo:�ra�19,0,24,q*17,q*17,q*17 ZVșL,X,0,0,320,256,I,0:șqa,m,x,y,g,j,65536,65536:q=I:�:�ra�19,0,24,q*17,q*17,q*17 _Ișo:șL,X,0,0,320,256,15,0:șqa,m,x,y,g,j,65536,65536:�a(100):șr,1:� d ie��Q:�n:�c("Hardware"):�b(f,"smw_A3010",0,P):�d("Computer+M",-640,32,k,k):�b(f,"smw_acorn",ha,0):� n s��R:M=0:�sa=0�1:�+0 x� "32-bit power" }� "2MB of ROM" �� "Up to 4MB RAM" ��F=0�2:�e$:Ȏsa� �&�0:�f(e$,z$,48,-640,700-F*170,M,k) �+�1:�da(e$,z$,48,-640,700-F*170,M,k,255) �� �M=M�1:�:�sa=0�a(300) ��:� � ����S:�b(f,"Monitor",-640,360):�j(f,H$,j$,30,-640,ta):�x("News",5,H,D,3):�x("TVdesktop",1,H,D,0):�a(100):�o("TVdesktop",H,D,1/2,1/2,0):�ea(k,k,255):� � ���x(r$,ua,b,e,va):�ua>1� �+�wa=1�ua:�l(r$+�wa,w,h,b(wa)):�:r$+="1" �� ��e(r$,b,e,�):xa=�:�va�1� ��ya=0�16:�g(0,ya,8):� �� �d�p(0,224,8,5):�p(224,248,8,10):�p(248,254,2,4):�g(254,16,20):�g(255,16,40):�g(256,16,400):�va�2� �<�g(255,16,40):�g(253,16,40):�g(250,16,40):�p(255,0,-4,0) �� �� � �9��p(za,Z,oa,Aa):�p=za�Z�oa:�g(p,16,Aa):�:�g(Z,16,0):� � �&��g(Ba,ya,Ca):Da=�:�:�>xa+6�ua>1� �a=m:�:m=b(�(ua)):�m<>a:xa=� �� ;șo:ș"A3010_TVInterference",m,b,e,g,j,Ba,ya:��>Da+Ca:� ��T:�+0 *� "High capacity disc drive",disc_1600 �� "One high density disc will hold twice as much information as an ordinary disc - enough text to cover 350 pages (16000000 bytes)" 1� "but can still use standard discs",disc_800 "C� "These hold just over 800,000 characters or about 170 pages" '0� "Will even access any MSDOS disc!",disc_pc ,G� "This allows you to transfer data to and from a PC without fuss" 1&� "Internal Hard disc optional","" 6P� "A typical hard disc would be large enough to store 10,000 pages of text" ;M=0:șr,2:șu:�26 @�Fa=1�4:�I$,l$,A$:�Fa=4M=k Ec�f(I$,j$,30,-640,ta,M,k):�fa(l$,264):�a(30):�ga(A$):�a(4*�A$):�ha(l$,264):�ia:�y(f):M=M�1:�:�26 J� O T��fa(l$,G):�l$<>""� Y��b(f,l$,266*4,G):Ga=0:Ha=G:�e(l$,Ga,G,�):�0,63Ȝ192:ȓȐ266*4,Ha,g*4,j*4:șr�Ia,Ja:șr,1:�J=266�220�-1:Ȗ:șKa,m,J,G,g,j,Ja:�:șr,2:șu ^� c� h m��ha(l$,G):�l$<>""� rkșr�Ia,Ja:șr,1:Ga=0:Ha=G:�e(l$,Ga,G,�):�J=220�266�2:Ȗ:șKa,m,J,G,g,j,Ja:�:șr,2:șu:�h(f,"",266*4,Ha) w �:�a(100) |� �� � �D��ga(e$):șr,1:�l("TVdesktop",g,j,a):�ja:�24,H;D;1279;D+(j-1)*4; ��128:�63Ȝ192:�5,30 �>e$+=" ":La=g�6:Ma=0:�:Na=�e$," "):p$=�e$,Na-1):�Ma+�p$>La� � �:Ma=0 �� �&�i=1��p$:Ȗ:Ȗ:�p$,i,1):�BY -8,0 �8�:Ma+=(�p$+1):�BY 32-8,0:e$=�e$,Na+1):�e$="":�26,4:� � șr,2:șu � *FX20 �� � �#��ja:�i=0�(127-32-1)*10-1:�i?Oa ��:� � �@��ia:�l("TVdesktop",g,j,a):�24,H;D;H+(g-1)*4;D+(j-1)*4;16,26 � șo:șu:� � ���U:Pa=24:Qa=128:�f(J$,j$,30,-640,ta,1/2,1):�b(f,"Stick0",Pa,Qa):�b(f,"Stick0",ha-Pa,Qa):�b(A,"PacMaze",H,D):șr,1:Ra=H+0*64+12:Sa=D+1*64+12+20:d=2:g$="221":Ȏ�(4)� ��1:g$+="2221443" ��2:g$+="2122344" ��3:g$+="1443222" ��4:g$+="4412232" �� �Ȏ�(2)� �1:g$+="3232" �2:g$+="322" � y�:�u(d):d=��g$,1):g$=�g$,2):�k("Stick"+�d,Pa,Qa,0):p=0:�i=0�15:Ȗ:�u(5):Ra+=4*c(d):Sa+=4*d(d):�u(p):�i=12�d<>��g$,1)� �k("Stick0",Pa,Qa,0) � !Ȗ:�i�2p=d-p &a�:�g$="":�k("Stick0",Pa,Qa,0):�z("PacMaze",H,D):șr,2:șu:�a(100):�h(A,"PacMaze",H,D):�y(f):� + 0(��u(Ta):ș46,290,l,"pac"+�Ta,Ra,Sa:� 5 :���V:�f(K$,j$,30,-640,ta,1/2,1):�d("Maestro",H,D,k,k):�d("Speaker",32,420,k,k):�d("Speaker",ha-32,420,k,k):�c("Stereo"):�a(40):Ua=68:Va=192:�l("Stereo",Wa,Xa,Za):_a=Ua+4*(Wa�2):�i=0�(Wa�2)+2:�24,_a-i*4;0;_a+i*4;1023; ?'ș46,290,l,"Stereo",Ua,Va:șo:�:�26 D �a(400):� I N���W:�A:�c("Wimp"):�v(12):�7,0,0,0:�128+7:�:�ka:`a=920:ab=600:bb=100:�_=1�3:ș47,_,25�,,cb:a(_,0)=(cb>>>8)�255:a(_,1)=(cb>>>16)�255:a(_,2)=(cb>>>24)�255:�:ș"A3010_ReadMode":șr,2:șu:�d("!sm12_A3010",0,P,k,k):�a(80) S��b(f,"!Desktop12",0,0):`=g:db=j:eb=2*(g+(640-g)/2):fb=g*2+32:gb=512:hb=4*(g/2/2):ib=4*(j/2):�f(B$,j$,30,-640,780,1/2,1):�a(80):�q(1):�b(f,"iconbar12",0,0):�z("!Desktop12",0,0):�a(80):�q(3):ȗ�hb,ib:ș46,292,l,"Pointer",1 X*Pointer 1 ]ȗ�1 b��jb=0�15:�B(jb):�:�a(80):�q(0):�b(f,"Filer12",80,400):�a(80):�la(144,472):�q(2):�b(f,"Menu12",48,148):�a(100):�w=0�3:�C(w,2):�:�a(50):�w=0�3:�C(w,1):�:�i(A,B$,j$,30,-640,780):�jb=15�0�-1:�B(jb):�:ȗ�:� g l��ka:�i=0�(16+4)*6-1:�i?kb q�:� v {��B(lb):Ȗ:�_=1�3:�19,_,25 �"�i=0�2:�255-lb*(255-a(_,i))/16 � �:�:� � �w��la(mb,nb):ȗB,C,ob:pb=mb-B:qb=nb-C:rb=�(pb*pb+qb*qb):sb=rb�8:�i=1�sb:Ȗ:ȗ�B,C:B+=(pb/sb):C+=(qb/sb):�:ȗ�mb,nb:� � �V��q(n):�f(�a$(n),1),s$,48,`a,ab-n*bb,k,k):�j(A,�a$(n),2),q$,32,`a+72,ab-n*bb+12):� � ���C(n,z):Ȏz� �'�1:�i(A,�a$(n),1),s$,48,`a,ab-n*bb) �-�2:�i(A,�a$(n),2),q$,32,`a+72,ab-w*bb+12) �� �� � ����r(L$,d$,M$):�a(50):�f(L$,t$,32,-eb,600,k,k):�a(50):�b(f,M$,tb,ub):d$+="|":G=gb:�:F=�d$,"|"):b$=�d$,F-1):d$=�d$,F+1):�j(A,b$,u$,20,fb,G):G-=64:�d$="":�a(150):� � �G��s:ș46,264,l�,,,vb:N=1:�:ș131118,269,l,U,64,N�;V:V=((V�1)=0):�V� � �?U=�"!"� �N+=1 ��:ș46,281,l,U �� �� �8��V:�m("Woids",`*2,0,640-`,db):�h(A,"Woids",`*2,0):� � ���X:�b(f,"!Desktop12",0,0):�c("!Paint"):�m("!Desktop12",0,0,`,db):�f(C$,j$,30,-640,780,1/2,1):�r("Paint",N$,"PaintIcon"):wb=120:xb=72:�b(f,"PaintWind",wb,xb):�a(100):�+0 �D�yb=1�13:�W,a$,x,y:�k(a$,wb+2+x,xb+48+y,W):�a(70):�:�a(400):�s:� � � 0,s0,466,112 � 3,s1,0,160 � 3,s2,508,132 � 3,s3,0,0 � 3,s4,0,164 � 3,s5,510,272 � 3,s6,42,24 %� 3,s7,18,352 *� 3,s8,12,288 /� 3,s9,162,156 4� 3,s10,164,188 9� 3,s11,530,288 >� 3,s12,206,412 C H���Z:�b(f,"!Desktop12",0,0):�c("!Draw"):�m("!Desktop12",0,0,`,db):�r("Draw",O$,"DrawIcon"):zb=96:Ab=32:�b(f,"DrawWind",zb,Ab):�k("DrawTools",zb-80,Ab+44,0):�a(50):�b(f,"Arm",zb+4,Ab+48):�a(400):�h(f,"Arm",zb+4,Ab+48):�a(100):�+0 M_�yb=1�18:�W,a$,x,y,Aa:�k(a$,zb+8+x,Ab+32+y,W):�a(Aa):�:�a(200):�s:�i(A,C$,j$,30,-640,780):� R W� 0,a,64,340,80 \� 0,b,526,80,80 a� 0,a-fill,64,340,80 f� 0,b-fill,526,80,80 k� 3,d1,102,336,15 p� 3,d2,140,332,10 u� 3,d3,178,328,9 z� 3,d4,218,328,8 � 3,d5,254,308,7 �� 3,d6,292,284,6 �� 3,d7,330,264,5 �� 3,d8,360,240,4 �� 3,d9,386,216,4 �� 3,d10,410,196,4 �� 3,d11,436,172,4 �� 3,d12,460,148,4 �� 3,d13,484,128,4 �� 3,d14,504,104,4 � ����_:�b(f,"!Desktop12",0,0):�c("!Maestro"):�m("!Desktop12",0,0,`,db):�f(D$,j$,30,-640,780,1/2,0):�r("Maestro",P$,"MusicIcon"):Bb=24:Cb=24:�b(f,"MaestroWind",Bb,Cb):�24,Bb+2;Cb+128;Bb+800;Cb+524; �$�Db=0�1208�8:�Db>1200x=1200�x=Db �5șo:ș46,290,l,"music",Bb+2-x,Cb+128:�Db=8�a(100) � �:�26 ��a(300):�s:� � Գ��`:�b(f,"!Desktop12",0,0):�c("!Start"):�m("!Desktop12",0,0,`,db):�r("StartWrite",Q$,"StartIcon"):Fb=16:Gb=144:�b(f,"StartWind",Fb,Gb):șr,1:�ma:�na(Hb):șr,2:șu:�a(400):�s:� � ����ma:v$="*QWERTYUIOP*ASDFGHJKL*ZXCVBNM,.*":y=0:Ib=�:Jb=0:b$="":X$="":Kb=�c(u$,20):ș262290,Kb,0,1,6:Lb=816:Mb=348:Nb=32:Ob=372:Pb=Lb-2*Nb:ș262281,,1,Pb�,Qb,Pb:ș262276,Kb�,,Rb,,Sb:Tb=Sb-Rb:Ub=5:Vb=40:� � �<��na(Wb):ȑFb+2,Gb+44:ȕ?Wb<>0:�oa(�?Wb):Wb+=1:�:ȑ0,0:� � ���oa(m$):Ȏm$� ��"~":�a(40+�(30)) �ɽ10:b$="":�D ɽ127,"<":�b$<>""�F:�a(5) :�m$>=" "� �(40)=1�m$<>" "�Vb=0� 1�G(�f(m$)):�a(20+�(20)):�F:�a(20+�(20)):Vb=20 �:�Vb>0Vb-=1 � �a(�(7)+2):�G(m$) $� )� .� 3 8G��G(c$):b$+=c$:ș262305,Kb,b$,1<<20,Pb,0�,,,,,,,Xb:Zb=(�b$>Xb):�Zb� =7ȕ�b$,Xb,1)<>" ":Xb-=1:�:�H(�b$-Xb):b$=�b$,Xb+1):�D B� G �pa(b$):� L Q��D:�y=Ub� V8�128:ȓȐ0,0,Lb,Mb�0,Tb:�2:�26,0,26,Tb:�800,0,800,Tb [ �:y+=1 `� e� j o��F:�H(1):b$=�b$):� t y1��pa(R$):ș262278,Kb,R$,16,Fb+Nb,Gb+Ob-y*Tb:� ~ ����H(_b):ș262277,,b$,Pb,Pb,-1,�b$�,,`b:ș262277,,�b$,�b$-_b),Pb,Pb,-1,�b$�,,ac:ac=ac�Qb:`b=`b�Qb:�0:ȓȐNb+ac-2,Ob-y*Tb-2,`b-ac,-Tb-6:� � �1ݤf(k$):bc=(k$>="a"�k$<="z"):�bc k$=�(�k$-32) ��v$,k$)>0� �)�:n$=�v$,�v$,k$)+��,1):�n$<>"*":k$=n$ �� �#�bc�k$>="A"�k$<="Z"k$=�(�k$+32) �=k$ ���aa:�i(A,D$,j$,30,-640,780):�b(f,"!Desktop12",0,0):�h(A,"!Desktop12",0,0):�h(A,"!sm12_A3010",0,P):Ȗ:�0,0,0,0:�128:�:șu:� � �{��ba:�v(13):șr,2:�c("Game1"):�a(50):�w("Fun","Zool","Game2"):�w("And","Lemmings","Game3"):�w("Games","ChuckRock",""):� � �/��w(e$,S$,F$):�b(f,S$,0,-512):�F$<>""�c(F$) �M�a(240):�:șo:�:șo:�b(f+1,e$,-640,-512):�a(120):�o(e$,-640,-512,k,k,0):� � �:��ca:�n:�c("Computer"):�d("Computer",-640,P,1/2,0):�+0 �G�Fa=1�2:�w$:�j(f,w$,t$,40,-640,360):F=244:�b$:�:�a(40):�b$,1)="/"� ��j(f,�b$,2),q$,30,-640,F) ��:�j(f,b$,x$,30,-640,F) �� �#F-=80:�b$:�b$="*":�a(400):ȎFa� � �1:�+0 �F=244:�w$,b$:�:�b$,1)="/"� ��i(f,�b$,2),q$,30,-640,F) ��:�i(f,b$,x$,30,-640,F) � -F-=80:�b$:�b$="*":�i(f,w$,t$,40,-640,360) �2:�n:�A � � � "It�s Entertaining . . ." &� "32-bit power, superb graphics," #"� "stereo sound and joysticks" ($� "enhance the realism and make" -(� "the A3010 an ideal games machine" 2� * 7� ". . . and Educational" <%� "The A3010 is one of the range" A"� "of Acorn computers used in" F � "almost all U.K. schools." K � "/- The educated choice. " P� * U� Z _���M:�v(13):șr,2:�c(4),d(4),b(10),cc 10,a(3,2),a$(3):c()=0,0,1,0,-1:d()=0,1,0,-1,0:Oa=�b("A3010Data93:Narrow"):kb=�b("A3010Data93:WimpPal"):pa=�b("A3010Data93:Crack"):Hb=�b("A3010Data93:Words"):f=0:A=2:dc=3:ec=4 dRfc=0:gc=1:hc=0:ic=1:k=1/2:ha=10000:P=10000:ta=800:H=444:D=452:tb=660:ub=20:�+0 i\�H$:�J$:�K$:�B$:�C$:�D$:�N$:�O$:�P$:�Q$:�Z$:�_$:a$()="Windows","Icons","Menus","Pointer" n%� "Will connect to a domestic TV" s#� "Supports standard joysticks" x(� "Can connect to external speakers" }$� "Easy to use operating system" �&� "Built-in applications include:" �"� "Bundled software includes:" �<� "A simple to use|yet very versatile|painting program." �`� "An object-based|drawing package|that can be used|for all sorts of|computer aided|design." �{� "A huge range of|musical styles|can be composed|and played using|Maestro.|MIDI capability|can be added to|the A3010." �<� "A no nonsense|word processor|simply type and|print! " � � ". . . It grows your mind" � � "It blows your mind . . ." �� � ����N:�U 64:ș41,28,"A3010Sprites93:"�,,,jc:�b$(jc),e(jc),f(jc):kc=0:lc=0:�:ș12,10,"A3010Sprites93:",U,1,kc,64�,,,,kc:�kc<>-1� ��f$="":i=20:ȕU?i<>0:f$+=�(U?i):i+=1:�:�mc U!8:ș8,255,"A3010Sprites93:"+f$,mc:b$(kc)=�d(f$):e(kc)=mc+20:f(kc)=U!8-20:ș"A3010_LoadSquashed","A3010Sprites93:"+f$�nc:�nc>lc lc=nc �� �I�kc=-1:lc+=64:�l lc:!l=lc:l!8=16:ș46,265,l:ș272129,8,lc�oc:�pc oc:� ����J:v=�a("OS_SpriteOp"):qc=�a("A3010_ReadMode"):rc=�a("A3010_PlotShrunk"):sc=�a("A3010_ClearArea"):u=�a("A3010_CopyMemory"):L=�a("A3010_PlotFaded"):r=�a("A3010_Banks"):o=�a("A3010_SwapBanks"):Ka=�a("A3010_PlotOnWhite") �Ytc=�a("A3010_TVInterference"):uc=�a("A3010_LoadSquashed"):qa=�a("A3010_MaskShrunk"):� � �ݤa(T$):ș57,,T$�vc:=vc �N��c(a$):a$=�d(a$):N=jc+1:�:N-=1:�a$=b$(N)�N=0:�N=0�214,"Sprites not found" �&ș272129,4,pc,e(N),f(N),l+4,lc-4:� � �Eݤd(i$):o$="":�wc=1��i$:c$=�i$,wc,1):�c$>="A"�c$<="Z"c$=�(�c$+32) �o$+=c$:�:=o$ �8��qa(a$,b,e,W):�e(a$,b,e,�):șo:șv,290,l,a$,b,e,W:� � �J��k(a$,b,e,W):�e(a$,b,e,�):șv,290,l,a$,b,e,W:șo:șv,290,l,a$,b,e,W:� I��m(a$,b,e,w,h):șv,272,l,a$,0,b,e,b+(w-1)*R,e+(h-1)*4:șv,310,l,a$:� R��z(a$,b,e):�e(a$,b,e,�):șv,272,l,a$,0,b,e,b+(g-1)*R,e+(j-1)*4:șv,310,l,a$:� +��b(s,a$,b,e):�e(a$,b,e,�):za=15:��=12� "�s=f s=dc:za=8 '�s=A s=ec:za=8 ,� 1,�I=za�0�-1:șo:șL,m,b,e,g,j,I,s:��=12Ȗ 6�:șo:șL,m,b,e,g,j,0,s:� ; @*��h(s,a$,b,e):�e(a$,b,e,�):Z=15:��=12� E�s=f s=dc:Z=8 J�s=A s=ec:Z=8 O� T:�I=0�Z:șo:șL,m,b,e,g,j,I,s:�:șo:șL,m,b,e,g,j,Z,s:� Y ^���d(a$,b,e,B,C):�e(a$,b,e,�):Q=b+g*B*R/4:S=e+j*C:T=1.2:sb=�(�(65536/128)/�(T)):�i=sb�0�-1:t=T^i:x=Q+(b-Q)/t:y=S+(e-S)/t:șo:șrc,m,x,y,g,j,65536/t,65536/t:�:șo:șrc,m,x,y,g,j,65536/t,65536/t:� c h���o(a$,b,e,B,C,xc):�e(a$,b,e,�):Q=b+g*B*R/4:S=e+j*C:T=1.2:sb=�(�(65536/128)/�(T)):�i=0�sb:t=T^i:x=Q+(b-Q)/t:y=S+(e-S)/t:șo:ș"A3010_ClearArea",xc,b,e,g,j:șrc,m,x,y,g,j,65536/t,65536/t:�:ș"A3010_ClearArea",xc,b,e,g,j:șo m$ș"A3010_ClearArea",xc,b,e,g,j:� r w7��j(s,d$,h$,a%,b,e):�t(d$,h$,a%,b,e):�b(s,"",b,e):� | �7��i(s,d$,h$,a%,b,e):�t(d$,h$,a%,b,e):�h(s,"",b,e):� � ���y(s):�I:�h(s,"",yc,zc):� � �;��f(d$,h$,a%,b,e,B,C):�t(d$,h$,a%,b,e):�d("",b,e,B,C):� � �B��da(d$,h$,a%,b,e,B,C,xc):�t(d$,h$,a%,b,e):�o("",b,e,B,C,xc):� � �)��ea(B,C,xc):�I:�o("",yc,zc,B,C,xc):� � �A��I:șv,296,O,"words"�,,,g,j:șv,280,O,"words"�,,m:m=m+m!32:� � �(��e(a$,�x,�y,Ac):�a$<>""�l(a$,g,j,m) ��x<0x=-x-(g*R)/2 � �x>1280x=1280-(g+1)*R-(ha-x) ��y<0y=-y-(j*4)/2 ��y>1024y=1024-(j+1)*4-(P-y) ��Ac� �x=x�4:y=256-(y�4)-j �� �� � �D��l(a$,�w,�h,�a):șv,296,l,a$�,,,w,h:șv,280,l,a$�,,a:a=a+a!32:� � �"��a(Ca):Da=�:���>Da+Ca���-99:� � ���L:u$="Trinity.Medium":z$=u$+".Italic":U$="Trinity.Bold":t$=U$+".Italic":x$="Homerton.Medium":q$=x$+".Oblique":V$="Homerton.Bold":j$=V$+".Oblique":s$="Corpus.Medium":`$=s$+".Oblique":W$="Corpus.Bold":aa$=W$+".Oblique" Nș262281,,1280,1�,Bc,Cc:y$="":�c=32�126:y$+=�c:�:y$+="����":�ra(48*1024):� ���t(d$,h$,a%,�J,G):Dc=�c(h$,�a%):ș262295,Dc,y$�,,Fc,,Gc:ș262295,Dc,d$�,Hc,,Ic:Jc=4*�(-Fc/(Cc*4)+0.5):Kc=8*�(Ic/(Cc*8)+0.5):Lc=4*�((Gc-Fc)/(Cc*4)+0.5):Ȏ�� �12:ș262290,Dc,7,6,-6 �13:�a%<0� !ș262291,,0,1,14,0,-256 &�:ș262291,,0,1,14,-256,0 +� 0ș262290,Dc,0,1,14 5:�1,"Bad mode" :� ?�J<0J=-J-Kc/2 DlMc=16*(J�16):Kc=(Kc+J-Mc+2)��2:�sa(Kc,Lc+4):ș262278,Dc,d$,16,J-Mc,Jc+4:ș262274,Dc:�ta:J=Mc:yc=J:zc=G:� I N>ݤc(h$,a%):ș262273,,h$,a%*16,a%*16,0,0�Nc:ș262282,Nc:=Nc S��sa(Oc,Pc):��=12� X g=Oc�2 ]�:g=Oc�4 b� g\j=Pc�4:șv,271,O,"words",0,g,j,�:șv,316,O,"words":șv,280,O,"words"�,,m:m=m+m!32:��=12� l �128+7 q�:�a%<0� v �128+0Ȝ0 {�:�128+63Ȝ192 �� �� ��:� � ���ta:șv,316,O,,1:� � �+��ra(Qc):�O Qc:!O=Qc:O!8=16:șv,265,O:� � �o��n:șu,,l+4:ș47,0,24�,,K:K=(K>>>8)�(15790320):ra=(K=15790320):q=0:�I=0�15:șo:�ra�19,0,24,q*17,q*17,q*17 �=șL,l+4,0,0,320,256,I,0:q=I:�:�ra�19,0,24,q*17,q*17,q*17 �"șo:șL,l+4,0,0,320,256,15,0:� � �i��A:șu,,l+4:ș47,0,24�,,K:K=(K>>>8)�(15790320):Rc=(K=0):q=15:�I=0�15:șo:�Rc�19,0,24,q*17,q*17,q*17 �@șL,l+4,0,0,320,256,I,2:q=15-I:�:�Rc�19,0,24,q*17,q*17,q*17 �"șo:șL,l+4,0,0,320,256,15,2:� � �9��v(Sc):șu:Ȗ:�15:�Sc:�:ș"A3010_ReadMode":�Sc=12R=2 � �Sc=13R=4 �� � �Yݤb(G$):�:ș131080,5,G$�,,,,nc;V:�(V�1)=0:�mc nc:�:ș131080,255,G$,mc�;V:�(V�1)=0:=mc �;ݤe(Tc):șv,264,l�,,Uc,,,Vc:�Uc-Vc<Tc�1,"Out of memory" � =l+Vc �
00000000 0d 00 05 2b f4 3e 61 64 66 73 3a 3a 61 66 72 61 |...+.>adfs::afra| 00000010 6e 63 65 2e 24 2e 64 6c 6e 65 77 2e 21 64 65 6d |nce.$.dlnew.!dem| 00000020 6f 2e 21 52 75 6e 69 6d 61 67 65 0d 00 0a 59 3a |o.!Runimage...Y:| 00000030 eb 31 35 3a eb 31 33 3a 87 3a c8 99 32 36 32 33 |.15:.13:.:..2623| 00000040 30 30 b8 61 61 2c 62 61 2c 63 61 2c 64 61 2c 65 |00.aa,ba,ca,da,e| 00000050 61 2c 66 61 3a 67 61 3d 36 30 2a 37 32 2a 31 36 |a,fa:ga=60*72*16| 00000060 3a c8 99 32 36 32 32 39 39 2c 61 61 2c 67 61 2c |:..262299,aa,ga,| 00000070 67 61 2c 67 61 2c 65 61 2c 66 61 3a 3a f2 4a 3a |ga,ga,ea,fa::.J:| 00000080 ee 85 f2 4b 0d 00 0f 5a c8 99 22 41 33 30 31 30 |...K...Z.."A3010| 00000090 5f 52 65 61 64 4d 6f 64 65 22 3a f2 4c 3a f2 4d |_ReadMode":.L:.M| 000000a0 3a f2 4e 3a 3a f5 3a f2 4f 3a f2 50 3a 3a f2 51 |:.N::.:.O:.P::.Q| 000000b0 3a f2 52 3a f2 53 3a f2 54 3a f2 55 3a f2 56 3a |:.R:.S:.T:.U:.V:| 000000c0 3a f2 57 3a f2 58 3a f2 5a 3a f2 5f 3a f2 60 3a |:.W:.X:.Z:._:.`:| 000000d0 f2 61 61 3a f2 62 61 3a f2 63 61 3a fd a3 0d 00 |.aa:.ba:.ca:....| 000000e0 14 0b dd f2 4b 3a ee 85 87 0d 00 19 17 c8 99 72 |....K:.........r| 000000f0 2c 31 3a c8 99 32 36 32 33 38 33 2c 2d 31 3a e0 |,1:..262383,-1:.| 00000100 0d 00 1e 04 0d 00 23 50 dd f2 4f 3a f2 63 28 22 |......#P..O:.c("| 00000110 41 63 6f 72 6e 41 33 30 31 30 22 29 3a f2 64 28 |AcornA3010"):.d(| 00000120 22 41 33 30 31 30 22 2c 2d 36 34 30 2c 50 2c 6b |"A3010",-640,P,k| 00000130 2c 6b 29 3a f2 64 28 22 41 63 6f 72 6e 22 2c 2d |,k):.d("Acorn",-| 00000140 36 34 30 2c 30 2c 6b 2c 6b 29 3a f2 61 28 33 30 |640,0,k,k):.a(30| 00000150 30 29 3a e1 0d 00 28 04 0d 00 2d e8 dd f2 50 3a |0):...(...-...P:| 00000160 f2 6e 3a f2 63 28 22 48 61 72 64 77 61 72 65 22 |.n:.c("Hardware"| 00000170 29 3a f2 64 28 22 43 6f 6d 70 75 74 65 72 2b 4d |):.d("Computer+M| 00000180 22 2c 2d 36 34 30 2c 33 32 2c 6b 2c 6b 29 3a f2 |",-640,32,k,k):.| 00000190 63 28 22 41 63 74 69 6f 6e 22 29 3a f2 61 28 35 |c("Action"):.a(5| 000001a0 30 29 3a f2 64 28 22 41 63 74 69 6f 6e 22 2c 30 |0):.d("Action",0| 000001b0 2c 50 2c 30 2c 30 29 3a f2 64 28 22 50 61 63 6b |,P,0,0):.d("Pack| 000001c0 22 2c 68 61 2c 50 2c 6b 2c 6b 29 3a f2 63 28 22 |",ha,P,k,k):.c("| 000001d0 48 61 72 64 77 61 72 65 22 29 3a f2 61 28 35 30 |Hardware"):.a(50| 000001e0 29 3a f2 62 28 66 2c 22 4d 6f 6e 69 74 6f 72 22 |):.b(f,"Monitor"| 000001f0 2c 2d 36 34 30 2c 33 36 30 29 3a f2 61 28 32 30 |,-640,360):.a(20| 00000200 29 3a f2 62 28 41 2c 22 54 56 64 65 73 6b 74 6f |):.b(A,"TVdeskto| 00000210 70 22 2c 48 2c 44 29 3a f2 63 28 22 5a 6f 6f 6c |p",H,D):.c("Zool| 00000220 22 29 3a f2 61 28 31 30 30 29 3a 58 3d a4 65 28 |"):.a(100):X=.e(| 00000230 38 30 2a 31 30 32 34 29 3a c8 99 75 2c 30 2c 58 |80*1024):..u,0,X| 00000240 0d 00 32 52 c8 99 72 2c 32 3a 69 61 3d 34 34 38 |..2R..r,2:ia=448| 00000250 3a 6a 61 3d 34 33 36 3a 6b 61 3d 38 33 32 3a 6c |:ja=436:ka=832:l| 00000260 61 3d 37 31 32 3a 62 3d 28 69 61 2b 6b 61 29 2f |a=712:b=(ia+ka)/| 00000270 32 3a 65 3d 28 6a 61 2b 6c 61 29 2f 32 3a ef 32 |2:e=(ja+la)/2:.2| 00000280 34 2c 34 34 38 3b 34 33 36 3b 38 33 32 3b 37 31 |4,448;436;832;71| 00000290 32 3b 0d 00 37 84 61 24 3d 22 5a 6f 6f 6c 22 3a |2;..7.a$="Zool":| 000002a0 6d 61 3d 2d 36 34 30 3a 6e 61 3d 31 34 30 3a 42 |ma=-640:na=140:B| 000002b0 3d 31 2f 32 3a 43 3d 31 2f 32 3a f2 65 28 61 24 |=1/2:C=1/2:.e(a$| 000002c0 2c 6d 61 2c 6e 61 2c b9 29 3a 51 3d 6d 61 2b 67 |,ma,na,.):Q=ma+g| 000002d0 2a 42 2a 52 2f 34 3a 53 3d 6e 61 2b 6a 2a 43 3a |*B*R/4:S=na+j*C:| 000002e0 54 3d 31 2e 34 3a 6f 61 3d a8 28 aa 28 36 35 35 |T=1.4:oa=.(.(655| 000002f0 33 36 2f 32 35 36 29 2f aa 28 54 29 29 3a 6e 3d |36/256)/.(T)):n=| 00000300 30 3a f5 3a c8 99 6f 3a c8 99 75 2c 58 2c 30 3a |0:.:..o:..u,X,0:| 00000310 e7 6e 3c 33 30 8c 0d 00 3c 22 c8 99 37 30 2c 70 |.n<30...<"..70,p| 00000320 61 2b 6e 2a 33 36 32 2c 33 36 32 3a e7 6e 3d 32 |a+n*362,362:.n=2| 00000330 39 c8 99 75 2c 30 2c 58 0d 00 41 05 cd 0d 00 46 |9..u,0,X..A....F| 00000340 0a e7 6e 3e 31 30 8c 0d 00 4b 49 74 3d 54 5e 6f |..n>10...KIt=T^o| 00000350 61 3a 78 3d 51 2b 28 6d 61 2d 51 29 2f 74 3a 79 |a:x=Q+(ma-Q)/t:y| 00000360 3d 53 2b 28 6e 61 2d 53 29 2f 74 3a c8 99 71 61 |=S+(na-S)/t:..qa| 00000370 2c 6d 2c 78 2c 79 2c 67 2c 6a 2c 36 35 35 33 36 |,m,x,y,g,j,65536| 00000380 2f 74 2c 36 35 35 33 36 2f 74 3a 6f 61 2d 3d 31 |/t,65536/t:oa-=1| 00000390 0d 00 50 05 cd 0d 00 55 a6 6e 2b 3d 31 3a fd 6f |..P....U.n+=1:.o| 000003a0 61 3c 30 3a c8 99 6f 3a c8 99 75 2c 58 3a c8 99 |a<0:..o:..u,X:..| 000003b0 71 61 2c 6d 2c 78 2c 79 2c 67 2c 6a 2c 36 35 35 |qa,m,x,y,g,j,655| 000003c0 33 36 2f 74 2c 36 35 35 33 36 2f 74 3a f2 61 28 |36/t,65536/t:.a(| 000003d0 32 30 30 29 3a 3a c8 99 75 2c 2c 58 3a c8 99 34 |200)::..u,,X:..4| 000003e0 37 2c 30 2c 32 34 b8 2c 2c 4b 3a 4b 3d 28 4b 3e |7,0,24.,,K:K=(K>| 000003f0 3e 3e 38 29 80 28 31 35 37 39 30 33 32 30 29 3a |>>8).(15790320):| 00000400 72 61 3d 28 4b 3d 31 35 37 39 30 33 32 30 29 3a |ra=(K=15790320):| 00000410 71 3d 30 3a e3 49 3d 30 b8 31 35 3a c8 99 6f 3a |q=0:.I=0.15:..o:| 00000420 e7 ac 72 61 ef 31 39 2c 30 2c 32 34 2c 71 2a 31 |..ra.19,0,24,q*1| 00000430 37 2c 71 2a 31 37 2c 71 2a 31 37 0d 00 5a 56 c8 |7,q*17,q*17..ZV.| 00000440 99 4c 2c 58 2c 30 2c 30 2c 33 32 30 2c 32 35 36 |.L,X,0,0,320,256| 00000450 2c 49 2c 30 3a c8 99 71 61 2c 6d 2c 78 2c 79 2c |,I,0:..qa,m,x,y,| 00000460 67 2c 6a 2c 36 35 35 33 36 2c 36 35 35 33 36 3a |g,j,65536,65536:| 00000470 71 3d 49 3a ed 3a e7 ac 72 61 ef 31 39 2c 30 2c |q=I:.:..ra.19,0,| 00000480 32 34 2c 71 2a 31 37 2c 71 2a 31 37 2c 71 2a 31 |24,q*17,q*17,q*1| 00000490 37 0d 00 5f 49 c8 99 6f 3a c8 99 4c 2c 58 2c 30 |7.._I..o:..L,X,0| 000004a0 2c 30 2c 33 32 30 2c 32 35 36 2c 31 35 2c 30 3a |,0,320,256,15,0:| 000004b0 c8 99 71 61 2c 6d 2c 78 2c 79 2c 67 2c 6a 2c 36 |..qa,m,x,y,g,j,6| 000004c0 35 35 33 36 2c 36 35 35 33 36 3a f2 61 28 31 30 |5536,65536:.a(10| 000004d0 30 29 3a c8 99 72 2c 31 3a e1 0d 00 64 04 0d 00 |0):..r,1:...d...| 000004e0 69 65 dd f2 51 3a f2 6e 3a f2 63 28 22 48 61 72 |ie..Q:.n:.c("Har| 000004f0 64 77 61 72 65 22 29 3a f2 62 28 66 2c 22 73 6d |dware"):.b(f,"sm| 00000500 77 5f 41 33 30 31 30 22 2c 30 2c 50 29 3a f2 64 |w_A3010",0,P):.d| 00000510 28 22 43 6f 6d 70 75 74 65 72 2b 4d 22 2c 2d 36 |("Computer+M",-6| 00000520 34 30 2c 33 32 2c 6b 2c 6b 29 3a f2 62 28 66 2c |40,32,k,k):.b(f,| 00000530 22 73 6d 77 5f 61 63 6f 72 6e 22 2c 68 61 2c 30 |"smw_acorn",ha,0| 00000540 29 3a e1 0d 00 6e 04 0d 00 73 17 dd f2 52 3a 4d |):...n...s...R:M| 00000550 3d 30 3a e3 73 61 3d 30 b8 31 3a f7 2b 30 0d 00 |=0:.sa=0.1:.+0..| 00000560 78 14 dc 20 22 33 32 2d 62 69 74 20 70 6f 77 65 |x.. "32-bit powe| 00000570 72 22 0d 00 7d 12 dc 20 22 32 4d 42 20 6f 66 20 |r"..}.. "2MB of | 00000580 52 4f 4d 22 0d 00 82 15 dc 20 22 55 70 20 74 6f |ROM"..... "Up to| 00000590 20 34 4d 42 20 52 41 4d 22 0d 00 87 14 e3 46 3d | 4MB RAM".....F=| 000005a0 30 b8 32 3a f3 65 24 3a c8 8e 73 61 ca 0d 00 8c |0.2:.e$:..sa....| 000005b0 26 c9 30 3a f2 66 28 65 24 2c 7a 24 2c 34 38 2c |&.0:.f(e$,z$,48,| 000005c0 2d 36 34 30 2c 37 30 30 2d 46 2a 31 37 30 2c 4d |-640,700-F*170,M| 000005d0 2c 6b 29 0d 00 91 2b c9 31 3a f2 64 61 28 65 24 |,k)...+.1:.da(e$| 000005e0 2c 7a 24 2c 34 38 2c 2d 36 34 30 2c 37 30 30 2d |,z$,48,-640,700-| 000005f0 46 2a 31 37 30 2c 4d 2c 6b 2c 32 35 35 29 0d 00 |F*170,M,k,255)..| 00000600 96 05 cb 0d 00 9b 18 4d 3d 4d 82 31 3a ed 3a e7 |.......M=M.1:.:.| 00000610 73 61 3d 30 f2 61 28 33 30 30 29 0d 00 a0 07 ed |sa=0.a(300).....| 00000620 3a e1 0d 00 a5 04 0d 00 aa 97 dd f2 53 3a f2 62 |:...........S:.b| 00000630 28 66 2c 22 4d 6f 6e 69 74 6f 72 22 2c 2d 36 34 |(f,"Monitor",-64| 00000640 30 2c 33 36 30 29 3a f2 6a 28 66 2c 48 24 2c 6a |0,360):.j(f,H$,j| 00000650 24 2c 33 30 2c 2d 36 34 30 2c 74 61 29 3a f2 78 |$,30,-640,ta):.x| 00000660 28 22 4e 65 77 73 22 2c 35 2c 48 2c 44 2c 33 29 |("News",5,H,D,3)| 00000670 3a f2 78 28 22 54 56 64 65 73 6b 74 6f 70 22 2c |:.x("TVdesktop",| 00000680 31 2c 48 2c 44 2c 30 29 3a f2 61 28 31 30 30 29 |1,H,D,0):.a(100)| 00000690 3a f2 6f 28 22 54 56 64 65 73 6b 74 6f 70 22 2c |:.o("TVdesktop",| 000006a0 48 2c 44 2c 31 2f 32 2c 31 2f 32 2c 30 29 3a f2 |H,D,1/2,1/2,0):.| 000006b0 65 61 28 6b 2c 6b 2c 32 35 35 29 3a e1 0d 00 af |ea(k,k,255):....| 000006c0 04 0d 00 b4 1c dd f2 78 28 72 24 2c 75 61 2c 62 |.......x(r$,ua,b| 000006d0 2c 65 2c 76 61 29 3a e7 75 61 3e 31 8c 0d 00 b9 |,e,va):.ua>1....| 000006e0 2b e3 77 61 3d 31 b8 75 61 3a f2 6c 28 72 24 2b |+.wa=1.ua:.l(r$+| 000006f0 c3 77 61 2c 77 2c 68 2c 62 28 77 61 29 29 3a ed |.wa,w,h,b(wa)):.| 00000700 3a 72 24 2b 3d 22 31 22 0d 00 be 05 cd 0d 00 c3 |:r$+="1"........| 00000710 1c f2 65 28 72 24 2c 62 2c 65 2c b9 29 3a 78 61 |..e(r$,b,e,.):xa| 00000720 3d 91 3a e7 76 61 80 31 8c 0d 00 c8 19 e3 79 61 |=.:.va.1......ya| 00000730 3d 30 b8 31 36 3a f2 67 28 30 2c 79 61 2c 38 29 |=0.16:.g(0,ya,8)| 00000740 3a ed 0d 00 cd 05 cd 0d 00 d2 64 f2 70 28 30 2c |:.........d.p(0,| 00000750 32 32 34 2c 38 2c 35 29 3a f2 70 28 32 32 34 2c |224,8,5):.p(224,| 00000760 32 34 38 2c 38 2c 31 30 29 3a f2 70 28 32 34 38 |248,8,10):.p(248| 00000770 2c 32 35 34 2c 32 2c 34 29 3a f2 67 28 32 35 34 |,254,2,4):.g(254| 00000780 2c 31 36 2c 32 30 29 3a f2 67 28 32 35 35 2c 31 |,16,20):.g(255,1| 00000790 36 2c 34 30 29 3a f2 67 28 32 35 36 2c 31 36 2c |6,40):.g(256,16,| 000007a0 34 30 30 29 3a e7 76 61 80 32 8c 0d 00 d7 3c f2 |400):.va.2....<.| 000007b0 67 28 32 35 35 2c 31 36 2c 34 30 29 3a f2 67 28 |g(255,16,40):.g(| 000007c0 32 35 33 2c 31 36 2c 34 30 29 3a f2 67 28 32 35 |253,16,40):.g(25| 000007d0 30 2c 31 36 2c 34 30 29 3a f2 70 28 32 35 35 2c |0,16,40):.p(255,| 000007e0 30 2c 2d 34 2c 30 29 0d 00 dc 05 cd 0d 00 e1 05 |0,-4,0).........| 000007f0 e1 0d 00 e6 04 0d 00 eb 39 dd f2 70 28 7a 61 2c |........9..p(za,| 00000800 5a 2c 6f 61 2c 41 61 29 3a e3 70 3d 7a 61 b8 5a |Z,oa,Aa):.p=za.Z| 00000810 88 6f 61 3a f2 67 28 70 2c 31 36 2c 41 61 29 3a |.oa:.g(p,16,Aa):| 00000820 ed 3a f2 67 28 5a 2c 31 36 2c 30 29 3a e1 0d 00 |.:.g(Z,16,0):...| 00000830 f0 04 0d 00 f5 26 dd f2 67 28 42 61 2c 79 61 2c |.....&..g(Ba,ya,| 00000840 43 61 29 3a 44 61 3d 91 3a f5 3a e7 91 3e 78 61 |Ca):Da=.:.:..>xa| 00000850 2b 36 80 75 61 3e 31 8c 0d 00 fa 1f 61 3d 6d 3a |+6.ua>1.....a=m:| 00000860 f5 3a 6d 3d 62 28 b3 28 75 61 29 29 3a fd 6d 3c |.:m=b(.(ua)):.m<| 00000870 3e 61 3a 78 61 3d 91 0d 00 ff 05 cd 0d 01 04 3b |>a:xa=.........;| 00000880 c8 99 6f 3a c8 99 22 41 33 30 31 30 5f 54 56 49 |..o:.."A3010_TVI| 00000890 6e 74 65 72 66 65 72 65 6e 63 65 22 2c 6d 2c 62 |nterference",m,b| 000008a0 2c 65 2c 67 2c 6a 2c 42 61 2c 79 61 3a fd 91 3e |,e,g,j,Ba,ya:..>| 000008b0 44 61 2b 43 61 3a e1 0d 01 09 04 0d 01 0e 0b dd |Da+Ca:..........| 000008c0 f2 54 3a f7 2b 30 0d 01 13 2a dc 20 22 48 69 67 |.T:.+0...*. "Hig| 000008d0 68 20 63 61 70 61 63 69 74 79 20 64 69 73 63 20 |h capacity disc | 000008e0 64 72 69 76 65 22 2c 64 69 73 63 5f 31 36 30 30 |drive",disc_1600| 000008f0 0d 01 18 88 dc 20 20 22 4f 6e 65 20 68 69 67 68 |..... "One high| 00000900 20 64 65 6e 73 69 74 79 20 64 69 73 63 20 77 69 | density disc wi| 00000910 6c 6c 20 68 6f 6c 64 20 74 77 69 63 65 20 61 73 |ll hold twice as| 00000920 20 6d 75 63 68 20 69 6e 66 6f 72 6d 61 74 69 6f | much informatio| 00000930 6e 20 61 73 20 61 6e 20 6f 72 64 69 6e 61 72 79 |n as an ordinary| 00000940 20 64 69 73 63 20 2d 20 65 6e 6f 75 67 68 20 74 | disc - enough t| 00000950 65 78 74 20 74 6f 20 63 6f 76 65 72 20 33 35 30 |ext to cover 350| 00000960 20 70 61 67 65 73 20 28 31 36 30 30 30 30 30 30 | pages (16000000| 00000970 20 62 79 74 65 73 29 22 0d 01 1d 31 dc 20 22 62 | bytes)"...1. "b| 00000980 75 74 20 63 61 6e 20 73 74 69 6c 6c 20 75 73 65 |ut can still use| 00000990 20 73 74 61 6e 64 61 72 64 20 64 69 73 63 73 22 | standard discs"| 000009a0 2c 64 69 73 63 5f 38 30 30 0d 01 22 43 dc 20 20 |,disc_800.."C. | 000009b0 22 54 68 65 73 65 20 68 6f 6c 64 20 6a 75 73 74 |"These hold just| 000009c0 20 6f 76 65 72 20 38 30 30 2c 30 30 30 20 63 68 | over 800,000 ch| 000009d0 61 72 61 63 74 65 72 73 20 6f 72 20 61 62 6f 75 |aracters or abou| 000009e0 74 20 31 37 30 20 70 61 67 65 73 22 0d 01 27 30 |t 170 pages"..'0| 000009f0 dc 20 22 57 69 6c 6c 20 65 76 65 6e 20 61 63 63 |. "Will even acc| 00000a00 65 73 73 20 61 6e 79 20 4d 53 44 4f 53 20 64 69 |ess any MSDOS di| 00000a10 73 63 21 22 2c 64 69 73 63 5f 70 63 0d 01 2c 47 |sc!",disc_pc..,G| 00000a20 dc 20 20 22 54 68 69 73 20 61 6c 6c 6f 77 73 20 |. "This allows | 00000a30 79 6f 75 20 74 6f 20 74 72 61 6e 73 66 65 72 20 |you to transfer | 00000a40 64 61 74 61 20 74 6f 20 61 6e 64 20 66 72 6f 6d |data to and from| 00000a50 20 61 20 50 43 20 77 69 74 68 6f 75 74 20 66 75 | a PC without fu| 00000a60 73 73 22 0d 01 31 26 dc 20 22 49 6e 74 65 72 6e |ss"..1&. "Intern| 00000a70 61 6c 20 48 61 72 64 20 64 69 73 63 20 6f 70 74 |al Hard disc opt| 00000a80 69 6f 6e 61 6c 22 2c 22 22 0d 01 36 50 dc 20 20 |ional",""..6P. | 00000a90 22 41 20 74 79 70 69 63 61 6c 20 68 61 72 64 20 |"A typical hard | 00000aa0 64 69 73 63 20 77 6f 75 6c 64 20 62 65 20 6c 61 |disc would be la| 00000ab0 72 67 65 20 65 6e 6f 75 67 68 20 74 6f 20 73 74 |rge enough to st| 00000ac0 6f 72 65 20 31 30 2c 30 30 30 20 70 61 67 65 73 |ore 10,000 pages| 00000ad0 20 6f 66 20 74 65 78 74 22 0d 01 3b 15 4d 3d 30 | of text"..;.M=0| 00000ae0 3a c8 99 72 2c 32 3a c8 99 75 3a ef 32 36 0d 01 |:..r,2:..u:.26..| 00000af0 40 1e e3 46 61 3d 31 b8 34 3a f3 49 24 2c 6c 24 |@..Fa=1.4:.I$,l$| 00000b00 2c 41 24 3a e7 46 61 3d 34 4d 3d 6b 0d 01 45 63 |,A$:.Fa=4M=k..Ec| 00000b10 f2 66 28 49 24 2c 6a 24 2c 33 30 2c 2d 36 34 30 |.f(I$,j$,30,-640| 00000b20 2c 74 61 2c 4d 2c 6b 29 3a f2 66 61 28 6c 24 2c |,ta,M,k):.fa(l$,| 00000b30 32 36 34 29 3a f2 61 28 33 30 29 3a f2 67 61 28 |264):.a(30):.ga(| 00000b40 41 24 29 3a f2 61 28 34 2a a9 41 24 29 3a f2 68 |A$):.a(4*.A$):.h| 00000b50 61 28 6c 24 2c 32 36 34 29 3a f2 69 61 3a f2 79 |a(l$,264):.ia:.y| 00000b60 28 66 29 3a 4d 3d 4d 82 31 3a ed 3a ef 32 36 0d |(f):M=M.1:.:.26.| 00000b70 01 4a 05 e1 0d 01 4f 04 0d 01 54 17 dd f2 66 61 |.J....O...T...fa| 00000b80 28 6c 24 2c 47 29 3a e7 6c 24 3c 3e 22 22 8c 0d |(l$,G):.l$<>""..| 00000b90 01 59 8b f2 62 28 66 2c 6c 24 2c 32 36 36 2a 34 |.Y..b(f,l$,266*4| 00000ba0 2c 47 29 3a 47 61 3d 30 3a 48 61 3d 47 3a f2 65 |,G):Ga=0:Ha=G:.e| 00000bb0 28 6c 24 2c 47 61 2c 47 2c b9 29 3a e6 30 2c 36 |(l$,Ga,G,.):.0,6| 00000bc0 33 c8 9c 31 39 32 3a c8 93 c8 90 32 36 36 2a 34 |3..192:....266*4| 00000bd0 2c 48 61 2c 67 2a 34 2c 6a 2a 34 3a c8 99 72 b8 |,Ha,g*4,j*4:..r.| 00000be0 49 61 2c 4a 61 3a c8 99 72 2c 31 3a e3 4a 3d 32 |Ia,Ja:..r,1:.J=2| 00000bf0 36 36 b8 32 32 30 88 2d 31 3a c8 96 3a c8 99 4b |66.220.-1:..:..K| 00000c00 61 2c 6d 2c 4a 2c 47 2c 67 2c 6a 2c 4a 61 3a ed |a,m,J,G,g,j,Ja:.| 00000c10 3a c8 99 72 2c 32 3a c8 99 75 0d 01 5e 05 cd 0d |:..r,2:..u..^...| 00000c20 01 63 05 e1 0d 01 68 04 0d 01 6d 17 dd f2 68 61 |.c....h...m...ha| 00000c30 28 6c 24 2c 47 29 3a e7 6c 24 3c 3e 22 22 8c 0d |(l$,G):.l$<>""..| 00000c40 01 72 6b c8 99 72 b8 49 61 2c 4a 61 3a c8 99 72 |.rk..r.Ia,Ja:..r| 00000c50 2c 31 3a 47 61 3d 30 3a 48 61 3d 47 3a f2 65 28 |,1:Ga=0:Ha=G:.e(| 00000c60 6c 24 2c 47 61 2c 47 2c b9 29 3a e3 4a 3d 32 32 |l$,Ga,G,.):.J=22| 00000c70 30 b8 32 36 36 88 32 3a c8 96 3a c8 99 4b 61 2c |0.266.2:..:..Ka,| 00000c80 6d 2c 4a 2c 47 2c 67 2c 6a 2c 4a 61 3a ed 3a c8 |m,J,G,g,j,Ja:.:.| 00000c90 99 72 2c 32 3a c8 99 75 3a f2 68 28 66 2c 22 22 |.r,2:..u:.h(f,""| 00000ca0 2c 32 36 36 2a 34 2c 48 61 29 0d 01 77 0d cc 3a |,266*4,Ha)..w..:| 00000cb0 f2 61 28 31 30 30 29 0d 01 7c 05 cd 0d 01 81 05 |.a(100)..|......| 00000cc0 e1 0d 01 86 04 0d 01 8b 44 dd f2 67 61 28 65 24 |........D..ga(e$| 00000cd0 29 3a c8 99 72 2c 31 3a f2 6c 28 22 54 56 64 65 |):..r,1:.l("TVde| 00000ce0 73 6b 74 6f 70 22 2c 67 2c 6a 2c 61 29 3a f2 6a |sktop",g,j,a):.j| 00000cf0 61 3a ef 32 34 2c 48 3b 44 3b 31 32 37 39 3b 44 |a:.24,H;D;1279;D| 00000d00 2b 28 6a 2d 31 29 2a 34 3b 0d 01 90 17 e6 31 32 |+(j-1)*4;.....12| 00000d10 38 3a e6 36 33 c8 9c 31 39 32 3a ef 35 2c 33 30 |8:.63..192:.5,30| 00000d20 0d 01 95 3e 65 24 2b 3d 22 20 22 3a 4c 61 3d 67 |...>e$+=" ":La=g| 00000d30 81 36 3a 4d 61 3d 30 3a f5 3a 4e 61 3d a7 65 24 |.6:Ma=0:.:Na=.e$| 00000d40 2c 22 20 22 29 3a 70 24 3d c0 65 24 2c 4e 61 2d |," "):p$=.e$,Na-| 00000d50 31 29 3a e7 4d 61 2b a9 70 24 3e 4c 61 8c 0d 01 |1):.Ma+.p$>La...| 00000d60 9a 0a f1 3a 4d 61 3d 30 0d 01 9f 05 cd 0d 01 a4 |...:Ma=0........| 00000d70 26 e3 69 3d 31 b8 a9 70 24 3a c8 96 3a c8 96 3a |&.i=1..p$:..:..:| 00000d80 ef 97 c1 70 24 2c 69 2c 31 29 3a ec 42 59 20 2d |...p$,i,1):.BY -| 00000d90 38 2c 30 0d 01 a9 38 ed 3a 4d 61 2b 3d 28 a9 70 |8,0...8.:Ma+=(.p| 00000da0 24 2b 31 29 3a ec 42 59 20 33 32 2d 38 2c 30 3a |$+1):.BY 32-8,0:| 00000db0 65 24 3d c1 65 24 2c 4e 61 2b 31 29 3a fd 65 24 |e$=.e$,Na+1):.e$| 00000dc0 3d 22 22 3a ef 32 36 2c 34 3a 87 0d 01 ae 0d c8 |="":.26,4:......| 00000dd0 99 72 2c 32 3a c8 99 75 0d 01 b3 09 2a 46 58 32 |.r,2:..u....*FX2| 00000de0 30 0d 01 b8 05 e1 0d 01 bd 04 0d 01 c2 23 dd f2 |0............#..| 00000df0 6a 61 3a e3 69 3d 30 b8 28 31 32 37 2d 33 32 2d |ja:.i=0.(127-32-| 00000e00 31 29 2a 31 30 2d 31 3a ef 69 3f 4f 61 0d 01 c7 |1)*10-1:.i?Oa...| 00000e10 07 ed 3a e1 0d 01 cc 04 0d 01 d1 40 dd f2 69 61 |..:........@..ia| 00000e20 3a f2 6c 28 22 54 56 64 65 73 6b 74 6f 70 22 2c |:.l("TVdesktop",| 00000e30 67 2c 6a 2c 61 29 3a ef 32 34 2c 48 3b 44 3b 48 |g,j,a):.24,H;D;H| 00000e40 2b 28 67 2d 31 29 2a 34 3b 44 2b 28 6a 2d 31 29 |+(g-1)*4;D+(j-1)| 00000e50 2a 34 3b 31 36 2c 32 36 0d 01 d6 0d c8 99 6f 3a |*4;16,26......o:| 00000e60 c8 99 75 3a e1 0d 01 db 04 0d 01 e0 a8 dd f2 55 |..u:...........U| 00000e70 3a 50 61 3d 32 34 3a 51 61 3d 31 32 38 3a f2 66 |:Pa=24:Qa=128:.f| 00000e80 28 4a 24 2c 6a 24 2c 33 30 2c 2d 36 34 30 2c 74 |(J$,j$,30,-640,t| 00000e90 61 2c 31 2f 32 2c 31 29 3a f2 62 28 66 2c 22 53 |a,1/2,1):.b(f,"S| 00000ea0 74 69 63 6b 30 22 2c 50 61 2c 51 61 29 3a f2 62 |tick0",Pa,Qa):.b| 00000eb0 28 66 2c 22 53 74 69 63 6b 30 22 2c 68 61 2d 50 |(f,"Stick0",ha-P| 00000ec0 61 2c 51 61 29 3a f2 62 28 41 2c 22 50 61 63 4d |a,Qa):.b(A,"PacM| 00000ed0 61 7a 65 22 2c 48 2c 44 29 3a c8 99 72 2c 31 3a |aze",H,D):..r,1:| 00000ee0 52 61 3d 48 2b 30 2a 36 34 2b 31 32 3a 53 61 3d |Ra=H+0*64+12:Sa=| 00000ef0 44 2b 31 2a 36 34 2b 31 32 2b 32 30 3a 64 3d 32 |D+1*64+12+20:d=2| 00000f00 3a 67 24 3d 22 32 32 31 22 3a c8 8e b3 28 34 29 |:g$="221":...(4)| 00000f10 ca 0d 01 e5 14 c9 31 3a 67 24 2b 3d 22 32 32 32 |......1:g$+="222| 00000f20 31 34 34 33 22 0d 01 ea 14 c9 32 3a 67 24 2b 3d |1443".....2:g$+=| 00000f30 22 32 31 32 32 33 34 34 22 0d 01 ef 14 c9 33 3a |"2122344".....3:| 00000f40 67 24 2b 3d 22 31 34 34 33 32 32 32 22 0d 01 f4 |g$+="1443222"...| 00000f50 14 c9 34 3a 67 24 2b 3d 22 34 34 31 32 32 33 32 |..4:g$+="4412232| 00000f60 22 0d 01 f9 05 cb 0d 01 fe 0b c8 8e b3 28 32 29 |"............(2)| 00000f70 ca 0d 02 03 11 c9 31 3a 67 24 2b 3d 22 33 32 33 |......1:g$+="323| 00000f80 32 22 0d 02 08 10 c9 32 3a 67 24 2b 3d 22 33 32 |2".....2:g$+="32| 00000f90 32 22 0d 02 0d 05 cb 0d 02 12 79 f5 3a f2 75 28 |2"........y.:.u(| 00000fa0 64 29 3a 64 3d bb c0 67 24 2c 31 29 3a 67 24 3d |d):d=..g$,1):g$=| 00000fb0 c1 67 24 2c 32 29 3a f2 6b 28 22 53 74 69 63 6b |.g$,2):.k("Stick| 00000fc0 22 2b c3 64 2c 50 61 2c 51 61 2c 30 29 3a 70 3d |"+.d,Pa,Qa,0):p=| 00000fd0 30 3a e3 69 3d 30 b8 31 35 3a c8 96 3a f2 75 28 |0:.i=0.15:..:.u(| 00000fe0 35 29 3a 52 61 2b 3d 34 2a 63 28 64 29 3a 53 61 |5):Ra+=4*c(d):Sa| 00000ff0 2b 3d 34 2a 64 28 64 29 3a f2 75 28 70 29 3a e7 |+=4*d(d):.u(p):.| 00001000 69 3d 31 32 80 64 3c 3e bb c0 67 24 2c 31 29 8c |i=12.d<>..g$,1).| 00001010 0d 02 17 18 f2 6b 28 22 53 74 69 63 6b 30 22 2c |.....k("Stick0",| 00001020 50 61 2c 51 61 2c 30 29 0d 02 1c 05 cd 0d 02 21 |Pa,Qa,0).......!| 00001030 10 c8 96 3a e7 69 83 32 70 3d 64 2d 70 0d 02 26 |...:.i.2p=d-p..&| 00001040 61 ed 3a fd 67 24 3d 22 22 3a f2 6b 28 22 53 74 |a.:.g$="":.k("St| 00001050 69 63 6b 30 22 2c 50 61 2c 51 61 2c 30 29 3a f2 |ick0",Pa,Qa,0):.| 00001060 7a 28 22 50 61 63 4d 61 7a 65 22 2c 48 2c 44 29 |z("PacMaze",H,D)| 00001070 3a c8 99 72 2c 32 3a c8 99 75 3a f2 61 28 31 30 |:..r,2:..u:.a(10| 00001080 30 29 3a f2 68 28 41 2c 22 50 61 63 4d 61 7a 65 |0):.h(A,"PacMaze| 00001090 22 2c 48 2c 44 29 3a f2 79 28 66 29 3a e1 0d 02 |",H,D):.y(f):...| 000010a0 2b 04 0d 02 30 28 dd f2 75 28 54 61 29 3a c8 99 |+...0(..u(Ta):..| 000010b0 34 36 2c 32 39 30 2c 6c 2c 22 70 61 63 22 2b c3 |46,290,l,"pac"+.| 000010c0 54 61 2c 52 61 2c 53 61 3a e1 0d 02 35 04 0d 02 |Ta,Ra,Sa:...5...| 000010d0 3a db dd f2 56 3a f2 66 28 4b 24 2c 6a 24 2c 33 |:...V:.f(K$,j$,3| 000010e0 30 2c 2d 36 34 30 2c 74 61 2c 31 2f 32 2c 31 29 |0,-640,ta,1/2,1)| 000010f0 3a f2 64 28 22 4d 61 65 73 74 72 6f 22 2c 48 2c |:.d("Maestro",H,| 00001100 44 2c 6b 2c 6b 29 3a f2 64 28 22 53 70 65 61 6b |D,k,k):.d("Speak| 00001110 65 72 22 2c 33 32 2c 34 32 30 2c 6b 2c 6b 29 3a |er",32,420,k,k):| 00001120 f2 64 28 22 53 70 65 61 6b 65 72 22 2c 68 61 2d |.d("Speaker",ha-| 00001130 33 32 2c 34 32 30 2c 6b 2c 6b 29 3a f2 63 28 22 |32,420,k,k):.c("| 00001140 53 74 65 72 65 6f 22 29 3a f2 61 28 34 30 29 3a |Stereo"):.a(40):| 00001150 55 61 3d 36 38 3a 56 61 3d 31 39 32 3a f2 6c 28 |Ua=68:Va=192:.l(| 00001160 22 53 74 65 72 65 6f 22 2c 57 61 2c 58 61 2c 5a |"Stereo",Wa,Xa,Z| 00001170 61 29 3a 5f 61 3d 55 61 2b 34 2a 28 57 61 81 32 |a):_a=Ua+4*(Wa.2| 00001180 29 3a e3 69 3d 30 b8 28 57 61 81 32 29 2b 32 3a |):.i=0.(Wa.2)+2:| 00001190 ef 32 34 2c 5f 61 2d 69 2a 34 3b 30 3b 5f 61 2b |.24,_a-i*4;0;_a+| 000011a0 69 2a 34 3b 31 30 32 33 3b 0d 02 3f 27 c8 99 34 |i*4;1023;..?'..4| 000011b0 36 2c 32 39 30 2c 6c 2c 22 53 74 65 72 65 6f 22 |6,290,l,"Stereo"| 000011c0 2c 55 61 2c 56 61 3a c8 99 6f 3a ed 3a ef 32 36 |,Ua,Va:..o:.:.26| 000011d0 0d 02 44 0d f2 61 28 34 30 30 29 3a e1 0d 02 49 |..D..a(400):...I| 000011e0 04 0d 02 4e db dd f2 57 3a f2 41 3a f2 63 28 22 |...N...W:.A:.c("| 000011f0 57 69 6d 70 22 29 3a f2 76 28 31 32 29 3a fb 37 |Wimp"):.v(12):.7| 00001200 2c 30 2c 30 2c 30 3a fb 31 32 38 2b 37 3a db 3a |,0,0,0:.128+7:.:| 00001210 f2 6b 61 3a 60 61 3d 39 32 30 3a 61 62 3d 36 30 |.ka:`a=920:ab=60| 00001220 30 3a 62 62 3d 31 30 30 3a e3 5f 3d 31 b8 33 3a |0:bb=100:._=1.3:| 00001230 c8 99 34 37 2c 5f 2c 32 35 b8 2c 2c 63 62 3a 61 |..47,_,25.,,cb:a| 00001240 28 5f 2c 30 29 3d 28 63 62 3e 3e 3e 38 29 80 32 |(_,0)=(cb>>>8).2| 00001250 35 35 3a 61 28 5f 2c 31 29 3d 28 63 62 3e 3e 3e |55:a(_,1)=(cb>>>| 00001260 31 36 29 80 32 35 35 3a 61 28 5f 2c 32 29 3d 28 |16).255:a(_,2)=(| 00001270 63 62 3e 3e 3e 32 34 29 80 32 35 35 3a ed 3a c8 |cb>>>24).255:.:.| 00001280 99 22 41 33 30 31 30 5f 52 65 61 64 4d 6f 64 65 |."A3010_ReadMode| 00001290 22 3a c8 99 72 2c 32 3a c8 99 75 3a f2 64 28 22 |":..r,2:..u:.d("| 000012a0 21 73 6d 31 32 5f 41 33 30 31 30 22 2c 30 2c 50 |!sm12_A3010",0,P| 000012b0 2c 6b 2c 6b 29 3a f2 61 28 38 30 29 0d 02 53 e0 |,k,k):.a(80)..S.| 000012c0 f2 62 28 66 2c 22 21 44 65 73 6b 74 6f 70 31 32 |.b(f,"!Desktop12| 000012d0 22 2c 30 2c 30 29 3a 60 3d 67 3a 64 62 3d 6a 3a |",0,0):`=g:db=j:| 000012e0 65 62 3d 32 2a 28 67 2b 28 36 34 30 2d 67 29 2f |eb=2*(g+(640-g)/| 000012f0 32 29 3a 66 62 3d 67 2a 32 2b 33 32 3a 67 62 3d |2):fb=g*2+32:gb=| 00001300 35 31 32 3a 68 62 3d 34 2a 28 67 2f 32 2f 32 29 |512:hb=4*(g/2/2)| 00001310 3a 69 62 3d 34 2a 28 6a 2f 32 29 3a f2 66 28 42 |:ib=4*(j/2):.f(B| 00001320 24 2c 6a 24 2c 33 30 2c 2d 36 34 30 2c 37 38 30 |$,j$,30,-640,780| 00001330 2c 31 2f 32 2c 31 29 3a f2 61 28 38 30 29 3a f2 |,1/2,1):.a(80):.| 00001340 71 28 31 29 3a f2 62 28 66 2c 22 69 63 6f 6e 62 |q(1):.b(f,"iconb| 00001350 61 72 31 32 22 2c 30 2c 30 29 3a f2 7a 28 22 21 |ar12",0,0):.z("!| 00001360 44 65 73 6b 74 6f 70 31 32 22 2c 30 2c 30 29 3a |Desktop12",0,0):| 00001370 f2 61 28 38 30 29 3a f2 71 28 33 29 3a c8 97 b8 |.a(80):.q(3):...| 00001380 68 62 2c 69 62 3a c8 99 34 36 2c 32 39 32 2c 6c |hb,ib:..46,292,l| 00001390 2c 22 50 6f 69 6e 74 65 72 22 2c 31 0d 02 58 0e |,"Pointer",1..X.| 000013a0 2a 50 6f 69 6e 74 65 72 20 31 0d 02 5d 08 c8 97 |*Pointer 1..]...| 000013b0 ee 31 0d 02 62 cd e3 6a 62 3d 30 b8 31 35 3a f2 |.1..b..jb=0.15:.| 000013c0 42 28 6a 62 29 3a ed 3a f2 61 28 38 30 29 3a f2 |B(jb):.:.a(80):.| 000013d0 71 28 30 29 3a f2 62 28 66 2c 22 46 69 6c 65 72 |q(0):.b(f,"Filer| 000013e0 31 32 22 2c 38 30 2c 34 30 30 29 3a f2 61 28 38 |12",80,400):.a(8| 000013f0 30 29 3a f2 6c 61 28 31 34 34 2c 34 37 32 29 3a |0):.la(144,472):| 00001400 f2 71 28 32 29 3a f2 62 28 66 2c 22 4d 65 6e 75 |.q(2):.b(f,"Menu| 00001410 31 32 22 2c 34 38 2c 31 34 38 29 3a f2 61 28 31 |12",48,148):.a(1| 00001420 30 30 29 3a e3 77 3d 30 b8 33 3a f2 43 28 77 2c |00):.w=0.3:.C(w,| 00001430 32 29 3a ed 3a f2 61 28 35 30 29 3a e3 77 3d 30 |2):.:.a(50):.w=0| 00001440 b8 33 3a f2 43 28 77 2c 31 29 3a ed 3a f2 69 28 |.3:.C(w,1):.:.i(| 00001450 41 2c 42 24 2c 6a 24 2c 33 30 2c 2d 36 34 30 2c |A,B$,j$,30,-640,| 00001460 37 38 30 29 3a e3 6a 62 3d 31 35 b8 30 88 2d 31 |780):.jb=15.0.-1| 00001470 3a f2 42 28 6a 62 29 3a ed 3a c8 97 87 3a e1 0d |:.B(jb):.:...:..| 00001480 02 67 04 0d 02 6c 1e dd f2 6b 61 3a e3 69 3d 30 |.g...l...ka:.i=0| 00001490 b8 28 31 36 2b 34 29 2a 36 2d 31 3a ef 69 3f 6b |.(16+4)*6-1:.i?k| 000014a0 62 0d 02 71 07 ed 3a e1 0d 02 76 04 0d 02 7b 1e |b..q..:...v...{.| 000014b0 dd f2 42 28 6c 62 29 3a c8 96 3a e3 5f 3d 31 b8 |..B(lb):..:._=1.| 000014c0 33 3a ef 31 39 2c 5f 2c 32 35 0d 02 80 22 e3 69 |3:.19,_,25...".i| 000014d0 3d 30 b8 32 3a ef 32 35 35 2d 6c 62 2a 28 32 35 |=0.2:.255-lb*(25| 000014e0 35 2d 61 28 5f 2c 69 29 29 2f 31 36 0d 02 85 09 |5-a(_,i))/16....| 000014f0 ed 3a ed 3a e1 0d 02 8a 04 0d 02 8f 77 dd f2 6c |.:.:........w..l| 00001500 61 28 6d 62 2c 6e 62 29 3a c8 97 42 2c 43 2c 6f |a(mb,nb):..B,C,o| 00001510 62 3a 70 62 3d 6d 62 2d 42 3a 71 62 3d 6e 62 2d |b:pb=mb-B:qb=nb-| 00001520 43 3a 72 62 3d b6 28 70 62 2a 70 62 2b 71 62 2a |C:rb=.(pb*pb+qb*| 00001530 71 62 29 3a 73 62 3d 72 62 81 38 3a e3 69 3d 31 |qb):sb=rb.8:.i=1| 00001540 b8 73 62 3a c8 96 3a c8 97 b8 42 2c 43 3a 42 2b |.sb:..:...B,C:B+| 00001550 3d 28 70 62 2f 73 62 29 3a 43 2b 3d 28 71 62 2f |=(pb/sb):C+=(qb/| 00001560 73 62 29 3a ed 3a c8 97 b8 6d 62 2c 6e 62 3a e1 |sb):.:...mb,nb:.| 00001570 0d 02 94 04 0d 02 99 56 dd f2 71 28 6e 29 3a f2 |.......V..q(n):.| 00001580 66 28 c0 61 24 28 6e 29 2c 31 29 2c 73 24 2c 34 |f(.a$(n),1),s$,4| 00001590 38 2c 60 61 2c 61 62 2d 6e 2a 62 62 2c 6b 2c 6b |8,`a,ab-n*bb,k,k| 000015a0 29 3a f2 6a 28 41 2c c1 61 24 28 6e 29 2c 32 29 |):.j(A,.a$(n),2)| 000015b0 2c 71 24 2c 33 32 2c 60 61 2b 37 32 2c 61 62 2d |,q$,32,`a+72,ab-| 000015c0 6e 2a 62 62 2b 31 32 29 3a e1 0d 02 9e 04 0d 02 |n*bb+12):.......| 000015d0 a3 11 dd f2 43 28 6e 2c 7a 29 3a c8 8e 7a ca 0d |....C(n,z):..z..| 000015e0 02 a8 27 c9 31 3a f2 69 28 41 2c c0 61 24 28 6e |..'.1:.i(A,.a$(n| 000015f0 29 2c 31 29 2c 73 24 2c 34 38 2c 60 61 2c 61 62 |),1),s$,48,`a,ab| 00001600 2d 6e 2a 62 62 29 0d 02 ad 2d c9 32 3a f2 69 28 |-n*bb)...-.2:.i(| 00001610 41 2c c1 61 24 28 6e 29 2c 32 29 2c 71 24 2c 33 |A,.a$(n),2),q$,3| 00001620 32 2c 60 61 2b 37 32 2c 61 62 2d 77 2a 62 62 2b |2,`a+72,ab-w*bb+| 00001630 31 32 29 0d 02 b2 05 cb 0d 02 b7 05 e1 0d 02 bc |12).............| 00001640 04 0d 02 c1 a4 dd f2 72 28 4c 24 2c 64 24 2c 4d |.......r(L$,d$,M| 00001650 24 29 3a f2 61 28 35 30 29 3a f2 66 28 4c 24 2c |$):.a(50):.f(L$,| 00001660 74 24 2c 33 32 2c 2d 65 62 2c 36 30 30 2c 6b 2c |t$,32,-eb,600,k,| 00001670 6b 29 3a f2 61 28 35 30 29 3a f2 62 28 66 2c 4d |k):.a(50):.b(f,M| 00001680 24 2c 74 62 2c 75 62 29 3a 64 24 2b 3d 22 7c 22 |$,tb,ub):d$+="|"| 00001690 3a 47 3d 67 62 3a f5 3a 46 3d a7 64 24 2c 22 7c |:G=gb:.:F=.d$,"|| 000016a0 22 29 3a 62 24 3d c0 64 24 2c 46 2d 31 29 3a 64 |"):b$=.d$,F-1):d| 000016b0 24 3d c1 64 24 2c 46 2b 31 29 3a f2 6a 28 41 2c |$=.d$,F+1):.j(A,| 000016c0 62 24 2c 75 24 2c 32 30 2c 66 62 2c 47 29 3a 47 |b$,u$,20,fb,G):G| 000016d0 2d 3d 36 34 3a fd 64 24 3d 22 22 3a f2 61 28 31 |-=64:.d$="":.a(1| 000016e0 35 30 29 3a e1 0d 02 c6 04 0d 02 cb 47 dd f2 73 |50):........G..s| 000016f0 3a c8 99 34 36 2c 32 36 34 2c 6c b8 2c 2c 2c 76 |:..46,264,l.,,,v| 00001700 62 3a 4e 3d 31 3a f5 3a c8 99 31 33 31 31 31 38 |b:N=1:.:..131118| 00001710 2c 32 36 39 2c 6c 2c 55 2c 36 34 2c 4e b8 3b 56 |,269,l,U,64,N.;V| 00001720 3a 56 3d 28 28 56 80 31 29 3d 30 29 3a e7 56 8c |:V=((V.1)=0):.V.| 00001730 0d 02 d0 0d e7 3f 55 3d 97 22 21 22 8c 0d 02 d5 |.....?U=."!"....| 00001740 08 4e 2b 3d 31 0d 02 da 12 cc 3a c8 99 34 36 2c |.N+=1.....:..46,| 00001750 32 38 31 2c 6c 2c 55 0d 02 df 05 cd 0d 02 e4 05 |281,l,U.........| 00001760 cd 0d 02 e9 38 fd ac 56 3a f2 6d 28 22 57 6f 69 |....8..V:.m("Woi| 00001770 64 73 22 2c 60 2a 32 2c 30 2c 36 34 30 2d 60 2c |ds",`*2,0,640-`,| 00001780 64 62 29 3a f2 68 28 41 2c 22 57 6f 69 64 73 22 |db):.h(A,"Woids"| 00001790 2c 60 2a 32 2c 30 29 3a e1 0d 02 ee 04 0d 02 f3 |,`*2,0):........| 000017a0 ad dd f2 58 3a f2 62 28 66 2c 22 21 44 65 73 6b |...X:.b(f,"!Desk| 000017b0 74 6f 70 31 32 22 2c 30 2c 30 29 3a f2 63 28 22 |top12",0,0):.c("| 000017c0 21 50 61 69 6e 74 22 29 3a f2 6d 28 22 21 44 65 |!Paint"):.m("!De| 000017d0 73 6b 74 6f 70 31 32 22 2c 30 2c 30 2c 60 2c 64 |sktop12",0,0,`,d| 000017e0 62 29 3a f2 66 28 43 24 2c 6a 24 2c 33 30 2c 2d |b):.f(C$,j$,30,-| 000017f0 36 34 30 2c 37 38 30 2c 31 2f 32 2c 31 29 3a f2 |640,780,1/2,1):.| 00001800 72 28 22 50 61 69 6e 74 22 2c 4e 24 2c 22 50 61 |r("Paint",N$,"Pa| 00001810 69 6e 74 49 63 6f 6e 22 29 3a 77 62 3d 31 32 30 |intIcon"):wb=120| 00001820 3a 78 62 3d 37 32 3a f2 62 28 66 2c 22 50 61 69 |:xb=72:.b(f,"Pai| 00001830 6e 74 57 69 6e 64 22 2c 77 62 2c 78 62 29 3a f2 |ntWind",wb,xb):.| 00001840 61 28 31 30 30 29 3a f7 2b 30 0d 02 f8 44 e3 79 |a(100):.+0...D.y| 00001850 62 3d 31 b8 31 33 3a f3 57 2c 61 24 2c 78 2c 79 |b=1.13:.W,a$,x,y| 00001860 3a f2 6b 28 61 24 2c 77 62 2b 32 2b 78 2c 78 62 |:.k(a$,wb+2+x,xb| 00001870 2b 34 38 2b 79 2c 57 29 3a f2 61 28 37 30 29 3a |+48+y,W):.a(70):| 00001880 ed 3a f2 61 28 34 30 30 29 3a f2 73 3a e1 0d 02 |.:.a(400):.s:...| 00001890 fd 04 0d 03 02 12 dc 20 30 2c 73 30 2c 34 36 36 |....... 0,s0,466| 000018a0 2c 31 31 32 0d 03 07 10 dc 20 33 2c 73 31 2c 30 |,112..... 3,s1,0| 000018b0 2c 31 36 30 0d 03 0c 12 dc 20 33 2c 73 32 2c 35 |,160..... 3,s2,5| 000018c0 30 38 2c 31 33 32 0d 03 11 0e dc 20 33 2c 73 33 |08,132..... 3,s3| 000018d0 2c 30 2c 30 0d 03 16 10 dc 20 33 2c 73 34 2c 30 |,0,0..... 3,s4,0| 000018e0 2c 31 36 34 0d 03 1b 12 dc 20 33 2c 73 35 2c 35 |,164..... 3,s5,5| 000018f0 31 30 2c 32 37 32 0d 03 20 10 dc 20 33 2c 73 36 |10,272.. .. 3,s6| 00001900 2c 34 32 2c 32 34 0d 03 25 11 dc 20 33 2c 73 37 |,42,24..%.. 3,s7| 00001910 2c 31 38 2c 33 35 32 0d 03 2a 11 dc 20 33 2c 73 |,18,352..*.. 3,s| 00001920 38 2c 31 32 2c 32 38 38 0d 03 2f 12 dc 20 33 2c |8,12,288../.. 3,| 00001930 73 39 2c 31 36 32 2c 31 35 36 0d 03 34 13 dc 20 |s9,162,156..4.. | 00001940 33 2c 73 31 30 2c 31 36 34 2c 31 38 38 0d 03 39 |3,s10,164,188..9| 00001950 13 dc 20 33 2c 73 31 31 2c 35 33 30 2c 32 38 38 |.. 3,s11,530,288| 00001960 0d 03 3e 13 dc 20 33 2c 73 31 32 2c 32 30 36 2c |..>.. 3,s12,206,| 00001970 34 31 32 0d 03 43 04 0d 03 48 e7 dd f2 5a 3a f2 |412..C...H...Z:.| 00001980 62 28 66 2c 22 21 44 65 73 6b 74 6f 70 31 32 22 |b(f,"!Desktop12"| 00001990 2c 30 2c 30 29 3a f2 63 28 22 21 44 72 61 77 22 |,0,0):.c("!Draw"| 000019a0 29 3a f2 6d 28 22 21 44 65 73 6b 74 6f 70 31 32 |):.m("!Desktop12| 000019b0 22 2c 30 2c 30 2c 60 2c 64 62 29 3a f2 72 28 22 |",0,0,`,db):.r("| 000019c0 44 72 61 77 22 2c 4f 24 2c 22 44 72 61 77 49 63 |Draw",O$,"DrawIc| 000019d0 6f 6e 22 29 3a 7a 62 3d 39 36 3a 41 62 3d 33 32 |on"):zb=96:Ab=32| 000019e0 3a f2 62 28 66 2c 22 44 72 61 77 57 69 6e 64 22 |:.b(f,"DrawWind"| 000019f0 2c 7a 62 2c 41 62 29 3a f2 6b 28 22 44 72 61 77 |,zb,Ab):.k("Draw| 00001a00 54 6f 6f 6c 73 22 2c 7a 62 2d 38 30 2c 41 62 2b |Tools",zb-80,Ab+| 00001a10 34 34 2c 30 29 3a f2 61 28 35 30 29 3a f2 62 28 |44,0):.a(50):.b(| 00001a20 66 2c 22 41 72 6d 22 2c 7a 62 2b 34 2c 41 62 2b |f,"Arm",zb+4,Ab+| 00001a30 34 38 29 3a f2 61 28 34 30 30 29 3a f2 68 28 66 |48):.a(400):.h(f| 00001a40 2c 22 41 72 6d 22 2c 7a 62 2b 34 2c 41 62 2b 34 |,"Arm",zb+4,Ab+4| 00001a50 38 29 3a f2 61 28 31 30 30 29 3a f7 2b 30 0d 03 |8):.a(100):.+0..| 00001a60 4d 5f e3 79 62 3d 31 b8 31 38 3a f3 57 2c 61 24 |M_.yb=1.18:.W,a$| 00001a70 2c 78 2c 79 2c 41 61 3a f2 6b 28 61 24 2c 7a 62 |,x,y,Aa:.k(a$,zb| 00001a80 2b 38 2b 78 2c 41 62 2b 33 32 2b 79 2c 57 29 3a |+8+x,Ab+32+y,W):| 00001a90 f2 61 28 41 61 29 3a ed 3a f2 61 28 32 30 30 29 |.a(Aa):.:.a(200)| 00001aa0 3a f2 73 3a f2 69 28 41 2c 43 24 2c 6a 24 2c 33 |:.s:.i(A,C$,j$,3| 00001ab0 30 2c 2d 36 34 30 2c 37 38 30 29 3a e1 0d 03 52 |0,-640,780):...R| 00001ac0 04 0d 03 57 13 dc 20 30 2c 61 2c 36 34 2c 33 34 |...W.. 0,a,64,34| 00001ad0 30 2c 38 30 0d 03 5c 13 dc 20 30 2c 62 2c 35 32 |0,80..\.. 0,b,52| 00001ae0 36 2c 38 30 2c 38 30 0d 03 61 18 dc 20 30 2c 61 |6,80,80..a.. 0,a| 00001af0 2d 66 69 6c 6c 2c 36 34 2c 33 34 30 2c 38 30 0d |-fill,64,340,80.| 00001b00 03 66 18 dc 20 30 2c 62 2d 66 69 6c 6c 2c 35 32 |.f.. 0,b-fill,52| 00001b10 36 2c 38 30 2c 38 30 0d 03 6b 15 dc 20 33 2c 64 |6,80,80..k.. 3,d| 00001b20 31 2c 31 30 32 2c 33 33 36 2c 31 35 0d 03 70 15 |1,102,336,15..p.| 00001b30 dc 20 33 2c 64 32 2c 31 34 30 2c 33 33 32 2c 31 |. 3,d2,140,332,1| 00001b40 30 0d 03 75 14 dc 20 33 2c 64 33 2c 31 37 38 2c |0..u.. 3,d3,178,| 00001b50 33 32 38 2c 39 0d 03 7a 14 dc 20 33 2c 64 34 2c |328,9..z.. 3,d4,| 00001b60 32 31 38 2c 33 32 38 2c 38 0d 03 7f 14 dc 20 33 |218,328,8..... 3| 00001b70 2c 64 35 2c 32 35 34 2c 33 30 38 2c 37 0d 03 84 |,d5,254,308,7...| 00001b80 14 dc 20 33 2c 64 36 2c 32 39 32 2c 32 38 34 2c |.. 3,d6,292,284,| 00001b90 36 0d 03 89 14 dc 20 33 2c 64 37 2c 33 33 30 2c |6..... 3,d7,330,| 00001ba0 32 36 34 2c 35 0d 03 8e 14 dc 20 33 2c 64 38 2c |264,5..... 3,d8,| 00001bb0 33 36 30 2c 32 34 30 2c 34 0d 03 93 14 dc 20 33 |360,240,4..... 3| 00001bc0 2c 64 39 2c 33 38 36 2c 32 31 36 2c 34 0d 03 98 |,d9,386,216,4...| 00001bd0 15 dc 20 33 2c 64 31 30 2c 34 31 30 2c 31 39 36 |.. 3,d10,410,196| 00001be0 2c 34 0d 03 9d 15 dc 20 33 2c 64 31 31 2c 34 33 |,4..... 3,d11,43| 00001bf0 36 2c 31 37 32 2c 34 0d 03 a2 15 dc 20 33 2c 64 |6,172,4..... 3,d| 00001c00 31 32 2c 34 36 30 2c 31 34 38 2c 34 0d 03 a7 15 |12,460,148,4....| 00001c10 dc 20 33 2c 64 31 33 2c 34 38 34 2c 31 32 38 2c |. 3,d13,484,128,| 00001c20 34 0d 03 ac 15 dc 20 33 2c 64 31 34 2c 35 30 34 |4..... 3,d14,504| 00001c30 2c 31 30 34 2c 34 0d 03 b1 04 0d 03 b6 c5 dd f2 |,104,4..........| 00001c40 5f 3a f2 62 28 66 2c 22 21 44 65 73 6b 74 6f 70 |_:.b(f,"!Desktop| 00001c50 31 32 22 2c 30 2c 30 29 3a f2 63 28 22 21 4d 61 |12",0,0):.c("!Ma| 00001c60 65 73 74 72 6f 22 29 3a f2 6d 28 22 21 44 65 73 |estro"):.m("!Des| 00001c70 6b 74 6f 70 31 32 22 2c 30 2c 30 2c 60 2c 64 62 |ktop12",0,0,`,db| 00001c80 29 3a f2 66 28 44 24 2c 6a 24 2c 33 30 2c 2d 36 |):.f(D$,j$,30,-6| 00001c90 34 30 2c 37 38 30 2c 31 2f 32 2c 30 29 3a f2 72 |40,780,1/2,0):.r| 00001ca0 28 22 4d 61 65 73 74 72 6f 22 2c 50 24 2c 22 4d |("Maestro",P$,"M| 00001cb0 75 73 69 63 49 63 6f 6e 22 29 3a 42 62 3d 32 34 |usicIcon"):Bb=24| 00001cc0 3a 43 62 3d 32 34 3a f2 62 28 66 2c 22 4d 61 65 |:Cb=24:.b(f,"Mae| 00001cd0 73 74 72 6f 57 69 6e 64 22 2c 42 62 2c 43 62 29 |stroWind",Bb,Cb)| 00001ce0 3a ef 32 34 2c 42 62 2b 32 3b 43 62 2b 31 32 38 |:.24,Bb+2;Cb+128| 00001cf0 3b 42 62 2b 38 30 30 3b 43 62 2b 35 32 34 3b 0d |;Bb+800;Cb+524;.| 00001d00 03 bb 24 e3 44 62 3d 30 b8 31 32 30 38 88 38 3a |..$.Db=0.1208.8:| 00001d10 e7 44 62 3e 31 32 30 30 78 3d 31 32 30 30 8b 78 |.Db>1200x=1200.x| 00001d20 3d 44 62 0d 03 c0 35 c8 99 6f 3a c8 99 34 36 2c |=Db...5..o:..46,| 00001d30 32 39 30 2c 6c 2c 22 6d 75 73 69 63 22 2c 42 62 |290,l,"music",Bb| 00001d40 2b 32 2d 78 2c 43 62 2b 31 32 38 3a e7 44 62 3d |+2-x,Cb+128:.Db=| 00001d50 38 f2 61 28 31 30 30 29 0d 03 c5 09 ed 3a ef 32 |8.a(100).....:.2| 00001d60 36 0d 03 ca 10 f2 61 28 33 30 30 29 3a f2 73 3a |6.....a(300):.s:| 00001d70 e1 0d 03 cf 04 0d 03 d4 b3 dd f2 60 3a f2 62 28 |...........`:.b(| 00001d80 66 2c 22 21 44 65 73 6b 74 6f 70 31 32 22 2c 30 |f,"!Desktop12",0| 00001d90 2c 30 29 3a f2 63 28 22 21 53 74 61 72 74 22 29 |,0):.c("!Start")| 00001da0 3a f2 6d 28 22 21 44 65 73 6b 74 6f 70 31 32 22 |:.m("!Desktop12"| 00001db0 2c 30 2c 30 2c 60 2c 64 62 29 3a f2 72 28 22 53 |,0,0,`,db):.r("S| 00001dc0 74 61 72 74 57 72 69 74 65 22 2c 51 24 2c 22 53 |tartWrite",Q$,"S| 00001dd0 74 61 72 74 49 63 6f 6e 22 29 3a 46 62 3d 31 36 |tartIcon"):Fb=16| 00001de0 3a 47 62 3d 31 34 34 3a f2 62 28 66 2c 22 53 74 |:Gb=144:.b(f,"St| 00001df0 61 72 74 57 69 6e 64 22 2c 46 62 2c 47 62 29 3a |artWind",Fb,Gb):| 00001e00 c8 99 72 2c 31 3a f2 6d 61 3a f2 6e 61 28 48 62 |..r,1:.ma:.na(Hb| 00001e10 29 3a c8 99 72 2c 32 3a c8 99 75 3a f2 61 28 34 |):..r,2:..u:.a(4| 00001e20 30 30 29 3a f2 73 3a e1 0d 03 d9 04 0d 03 de ce |00):.s:.........| 00001e30 dd f2 6d 61 3a 76 24 3d 22 2a 51 57 45 52 54 59 |..ma:v$="*QWERTY| 00001e40 55 49 4f 50 2a 41 53 44 46 47 48 4a 4b 4c 2a 5a |UIOP*ASDFGHJKL*Z| 00001e50 58 43 56 42 4e 4d 2c 2e 2a 22 3a 79 3d 30 3a 49 |XCVBNM,.*":y=0:I| 00001e60 62 3d a3 3a 4a 62 3d 30 3a 62 24 3d 22 22 3a 58 |b=.:Jb=0:b$="":X| 00001e70 24 3d 22 22 3a 4b 62 3d a4 63 28 75 24 2c 32 30 |$="":Kb=.c(u$,20| 00001e80 29 3a c8 99 32 36 32 32 39 30 2c 4b 62 2c 30 2c |):..262290,Kb,0,| 00001e90 31 2c 36 3a 4c 62 3d 38 31 36 3a 4d 62 3d 33 34 |1,6:Lb=816:Mb=34| 00001ea0 38 3a 4e 62 3d 33 32 3a 4f 62 3d 33 37 32 3a 50 |8:Nb=32:Ob=372:P| 00001eb0 62 3d 4c 62 2d 32 2a 4e 62 3a c8 99 32 36 32 32 |b=Lb-2*Nb:..2622| 00001ec0 38 31 2c 2c 31 2c 50 62 b8 2c 51 62 2c 50 62 3a |81,,1,Pb.,Qb,Pb:| 00001ed0 c8 99 32 36 32 32 37 36 2c 4b 62 b8 2c 2c 52 62 |..262276,Kb.,,Rb| 00001ee0 2c 2c 53 62 3a 54 62 3d 53 62 2d 52 62 3a 55 62 |,,Sb:Tb=Sb-Rb:Ub| 00001ef0 3d 35 3a 56 62 3d 34 30 3a e1 0d 03 e3 04 0d 03 |=5:Vb=40:.......| 00001f00 e8 3c dd f2 6e 61 28 57 62 29 3a c8 91 46 62 2b |.<..na(Wb):..Fb+| 00001f10 32 2c 47 62 2b 34 34 3a c8 95 3f 57 62 3c 3e 30 |2,Gb+44:..?Wb<>0| 00001f20 3a f2 6f 61 28 bd 3f 57 62 29 3a 57 62 2b 3d 31 |:.oa(.?Wb):Wb+=1| 00001f30 3a ce 3a c8 91 30 2c 30 3a e1 0d 03 ed 04 0d 03 |:.:..0,0:.......| 00001f40 f2 12 dd f2 6f 61 28 6d 24 29 3a c8 8e 6d 24 ca |....oa(m$):..m$.| 00001f50 0d 03 f7 15 c9 22 7e 22 3a f2 61 28 34 30 2b b3 |....."~":.a(40+.| 00001f60 28 33 30 29 29 0d 03 fc 11 c9 bd 31 30 3a 62 24 |(30))......10:b$| 00001f70 3d 22 22 3a f2 44 0d 04 01 1d c9 bd 31 32 37 2c |="":.D......127,| 00001f80 22 3c 22 3a e7 62 24 3c 3e 22 22 f2 46 3a f2 61 |"<":.b$<>"".F:.a| 00001f90 28 35 29 0d 04 06 0f 7f 3a e7 6d 24 3e 3d 22 20 |(5).....:.m$>=" | 00001fa0 22 8c 0d 04 0b 1a e7 b3 28 34 30 29 3d 31 80 6d |".......(40)=1.m| 00001fb0 24 3c 3e 22 20 22 80 56 62 3d 30 8c 0d 04 10 31 |$<>" ".Vb=0....1| 00001fc0 f2 47 28 a4 66 28 6d 24 29 29 3a f2 61 28 32 30 |.G(.f(m$)):.a(20| 00001fd0 2b b3 28 32 30 29 29 3a f2 46 3a f2 61 28 32 30 |+.(20)):.F:.a(20| 00001fe0 2b b3 28 32 30 29 29 3a 56 62 3d 32 30 0d 04 15 |+.(20)):Vb=20...| 00001ff0 10 cc 3a e7 56 62 3e 30 56 62 2d 3d 31 0d 04 1a |..:.Vb>0Vb-=1...| 00002000 05 cd 0d 04 1f 15 f2 61 28 b3 28 37 29 2b 32 29 |.......a(.(7)+2)| 00002010 3a f2 47 28 6d 24 29 0d 04 24 05 cd 0d 04 29 05 |:.G(m$)..$....).| 00002020 cb 0d 04 2e 05 e1 0d 04 33 04 0d 04 38 47 dd f2 |........3...8G..| 00002030 47 28 63 24 29 3a 62 24 2b 3d 63 24 3a c8 99 32 |G(c$):b$+=c$:..2| 00002040 36 32 33 30 35 2c 4b 62 2c 62 24 2c 31 3c 3c 32 |62305,Kb,b$,1<<2| 00002050 30 2c 50 62 2c 30 b8 2c 2c 2c 2c 2c 2c 2c 58 62 |0,Pb,0.,,,,,,,Xb| 00002060 3a 5a 62 3d 28 a9 62 24 3e 58 62 29 3a e7 5a 62 |:Zb=(.b$>Xb):.Zb| 00002070 8c 0d 04 3d 37 c8 95 c1 62 24 2c 58 62 2c 31 29 |...=7...b$,Xb,1)| 00002080 3c 3e 22 20 22 3a 58 62 2d 3d 31 3a ce 3a f2 48 |<>" ":Xb-=1:.:.H| 00002090 28 a9 62 24 2d 58 62 29 3a 62 24 3d c1 62 24 2c |(.b$-Xb):b$=.b$,| 000020a0 58 62 2b 31 29 3a f2 44 0d 04 42 05 cd 0d 04 47 |Xb+1):.D..B....G| 000020b0 0d f2 70 61 28 62 24 29 3a e1 0d 04 4c 04 0d 04 |..pa(b$):...L...| 000020c0 51 0e dd f2 44 3a e7 79 3d 55 62 8c 0d 04 56 38 |Q...D:.y=Ub...V8| 000020d0 e6 31 32 38 3a c8 93 c8 90 30 2c 30 2c 4c 62 2c |.128:....0,0,Lb,| 000020e0 4d 62 b8 30 2c 54 62 3a e6 32 3a 86 32 36 2c 30 |Mb.0,Tb:.2:.26,0| 000020f0 2c 32 36 2c 54 62 3a 86 38 30 30 2c 30 2c 38 30 |,26,Tb:.800,0,80| 00002100 30 2c 54 62 0d 04 5b 0a cc 3a 79 2b 3d 31 0d 04 |0,Tb..[..:y+=1..| 00002110 60 05 cd 0d 04 65 05 e1 0d 04 6a 04 0d 04 6f 17 |`....e....j...o.| 00002120 dd f2 46 3a f2 48 28 31 29 3a 62 24 3d c0 62 24 |..F:.H(1):b$=.b$| 00002130 29 3a e1 0d 04 74 04 0d 04 79 31 dd f2 70 61 28 |):...t...y1..pa(| 00002140 52 24 29 3a c8 99 32 36 32 32 37 38 2c 4b 62 2c |R$):..262278,Kb,| 00002150 52 24 2c 31 36 2c 46 62 2b 4e 62 2c 47 62 2b 4f |R$,16,Fb+Nb,Gb+O| 00002160 62 2d 79 2a 54 62 3a e1 0d 04 7e 04 0d 04 83 8b |b-y*Tb:...~.....| 00002170 dd f2 48 28 5f 62 29 3a c8 99 32 36 32 32 37 37 |..H(_b):..262277| 00002180 2c 2c 62 24 2c 50 62 2c 50 62 2c 2d 31 2c a9 62 |,,b$,Pb,Pb,-1,.b| 00002190 24 b8 2c 2c 60 62 3a c8 99 32 36 32 32 37 37 2c |$.,,`b:..262277,| 000021a0 2c c0 62 24 2c a9 62 24 2d 5f 62 29 2c 50 62 2c |,.b$,.b$-_b),Pb,| 000021b0 50 62 2c 2d 31 2c a9 62 24 b8 2c 2c 61 63 3a 61 |Pb,-1,.b$.,,ac:a| 000021c0 63 3d 61 63 81 51 62 3a 60 62 3d 60 62 81 51 62 |c=ac.Qb:`b=`b.Qb| 000021d0 3a e6 30 3a c8 93 c8 90 4e 62 2b 61 63 2d 32 2c |:.0:....Nb+ac-2,| 000021e0 4f 62 2d 79 2a 54 62 2d 32 2c 60 62 2d 61 63 2c |Ob-y*Tb-2,`b-ac,| 000021f0 2d 54 62 2d 36 3a e1 0d 04 88 04 0d 04 8d 31 dd |-Tb-6:........1.| 00002200 a4 66 28 6b 24 29 3a 62 63 3d 28 6b 24 3e 3d 22 |.f(k$):bc=(k$>="| 00002210 61 22 80 6b 24 3c 3d 22 7a 22 29 3a e7 62 63 20 |a".k$<="z"):.bc | 00002220 6b 24 3d bd 28 97 6b 24 2d 33 32 29 0d 04 92 0f |k$=.(.k$-32)....| 00002230 e7 a7 76 24 2c 6b 24 29 3e 30 8c 0d 04 97 29 f5 |..v$,k$)>0....).| 00002240 3a 6e 24 3d c1 76 24 2c a7 76 24 2c 6b 24 29 2b |:n$=.v$,.v$,k$)+| 00002250 b4 b3 2c 31 29 3a fd 6e 24 3c 3e 22 2a 22 3a 6b |..,1):.n$<>"*":k| 00002260 24 3d 6e 24 0d 04 9c 05 cd 0d 04 a1 23 e7 62 63 |$=n$........#.bc| 00002270 80 6b 24 3e 3d 22 41 22 80 6b 24 3c 3d 22 5a 22 |.k$>="A".k$<="Z"| 00002280 6b 24 3d bd 28 97 6b 24 2b 33 32 29 0d 04 a6 07 |k$=.(.k$+32)....| 00002290 3d 6b 24 0d 04 ab 7f dd f2 61 61 3a f2 69 28 41 |=k$......aa:.i(A| 000022a0 2c 44 24 2c 6a 24 2c 33 30 2c 2d 36 34 30 2c 37 |,D$,j$,30,-640,7| 000022b0 38 30 29 3a f2 62 28 66 2c 22 21 44 65 73 6b 74 |80):.b(f,"!Deskt| 000022c0 6f 70 31 32 22 2c 30 2c 30 29 3a f2 68 28 41 2c |op12",0,0):.h(A,| 000022d0 22 21 44 65 73 6b 74 6f 70 31 32 22 2c 30 2c 30 |"!Desktop12",0,0| 000022e0 29 3a f2 68 28 41 2c 22 21 73 6d 31 32 5f 41 33 |):.h(A,"!sm12_A3| 000022f0 30 31 30 22 2c 30 2c 50 29 3a c8 96 3a fb 30 2c |010",0,P):..:.0,| 00002300 30 2c 30 2c 30 3a fb 31 32 38 3a db 3a c8 99 75 |0,0,0:.128:.:..u| 00002310 3a e1 0d 04 b0 04 0d 04 b5 7b dd f2 62 61 3a f2 |:........{..ba:.| 00002320 76 28 31 33 29 3a c8 99 72 2c 32 3a f2 63 28 22 |v(13):..r,2:.c("| 00002330 47 61 6d 65 31 22 29 3a f2 61 28 35 30 29 3a f2 |Game1"):.a(50):.| 00002340 77 28 22 46 75 6e 22 2c 22 5a 6f 6f 6c 22 2c 22 |w("Fun","Zool","| 00002350 47 61 6d 65 32 22 29 3a f2 77 28 22 41 6e 64 22 |Game2"):.w("And"| 00002360 2c 22 4c 65 6d 6d 69 6e 67 73 22 2c 22 47 61 6d |,"Lemmings","Gam| 00002370 65 33 22 29 3a f2 77 28 22 47 61 6d 65 73 22 2c |e3"):.w("Games",| 00002380 22 43 68 75 63 6b 52 6f 63 6b 22 2c 22 22 29 3a |"ChuckRock",""):| 00002390 e1 0d 04 ba 04 0d 04 bf 2f dd f2 77 28 65 24 2c |......../..w(e$,| 000023a0 53 24 2c 46 24 29 3a f2 62 28 66 2c 53 24 2c 30 |S$,F$):.b(f,S$,0| 000023b0 2c 2d 35 31 32 29 3a e7 46 24 3c 3e 22 22 f2 63 |,-512):.F$<>"".c| 000023c0 28 46 24 29 0d 04 c4 4d f2 61 28 32 34 30 29 3a |(F$)...M.a(240):| 000023d0 da 3a c8 99 6f 3a da 3a c8 99 6f 3a f2 62 28 66 |.:..o:.:..o:.b(f| 000023e0 2b 31 2c 65 24 2c 2d 36 34 30 2c 2d 35 31 32 29 |+1,e$,-640,-512)| 000023f0 3a f2 61 28 31 32 30 29 3a f2 6f 28 65 24 2c 2d |:.a(120):.o(e$,-| 00002400 36 34 30 2c 2d 35 31 32 2c 6b 2c 6b 2c 30 29 3a |640,-512,k,k,0):| 00002410 e1 0d 04 c9 04 0d 04 ce 3a dd f2 63 61 3a f2 6e |........:..ca:.n| 00002420 3a f2 63 28 22 43 6f 6d 70 75 74 65 72 22 29 3a |:.c("Computer"):| 00002430 f2 64 28 22 43 6f 6d 70 75 74 65 72 22 2c 2d 36 |.d("Computer",-6| 00002440 34 30 2c 50 2c 31 2f 32 2c 30 29 3a f7 2b 30 0d |40,P,1/2,0):.+0.| 00002450 04 d3 47 e3 46 61 3d 31 b8 32 3a f3 77 24 3a f2 |..G.Fa=1.2:.w$:.| 00002460 6a 28 66 2c 77 24 2c 74 24 2c 34 30 2c 2d 36 34 |j(f,w$,t$,40,-64| 00002470 30 2c 33 36 30 29 3a 46 3d 32 34 34 3a f3 62 24 |0,360):F=244:.b$| 00002480 3a f5 3a f2 61 28 34 30 29 3a e7 c0 62 24 2c 31 |:.:.a(40):..b$,1| 00002490 29 3d 22 2f 22 8c 0d 04 d8 1d f2 6a 28 66 2c c1 |)="/"......j(f,.| 000024a0 62 24 2c 32 29 2c 71 24 2c 33 30 2c 2d 36 34 30 |b$,2),q$,30,-640| 000024b0 2c 46 29 0d 04 dd 1b cc 3a f2 6a 28 66 2c 62 24 |,F).....:.j(f,b$| 000024c0 2c 78 24 2c 33 30 2c 2d 36 34 30 2c 46 29 0d 04 |,x$,30,-640,F)..| 000024d0 e2 05 cd 0d 04 e7 23 46 2d 3d 38 30 3a f3 62 24 |......#F-=80:.b$| 000024e0 3a fd 62 24 3d 22 2a 22 3a f2 61 28 34 30 30 29 |:.b$="*":.a(400)| 000024f0 3a c8 8e 46 61 ca 0d 04 ec 0a c9 31 3a f7 2b 30 |:..Fa......1:.+0| 00002500 0d 04 f1 1f 46 3d 32 34 34 3a f3 77 24 2c 62 24 |....F=244:.w$,b$| 00002510 3a f5 3a e7 c0 62 24 2c 31 29 3d 22 2f 22 8c 0d |:.:..b$,1)="/"..| 00002520 04 f6 1d f2 69 28 66 2c c1 62 24 2c 32 29 2c 71 |....i(f,.b$,2),q| 00002530 24 2c 33 30 2c 2d 36 34 30 2c 46 29 0d 04 fb 1b |$,30,-640,F)....| 00002540 cc 3a f2 69 28 66 2c 62 24 2c 78 24 2c 33 30 2c |.:.i(f,b$,x$,30,| 00002550 2d 36 34 30 2c 46 29 0d 05 00 05 cd 0d 05 05 2d |-640,F)........-| 00002560 46 2d 3d 38 30 3a f3 62 24 3a fd 62 24 3d 22 2a |F-=80:.b$:.b$="*| 00002570 22 3a f2 69 28 66 2c 77 24 2c 74 24 2c 34 30 2c |":.i(f,w$,t$,40,| 00002580 2d 36 34 30 2c 33 36 30 29 0d 05 0a 0c c9 32 3a |-640,360).....2:| 00002590 f2 6e 3a f2 41 0d 05 0f 05 cb 0d 05 14 05 ed 0d |.n:.A...........| 000025a0 05 19 1f dc 20 22 49 74 91 73 20 45 6e 74 65 72 |.... "It.s Enter| 000025b0 74 61 69 6e 69 6e 67 20 2e 20 2e 20 2e 22 0d 05 |taining . . ."..| 000025c0 1e 26 dc 20 22 33 32 2d 62 69 74 20 70 6f 77 65 |.&. "32-bit powe| 000025d0 72 2c 20 73 75 70 65 72 62 20 67 72 61 70 68 69 |r, superb graphi| 000025e0 63 73 2c 22 0d 05 23 22 dc 20 22 73 74 65 72 65 |cs,"..#". "stere| 000025f0 6f 20 73 6f 75 6e 64 20 61 6e 64 20 6a 6f 79 73 |o sound and joys| 00002600 74 69 63 6b 73 22 0d 05 28 24 dc 20 22 65 6e 68 |ticks"..($. "enh| 00002610 61 6e 63 65 20 74 68 65 20 72 65 61 6c 69 73 6d |ance the realism| 00002620 20 61 6e 64 20 6d 61 6b 65 22 0d 05 2d 28 dc 20 | and make"..-(. | 00002630 22 74 68 65 20 41 33 30 31 30 20 61 6e 20 69 64 |"the A3010 an id| 00002640 65 61 6c 20 67 61 6d 65 73 20 6d 61 63 68 69 6e |eal games machin| 00002650 65 22 0d 05 32 07 dc 20 2a 0d 05 37 1d dc 20 22 |e"..2.. *..7.. "| 00002660 2e 20 2e 20 2e 20 61 6e 64 20 45 64 75 63 61 74 |. . . and Educat| 00002670 69 6f 6e 61 6c 22 0d 05 3c 25 dc 20 22 54 68 65 |ional"..<%. "The| 00002680 20 41 33 30 31 30 20 69 73 20 6f 6e 65 20 6f 66 | A3010 is one of| 00002690 20 74 68 65 20 72 61 6e 67 65 22 0d 05 41 22 dc | the range"..A".| 000026a0 20 22 6f 66 20 41 63 6f 72 6e 20 63 6f 6d 70 75 | "of Acorn compu| 000026b0 74 65 72 73 20 75 73 65 64 20 69 6e 22 0d 05 46 |ters used in"..F| 000026c0 20 dc 20 22 61 6c 6d 6f 73 74 20 61 6c 6c 20 55 | . "almost all U| 000026d0 2e 4b 2e 20 73 63 68 6f 6f 6c 73 2e 22 0d 05 4b |.K. schools."..K| 000026e0 20 dc 20 22 2f 2d 20 54 68 65 20 65 64 75 63 61 | . "/- The educa| 000026f0 74 65 64 20 63 68 6f 69 63 65 2e 20 22 0d 05 50 |ted choice. "..P| 00002700 07 dc 20 2a 0d 05 55 05 e1 0d 05 5a 04 0d 05 5f |.. *..U....Z..._| 00002710 d7 dd f2 4d 3a f2 76 28 31 33 29 3a c8 99 72 2c |...M:.v(13):..r,| 00002720 32 3a de 63 28 34 29 2c 64 28 34 29 2c 62 28 31 |2:.c(4),d(4),b(1| 00002730 30 29 2c 63 63 20 31 30 2c 61 28 33 2c 32 29 2c |0),cc 10,a(3,2),| 00002740 61 24 28 33 29 3a 63 28 29 3d 30 2c 30 2c 31 2c |a$(3):c()=0,0,1,| 00002750 30 2c 2d 31 3a 64 28 29 3d 30 2c 31 2c 30 2c 2d |0,-1:d()=0,1,0,-| 00002760 31 2c 30 3a 4f 61 3d a4 62 28 22 41 33 30 31 30 |1,0:Oa=.b("A3010| 00002770 44 61 74 61 39 33 3a 4e 61 72 72 6f 77 22 29 3a |Data93:Narrow"):| 00002780 6b 62 3d a4 62 28 22 41 33 30 31 30 44 61 74 61 |kb=.b("A3010Data| 00002790 39 33 3a 57 69 6d 70 50 61 6c 22 29 3a 70 61 3d |93:WimpPal"):pa=| 000027a0 a4 62 28 22 41 33 30 31 30 44 61 74 61 39 33 3a |.b("A3010Data93:| 000027b0 43 72 61 63 6b 22 29 3a 48 62 3d a4 62 28 22 41 |Crack"):Hb=.b("A| 000027c0 33 30 31 30 44 61 74 61 39 33 3a 57 6f 72 64 73 |3010Data93:Words| 000027d0 22 29 3a 66 3d 30 3a 41 3d 32 3a 64 63 3d 33 3a |"):f=0:A=2:dc=3:| 000027e0 65 63 3d 34 0d 05 64 52 66 63 3d 30 3a 67 63 3d |ec=4..dRfc=0:gc=| 000027f0 31 3a 68 63 3d 30 3a 69 63 3d 31 3a 6b 3d 31 2f |1:hc=0:ic=1:k=1/| 00002800 32 3a 68 61 3d 31 30 30 30 30 3a 50 3d 31 30 30 |2:ha=10000:P=100| 00002810 30 30 3a 74 61 3d 38 30 30 3a 48 3d 34 34 34 3a |00:ta=800:H=444:| 00002820 44 3d 34 35 32 3a 74 62 3d 36 36 30 3a 75 62 3d |D=452:tb=660:ub=| 00002830 32 30 3a f7 2b 30 0d 05 69 5c f3 48 24 3a f3 4a |20:.+0..i\.H$:.J| 00002840 24 3a f3 4b 24 3a f3 42 24 3a f3 43 24 3a f3 44 |$:.K$:.B$:.C$:.D| 00002850 24 3a f3 4e 24 3a f3 4f 24 3a f3 50 24 3a f3 51 |$:.N$:.O$:.P$:.Q| 00002860 24 3a f3 5a 24 3a f3 5f 24 3a 61 24 28 29 3d 22 |$:.Z$:._$:a$()="| 00002870 57 69 6e 64 6f 77 73 22 2c 22 49 63 6f 6e 73 22 |Windows","Icons"| 00002880 2c 22 4d 65 6e 75 73 22 2c 22 50 6f 69 6e 74 65 |,"Menus","Pointe| 00002890 72 22 0d 05 6e 25 dc 20 22 57 69 6c 6c 20 63 6f |r"..n%. "Will co| 000028a0 6e 6e 65 63 74 20 74 6f 20 61 20 64 6f 6d 65 73 |nnect to a domes| 000028b0 74 69 63 20 54 56 22 0d 05 73 23 dc 20 22 53 75 |tic TV"..s#. "Su| 000028c0 70 70 6f 72 74 73 20 73 74 61 6e 64 61 72 64 20 |pports standard | 000028d0 6a 6f 79 73 74 69 63 6b 73 22 0d 05 78 28 dc 20 |joysticks"..x(. | 000028e0 22 43 61 6e 20 63 6f 6e 6e 65 63 74 20 74 6f 20 |"Can connect to | 000028f0 65 78 74 65 72 6e 61 6c 20 73 70 65 61 6b 65 72 |external speaker| 00002900 73 22 0d 05 7d 24 dc 20 22 45 61 73 79 20 74 6f |s"..}$. "Easy to| 00002910 20 75 73 65 20 6f 70 65 72 61 74 69 6e 67 20 73 | use operating s| 00002920 79 73 74 65 6d 22 0d 05 82 26 dc 20 22 42 75 69 |ystem"...&. "Bui| 00002930 6c 74 2d 69 6e 20 61 70 70 6c 69 63 61 74 69 6f |lt-in applicatio| 00002940 6e 73 20 69 6e 63 6c 75 64 65 3a 22 0d 05 87 22 |ns include:"..."| 00002950 dc 20 22 42 75 6e 64 6c 65 64 20 73 6f 66 74 77 |. "Bundled softw| 00002960 61 72 65 20 69 6e 63 6c 75 64 65 73 3a 22 0d 05 |are includes:"..| 00002970 8c 3c dc 20 22 41 20 73 69 6d 70 6c 65 20 74 6f |.<. "A simple to| 00002980 20 75 73 65 7c 79 65 74 20 76 65 72 79 20 76 65 | use|yet very ve| 00002990 72 73 61 74 69 6c 65 7c 70 61 69 6e 74 69 6e 67 |rsatile|painting| 000029a0 20 70 72 6f 67 72 61 6d 2e 22 0d 05 91 60 dc 20 | program."...`. | 000029b0 22 41 6e 20 6f 62 6a 65 63 74 2d 62 61 73 65 64 |"An object-based| 000029c0 7c 64 72 61 77 69 6e 67 20 70 61 63 6b 61 67 65 ||drawing package| 000029d0 7c 74 68 61 74 20 63 61 6e 20 62 65 20 75 73 65 ||that can be use| 000029e0 64 7c 66 6f 72 20 61 6c 6c 20 73 6f 72 74 73 20 |d|for all sorts | 000029f0 6f 66 7c 63 6f 6d 70 75 74 65 72 20 61 69 64 65 |of|computer aide| 00002a00 64 7c 64 65 73 69 67 6e 2e 22 0d 05 96 7b dc 20 |d|design."...{. | 00002a10 22 41 20 68 75 67 65 20 72 61 6e 67 65 20 6f 66 |"A huge range of| 00002a20 7c 6d 75 73 69 63 61 6c 20 73 74 79 6c 65 73 7c ||musical styles|| 00002a30 63 61 6e 20 62 65 20 63 6f 6d 70 6f 73 65 64 7c |can be composed|| 00002a40 61 6e 64 20 70 6c 61 79 65 64 20 75 73 69 6e 67 |and played using| 00002a50 7c 4d 61 65 73 74 72 6f 2e 7c 4d 49 44 49 20 63 ||Maestro.|MIDI c| 00002a60 61 70 61 62 69 6c 69 74 79 7c 63 61 6e 20 62 65 |apability|can be| 00002a70 20 61 64 64 65 64 20 74 6f 7c 74 68 65 20 41 33 | added to|the A3| 00002a80 30 31 30 2e 22 0d 05 9b 3c dc 20 22 41 20 6e 6f |010."...<. "A no| 00002a90 20 6e 6f 6e 73 65 6e 73 65 7c 77 6f 72 64 20 70 | nonsense|word p| 00002aa0 72 6f 63 65 73 73 6f 72 7c 73 69 6d 70 6c 79 20 |rocessor|simply | 00002ab0 74 79 70 65 20 61 6e 64 7c 70 72 69 6e 74 21 20 |type and|print! | 00002ac0 22 0d 05 a0 20 dc 20 22 2e 20 2e 20 2e 20 49 74 |"... . ". . . It| 00002ad0 20 67 72 6f 77 73 20 79 6f 75 72 20 6d 69 6e 64 | grows your mind| 00002ae0 22 0d 05 a5 20 dc 20 22 49 74 20 62 6c 6f 77 73 |"... . "It blows| 00002af0 20 79 6f 75 72 20 6d 69 6e 64 20 2e 20 2e 20 2e | your mind . . .| 00002b00 22 0d 05 aa 05 e1 0d 05 af 04 0d 05 b4 81 dd f2 |"...............| 00002b10 4e 3a de 55 20 36 34 3a c8 99 34 31 2c 32 38 2c |N:.U 64:..41,28,| 00002b20 22 41 33 30 31 30 53 70 72 69 74 65 73 39 33 3a |"A3010Sprites93:| 00002b30 22 b8 2c 2c 2c 6a 63 3a de 62 24 28 6a 63 29 2c |".,,,jc:.b$(jc),| 00002b40 65 28 6a 63 29 2c 66 28 6a 63 29 3a 6b 63 3d 30 |e(jc),f(jc):kc=0| 00002b50 3a 6c 63 3d 30 3a f5 3a c8 99 31 32 2c 31 30 2c |:lc=0:.:..12,10,| 00002b60 22 41 33 30 31 30 53 70 72 69 74 65 73 39 33 3a |"A3010Sprites93:| 00002b70 22 2c 55 2c 31 2c 6b 63 2c 36 34 b8 2c 2c 2c 2c |",U,1,kc,64.,,,,| 00002b80 6b 63 3a e7 6b 63 3c 3e 2d 31 8c 0d 05 b9 b4 66 |kc:.kc<>-1.....f| 00002b90 24 3d 22 22 3a 69 3d 32 30 3a c8 95 55 3f 69 3c |$="":i=20:..U?i<| 00002ba0 3e 30 3a 66 24 2b 3d bd 28 55 3f 69 29 3a 69 2b |>0:f$+=.(U?i):i+| 00002bb0 3d 31 3a ce 3a de 6d 63 20 55 21 38 3a c8 99 38 |=1:.:.mc U!8:..8| 00002bc0 2c 32 35 35 2c 22 41 33 30 31 30 53 70 72 69 74 |,255,"A3010Sprit| 00002bd0 65 73 39 33 3a 22 2b 66 24 2c 6d 63 3a 62 24 28 |es93:"+f$,mc:b$(| 00002be0 6b 63 29 3d a4 64 28 66 24 29 3a 65 28 6b 63 29 |kc)=.d(f$):e(kc)| 00002bf0 3d 6d 63 2b 32 30 3a 66 28 6b 63 29 3d 55 21 38 |=mc+20:f(kc)=U!8| 00002c00 2d 32 30 3a c8 99 22 41 33 30 31 30 5f 4c 6f 61 |-20:.."A3010_Loa| 00002c10 64 53 71 75 61 73 68 65 64 22 2c 22 41 33 30 31 |dSquashed","A301| 00002c20 30 53 70 72 69 74 65 73 39 33 3a 22 2b 66 24 b8 |0Sprites93:"+f$.| 00002c30 6e 63 3a e7 6e 63 3e 6c 63 20 6c 63 3d 6e 63 0d |nc:.nc>lc lc=nc.| 00002c40 05 be 05 cd 0d 05 c3 49 fd 6b 63 3d 2d 31 3a 6c |.......I.kc=-1:l| 00002c50 63 2b 3d 36 34 3a de 6c 20 6c 63 3a 21 6c 3d 6c |c+=64:.l lc:!l=l| 00002c60 63 3a 6c 21 38 3d 31 36 3a c8 99 34 36 2c 32 36 |c:l!8=16:..46,26| 00002c70 35 2c 6c 3a c8 99 32 37 32 31 32 39 2c 38 2c 6c |5,l:..272129,8,l| 00002c80 63 b8 6f 63 3a de 70 63 20 6f 63 3a e1 0d 05 c8 |c.oc:.pc oc:....| 00002c90 de dd f2 4a 3a 76 3d a4 61 28 22 4f 53 5f 53 70 |...J:v=.a("OS_Sp| 00002ca0 72 69 74 65 4f 70 22 29 3a 71 63 3d a4 61 28 22 |riteOp"):qc=.a("| 00002cb0 41 33 30 31 30 5f 52 65 61 64 4d 6f 64 65 22 29 |A3010_ReadMode")| 00002cc0 3a 72 63 3d a4 61 28 22 41 33 30 31 30 5f 50 6c |:rc=.a("A3010_Pl| 00002cd0 6f 74 53 68 72 75 6e 6b 22 29 3a 73 63 3d a4 61 |otShrunk"):sc=.a| 00002ce0 28 22 41 33 30 31 30 5f 43 6c 65 61 72 41 72 65 |("A3010_ClearAre| 00002cf0 61 22 29 3a 75 3d a4 61 28 22 41 33 30 31 30 5f |a"):u=.a("A3010_| 00002d00 43 6f 70 79 4d 65 6d 6f 72 79 22 29 3a 4c 3d a4 |CopyMemory"):L=.| 00002d10 61 28 22 41 33 30 31 30 5f 50 6c 6f 74 46 61 64 |a("A3010_PlotFad| 00002d20 65 64 22 29 3a 72 3d a4 61 28 22 41 33 30 31 30 |ed"):r=.a("A3010| 00002d30 5f 42 61 6e 6b 73 22 29 3a 6f 3d a4 61 28 22 41 |_Banks"):o=.a("A| 00002d40 33 30 31 30 5f 53 77 61 70 42 61 6e 6b 73 22 29 |3010_SwapBanks")| 00002d50 3a 4b 61 3d a4 61 28 22 41 33 30 31 30 5f 50 6c |:Ka=.a("A3010_Pl| 00002d60 6f 74 4f 6e 57 68 69 74 65 22 29 0d 05 cd 59 74 |otOnWhite")...Yt| 00002d70 63 3d a4 61 28 22 41 33 30 31 30 5f 54 56 49 6e |c=.a("A3010_TVIn| 00002d80 74 65 72 66 65 72 65 6e 63 65 22 29 3a 75 63 3d |terference"):uc=| 00002d90 a4 61 28 22 41 33 30 31 30 5f 4c 6f 61 64 53 71 |.a("A3010_LoadSq| 00002da0 75 61 73 68 65 64 22 29 3a 71 61 3d a4 61 28 22 |uashed"):qa=.a("| 00002db0 41 33 30 31 30 5f 4d 61 73 6b 53 68 72 75 6e 6b |A3010_MaskShrunk| 00002dc0 22 29 3a e1 0d 05 d2 04 0d 05 d7 1b dd a4 61 28 |"):...........a(| 00002dd0 54 24 29 3a c8 99 35 37 2c 2c 54 24 b8 76 63 3a |T$):..57,,T$.vc:| 00002de0 3d 76 63 0d 05 dc 4e dd f2 63 28 61 24 29 3a 61 |=vc...N..c(a$):a| 00002df0 24 3d a4 64 28 61 24 29 3a 4e 3d 6a 63 2b 31 3a |$=.d(a$):N=jc+1:| 00002e00 f5 3a 4e 2d 3d 31 3a fd 61 24 3d 62 24 28 4e 29 |.:N-=1:.a$=b$(N)| 00002e10 84 4e 3d 30 3a e7 4e 3d 30 85 32 31 34 2c 22 53 |.N=0:.N=0.214,"S| 00002e20 70 72 69 74 65 73 20 6e 6f 74 20 66 6f 75 6e 64 |prites not found| 00002e30 22 0d 05 e1 26 c8 99 32 37 32 31 32 39 2c 34 2c |"...&..272129,4,| 00002e40 70 63 2c 65 28 4e 29 2c 66 28 4e 29 2c 6c 2b 34 |pc,e(N),f(N),l+4| 00002e50 2c 6c 63 2d 34 3a e1 0d 05 e6 04 0d 05 eb 45 dd |,lc-4:........E.| 00002e60 a4 64 28 69 24 29 3a 6f 24 3d 22 22 3a e3 77 63 |.d(i$):o$="":.wc| 00002e70 3d 31 b8 a9 69 24 3a 63 24 3d c1 69 24 2c 77 63 |=1..i$:c$=.i$,wc| 00002e80 2c 31 29 3a e7 63 24 3e 3d 22 41 22 80 63 24 3c |,1):.c$>="A".c$<| 00002e90 3d 22 5a 22 63 24 3d bd 28 97 63 24 2b 33 32 29 |="Z"c$=.(.c$+32)| 00002ea0 0d 05 f0 10 6f 24 2b 3d 63 24 3a ed 3a 3d 6f 24 |....o$+=c$:.:=o$| 00002eb0 0d 05 f5 38 dd f2 71 61 28 61 24 2c 62 2c 65 2c |...8..qa(a$,b,e,| 00002ec0 57 29 3a f2 65 28 61 24 2c 62 2c 65 2c a3 29 3a |W):.e(a$,b,e,.):| 00002ed0 c8 99 6f 3a c8 99 76 2c 32 39 30 2c 6c 2c 61 24 |..o:..v,290,l,a$| 00002ee0 2c 62 2c 65 2c 57 3a e1 0d 05 fa 04 0d 05 ff 4a |,b,e,W:........J| 00002ef0 dd f2 6b 28 61 24 2c 62 2c 65 2c 57 29 3a f2 65 |..k(a$,b,e,W):.e| 00002f00 28 61 24 2c 62 2c 65 2c a3 29 3a c8 99 76 2c 32 |(a$,b,e,.):..v,2| 00002f10 39 30 2c 6c 2c 61 24 2c 62 2c 65 2c 57 3a c8 99 |90,l,a$,b,e,W:..| 00002f20 6f 3a c8 99 76 2c 32 39 30 2c 6c 2c 61 24 2c 62 |o:..v,290,l,a$,b| 00002f30 2c 65 2c 57 3a e1 0d 06 04 04 0d 06 09 49 dd f2 |,e,W:........I..| 00002f40 6d 28 61 24 2c 62 2c 65 2c 77 2c 68 29 3a c8 99 |m(a$,b,e,w,h):..| 00002f50 76 2c 32 37 32 2c 6c 2c 61 24 2c 30 2c 62 2c 65 |v,272,l,a$,0,b,e| 00002f60 2c 62 2b 28 77 2d 31 29 2a 52 2c 65 2b 28 68 2d |,b+(w-1)*R,e+(h-| 00002f70 31 29 2a 34 3a c8 99 76 2c 33 31 30 2c 6c 2c 61 |1)*4:..v,310,l,a| 00002f80 24 3a e1 0d 06 0e 04 0d 06 13 52 dd f2 7a 28 61 |$:........R..z(a| 00002f90 24 2c 62 2c 65 29 3a f2 65 28 61 24 2c 62 2c 65 |$,b,e):.e(a$,b,e| 00002fa0 2c a3 29 3a c8 99 76 2c 32 37 32 2c 6c 2c 61 24 |,.):..v,272,l,a$| 00002fb0 2c 30 2c 62 2c 65 2c 62 2b 28 67 2d 31 29 2a 52 |,0,b,e,b+(g-1)*R| 00002fc0 2c 65 2b 28 6a 2d 31 29 2a 34 3a c8 99 76 2c 33 |,e+(j-1)*4:..v,3| 00002fd0 31 30 2c 6c 2c 61 24 3a e1 0d 06 18 04 0d 06 1d |10,l,a$:........| 00002fe0 2b dd f2 62 28 73 2c 61 24 2c 62 2c 65 29 3a f2 |+..b(s,a$,b,e):.| 00002ff0 65 28 61 24 2c 62 2c 65 2c b9 29 3a 7a 61 3d 31 |e(a$,b,e,.):za=1| 00003000 35 3a e7 eb 3d 31 32 8c 0d 06 22 12 e7 73 3d 66 |5:..=12..."..s=f| 00003010 20 73 3d 64 63 3a 7a 61 3d 38 0d 06 27 12 e7 73 | s=dc:za=8..'..s| 00003020 3d 41 20 73 3d 65 63 3a 7a 61 3d 38 0d 06 2c 05 |=A s=ec:za=8..,.| 00003030 cd 0d 06 31 2c e3 49 3d 7a 61 b8 30 88 2d 31 3a |...1,.I=za.0.-1:| 00003040 c8 99 6f 3a c8 99 4c 2c 6d 2c 62 2c 65 2c 67 2c |..o:..L,m,b,e,g,| 00003050 6a 2c 49 2c 73 3a e7 eb 3d 31 32 c8 96 0d 06 36 |j,I,s:..=12....6| 00003060 1d ed 3a c8 99 6f 3a c8 99 4c 2c 6d 2c 62 2c 65 |..:..o:..L,m,b,e| 00003070 2c 67 2c 6a 2c 30 2c 73 3a e1 0d 06 3b 04 0d 06 |,g,j,0,s:...;...| 00003080 40 2a dd f2 68 28 73 2c 61 24 2c 62 2c 65 29 3a |@*..h(s,a$,b,e):| 00003090 f2 65 28 61 24 2c 62 2c 65 2c b9 29 3a 5a 3d 31 |.e(a$,b,e,.):Z=1| 000030a0 35 3a e7 eb 3d 31 32 8c 0d 06 45 11 e7 73 3d 66 |5:..=12...E..s=f| 000030b0 20 73 3d 64 63 3a 5a 3d 38 0d 06 4a 11 e7 73 3d | s=dc:Z=8..J..s=| 000030c0 41 20 73 3d 65 63 3a 5a 3d 38 0d 06 4f 05 cd 0d |A s=ec:Z=8..O...| 000030d0 06 54 3a e3 49 3d 30 b8 5a 3a c8 99 6f 3a c8 99 |.T:.I=0.Z:..o:..| 000030e0 4c 2c 6d 2c 62 2c 65 2c 67 2c 6a 2c 49 2c 73 3a |L,m,b,e,g,j,I,s:| 000030f0 ed 3a c8 99 6f 3a c8 99 4c 2c 6d 2c 62 2c 65 2c |.:..o:..L,m,b,e,| 00003100 67 2c 6a 2c 5a 2c 73 3a e1 0d 06 59 04 0d 06 5e |g,j,Z,s:...Y...^| 00003110 c5 dd f2 64 28 61 24 2c 62 2c 65 2c 42 2c 43 29 |...d(a$,b,e,B,C)| 00003120 3a f2 65 28 61 24 2c 62 2c 65 2c b9 29 3a 51 3d |:.e(a$,b,e,.):Q=| 00003130 62 2b 67 2a 42 2a 52 2f 34 3a 53 3d 65 2b 6a 2a |b+g*B*R/4:S=e+j*| 00003140 43 3a 54 3d 31 2e 32 3a 73 62 3d a8 28 aa 28 36 |C:T=1.2:sb=.(.(6| 00003150 35 35 33 36 2f 31 32 38 29 2f aa 28 54 29 29 3a |5536/128)/.(T)):| 00003160 e3 69 3d 73 62 b8 30 88 2d 31 3a 74 3d 54 5e 69 |.i=sb.0.-1:t=T^i| 00003170 3a 78 3d 51 2b 28 62 2d 51 29 2f 74 3a 79 3d 53 |:x=Q+(b-Q)/t:y=S| 00003180 2b 28 65 2d 53 29 2f 74 3a c8 99 6f 3a c8 99 72 |+(e-S)/t:..o:..r| 00003190 63 2c 6d 2c 78 2c 79 2c 67 2c 6a 2c 36 35 35 33 |c,m,x,y,g,j,6553| 000031a0 36 2f 74 2c 36 35 35 33 36 2f 74 3a ed 3a c8 99 |6/t,65536/t:.:..| 000031b0 6f 3a c8 99 72 63 2c 6d 2c 78 2c 79 2c 67 2c 6a |o:..rc,m,x,y,g,j| 000031c0 2c 36 35 35 33 36 2f 74 2c 36 35 35 33 36 2f 74 |,65536/t,65536/t| 000031d0 3a e1 0d 06 63 04 0d 06 68 e2 dd f2 6f 28 61 24 |:...c...h...o(a$| 000031e0 2c 62 2c 65 2c 42 2c 43 2c 78 63 29 3a f2 65 28 |,b,e,B,C,xc):.e(| 000031f0 61 24 2c 62 2c 65 2c b9 29 3a 51 3d 62 2b 67 2a |a$,b,e,.):Q=b+g*| 00003200 42 2a 52 2f 34 3a 53 3d 65 2b 6a 2a 43 3a 54 3d |B*R/4:S=e+j*C:T=| 00003210 31 2e 32 3a 73 62 3d a8 28 aa 28 36 35 35 33 36 |1.2:sb=.(.(65536| 00003220 2f 31 32 38 29 2f aa 28 54 29 29 3a e3 69 3d 30 |/128)/.(T)):.i=0| 00003230 b8 73 62 3a 74 3d 54 5e 69 3a 78 3d 51 2b 28 62 |.sb:t=T^i:x=Q+(b| 00003240 2d 51 29 2f 74 3a 79 3d 53 2b 28 65 2d 53 29 2f |-Q)/t:y=S+(e-S)/| 00003250 74 3a c8 99 6f 3a c8 99 22 41 33 30 31 30 5f 43 |t:..o:.."A3010_C| 00003260 6c 65 61 72 41 72 65 61 22 2c 78 63 2c 62 2c 65 |learArea",xc,b,e| 00003270 2c 67 2c 6a 3a c8 99 72 63 2c 6d 2c 78 2c 79 2c |,g,j:..rc,m,x,y,| 00003280 67 2c 6a 2c 36 35 35 33 36 2f 74 2c 36 35 35 33 |g,j,65536/t,6553| 00003290 36 2f 74 3a ed 3a c8 99 22 41 33 30 31 30 5f 43 |6/t:.:.."A3010_C| 000032a0 6c 65 61 72 41 72 65 61 22 2c 78 63 2c 62 2c 65 |learArea",xc,b,e| 000032b0 2c 67 2c 6a 3a c8 99 6f 0d 06 6d 24 c8 99 22 41 |,g,j:..o..m$.."A| 000032c0 33 30 31 30 5f 43 6c 65 61 72 41 72 65 61 22 2c |3010_ClearArea",| 000032d0 78 63 2c 62 2c 65 2c 67 2c 6a 3a e1 0d 06 72 04 |xc,b,e,g,j:...r.| 000032e0 0d 06 77 37 dd f2 6a 28 73 2c 64 24 2c 68 24 2c |..w7..j(s,d$,h$,| 000032f0 61 25 2c 62 2c 65 29 3a f2 74 28 64 24 2c 68 24 |a%,b,e):.t(d$,h$| 00003300 2c 61 25 2c 62 2c 65 29 3a f2 62 28 73 2c 22 22 |,a%,b,e):.b(s,""| 00003310 2c 62 2c 65 29 3a e1 0d 06 7c 04 0d 06 81 37 dd |,b,e):...|....7.| 00003320 f2 69 28 73 2c 64 24 2c 68 24 2c 61 25 2c 62 2c |.i(s,d$,h$,a%,b,| 00003330 65 29 3a f2 74 28 64 24 2c 68 24 2c 61 25 2c 62 |e):.t(d$,h$,a%,b| 00003340 2c 65 29 3a f2 68 28 73 2c 22 22 2c 62 2c 65 29 |,e):.h(s,"",b,e)| 00003350 3a e1 0d 06 86 04 0d 06 8b 1e dd f2 79 28 73 29 |:...........y(s)| 00003360 3a f2 49 3a f2 68 28 73 2c 22 22 2c 79 63 2c 7a |:.I:.h(s,"",yc,z| 00003370 63 29 3a e1 0d 06 90 04 0d 06 95 3b dd f2 66 28 |c):........;..f(| 00003380 64 24 2c 68 24 2c 61 25 2c 62 2c 65 2c 42 2c 43 |d$,h$,a%,b,e,B,C| 00003390 29 3a f2 74 28 64 24 2c 68 24 2c 61 25 2c 62 2c |):.t(d$,h$,a%,b,| 000033a0 65 29 3a f2 64 28 22 22 2c 62 2c 65 2c 42 2c 43 |e):.d("",b,e,B,C| 000033b0 29 3a e1 0d 06 9a 04 0d 06 9f 42 dd f2 64 61 28 |):........B..da(| 000033c0 64 24 2c 68 24 2c 61 25 2c 62 2c 65 2c 42 2c 43 |d$,h$,a%,b,e,B,C| 000033d0 2c 78 63 29 3a f2 74 28 64 24 2c 68 24 2c 61 25 |,xc):.t(d$,h$,a%| 000033e0 2c 62 2c 65 29 3a f2 6f 28 22 22 2c 62 2c 65 2c |,b,e):.o("",b,e,| 000033f0 42 2c 43 2c 78 63 29 3a e1 0d 06 a4 04 0d 06 a9 |B,C,xc):........| 00003400 29 dd f2 65 61 28 42 2c 43 2c 78 63 29 3a f2 49 |)..ea(B,C,xc):.I| 00003410 3a f2 6f 28 22 22 2c 79 63 2c 7a 63 2c 42 2c 43 |:.o("",yc,zc,B,C| 00003420 2c 78 63 29 3a e1 0d 06 ae 04 0d 06 b3 41 dd f2 |,xc):........A..| 00003430 49 3a c8 99 76 2c 32 39 36 2c 4f 2c 22 77 6f 72 |I:..v,296,O,"wor| 00003440 64 73 22 b8 2c 2c 2c 67 2c 6a 3a c8 99 76 2c 32 |ds".,,,g,j:..v,2| 00003450 38 30 2c 4f 2c 22 77 6f 72 64 73 22 b8 2c 2c 6d |80,O,"words".,,m| 00003460 3a 6d 3d 6d 2b 6d 21 33 32 3a e1 0d 06 b8 04 0d |:m=m+m!32:......| 00003470 06 bd 28 dd f2 65 28 61 24 2c f8 78 2c f8 79 2c |..(..e(a$,.x,.y,| 00003480 41 63 29 3a e7 61 24 3c 3e 22 22 f2 6c 28 61 24 |Ac):.a$<>"".l(a$| 00003490 2c 67 2c 6a 2c 6d 29 0d 06 c2 14 e7 78 3c 30 78 |,g,j,m).....x<0x| 000034a0 3d 2d 78 2d 28 67 2a 52 29 2f 32 0d 06 c7 20 e7 |=-x-(g*R)/2... .| 000034b0 78 3e 31 32 38 30 78 3d 31 32 38 30 2d 28 67 2b |x>1280x=1280-(g+| 000034c0 31 29 2a 52 2d 28 68 61 2d 78 29 0d 06 cc 14 e7 |1)*R-(ha-x).....| 000034d0 79 3c 30 79 3d 2d 79 2d 28 6a 2a 34 29 2f 32 0d |y<0y=-y-(j*4)/2.| 000034e0 06 d1 1f e7 79 3e 31 30 32 34 79 3d 31 30 32 34 |....y>1024y=1024| 000034f0 2d 28 6a 2b 31 29 2a 34 2d 28 50 2d 79 29 0d 06 |-(j+1)*4-(P-y)..| 00003500 d6 08 e7 41 63 8c 0d 06 db 17 78 3d 78 81 34 3a |...Ac.....x=x.4:| 00003510 79 3d 32 35 36 2d 28 79 81 34 29 2d 6a 0d 06 e0 |y=256-(y.4)-j...| 00003520 05 cd 0d 06 e5 05 e1 0d 06 ea 04 0d 06 ef 44 dd |..............D.| 00003530 f2 6c 28 61 24 2c f8 77 2c f8 68 2c f8 61 29 3a |.l(a$,.w,.h,.a):| 00003540 c8 99 76 2c 32 39 36 2c 6c 2c 61 24 b8 2c 2c 2c |..v,296,l,a$.,,,| 00003550 77 2c 68 3a c8 99 76 2c 32 38 30 2c 6c 2c 61 24 |w,h:..v,280,l,a$| 00003560 b8 2c 2c 61 3a 61 3d 61 2b 61 21 33 32 3a e1 0d |.,,a:a=a+a!32:..| 00003570 06 f4 04 0d 06 f9 22 dd f2 61 28 43 61 29 3a 44 |......"..a(Ca):D| 00003580 61 3d 91 3a f5 fd 91 3e 44 61 2b 43 61 80 ac a6 |a=.:...>Da+Ca...| 00003590 2d 39 39 3a e1 0d 06 fe 04 0d 07 03 de dd f2 4c |-99:...........L| 000035a0 3a 75 24 3d 22 54 72 69 6e 69 74 79 2e 4d 65 64 |:u$="Trinity.Med| 000035b0 69 75 6d 22 3a 7a 24 3d 75 24 2b 22 2e 49 74 61 |ium":z$=u$+".Ita| 000035c0 6c 69 63 22 3a 55 24 3d 22 54 72 69 6e 69 74 79 |lic":U$="Trinity| 000035d0 2e 42 6f 6c 64 22 3a 74 24 3d 55 24 2b 22 2e 49 |.Bold":t$=U$+".I| 000035e0 74 61 6c 69 63 22 3a 78 24 3d 22 48 6f 6d 65 72 |talic":x$="Homer| 000035f0 74 6f 6e 2e 4d 65 64 69 75 6d 22 3a 71 24 3d 78 |ton.Medium":q$=x| 00003600 24 2b 22 2e 4f 62 6c 69 71 75 65 22 3a 56 24 3d |$+".Oblique":V$=| 00003610 22 48 6f 6d 65 72 74 6f 6e 2e 42 6f 6c 64 22 3a |"Homerton.Bold":| 00003620 6a 24 3d 56 24 2b 22 2e 4f 62 6c 69 71 75 65 22 |j$=V$+".Oblique"| 00003630 3a 73 24 3d 22 43 6f 72 70 75 73 2e 4d 65 64 69 |:s$="Corpus.Medi| 00003640 75 6d 22 3a 60 24 3d 73 24 2b 22 2e 4f 62 6c 69 |um":`$=s$+".Obli| 00003650 71 75 65 22 3a 57 24 3d 22 43 6f 72 70 75 73 2e |que":W$="Corpus.| 00003660 42 6f 6c 64 22 3a 61 61 24 3d 57 24 2b 22 2e 4f |Bold":aa$=W$+".O| 00003670 62 6c 69 71 75 65 22 0d 07 08 4e c8 99 32 36 32 |blique"...N..262| 00003680 32 38 31 2c 2c 31 32 38 30 2c 31 b8 2c 42 63 2c |281,,1280,1.,Bc,| 00003690 43 63 3a 79 24 3d 22 22 3a e3 63 3d 33 32 b8 31 |Cc:y$="":.c=32.1| 000036a0 32 36 3a 79 24 2b 3d bd 63 3a ed 3a 79 24 2b 3d |26:y$+=.c:.:y$+=| 000036b0 22 8c 90 91 8f 22 3a f2 72 61 28 34 38 2a 31 30 |"....":.ra(48*10| 000036c0 32 34 29 3a e1 0d 07 0d 04 0d 07 12 a0 dd f2 74 |24):...........t| 000036d0 28 64 24 2c 68 24 2c 61 25 2c f8 4a 2c 47 29 3a |(d$,h$,a%,.J,G):| 000036e0 44 63 3d a4 63 28 68 24 2c 94 61 25 29 3a c8 99 |Dc=.c(h$,.a%):..| 000036f0 32 36 32 32 39 35 2c 44 63 2c 79 24 b8 2c 2c 46 |262295,Dc,y$.,,F| 00003700 63 2c 2c 47 63 3a c8 99 32 36 32 32 39 35 2c 44 |c,,Gc:..262295,D| 00003710 63 2c 64 24 b8 2c 48 63 2c 2c 49 63 3a 4a 63 3d |c,d$.,Hc,,Ic:Jc=| 00003720 34 2a a8 28 2d 46 63 2f 28 43 63 2a 34 29 2b 30 |4*.(-Fc/(Cc*4)+0| 00003730 2e 35 29 3a 4b 63 3d 38 2a a8 28 49 63 2f 28 43 |.5):Kc=8*.(Ic/(C| 00003740 63 2a 38 29 2b 30 2e 35 29 3a 4c 63 3d 34 2a a8 |c*8)+0.5):Lc=4*.| 00003750 28 28 47 63 2d 46 63 29 2f 28 43 63 2a 34 29 2b |((Gc-Fc)/(Cc*4)+| 00003760 30 2e 35 29 3a c8 8e eb ca 0d 07 17 1a c9 31 32 |0.5):.........12| 00003770 3a c8 99 32 36 32 32 39 30 2c 44 63 2c 37 2c 36 |:..262290,Dc,7,6| 00003780 2c 2d 36 0d 07 1c 0e c9 31 33 3a e7 61 25 3c 30 |,-6.....13:.a%<0| 00003790 8c 0d 07 21 1b c8 99 32 36 32 32 39 31 2c 2c 30 |...!...262291,,0| 000037a0 2c 31 2c 31 34 2c 30 2c 2d 32 35 36 0d 07 26 1d |,1,14,0,-256..&.| 000037b0 cc 3a c8 99 32 36 32 32 39 31 2c 2c 30 2c 31 2c |.:..262291,,0,1,| 000037c0 31 34 2c 2d 32 35 36 2c 30 0d 07 2b 05 cd 0d 07 |14,-256,0..+....| 000037d0 30 16 c8 99 32 36 32 32 39 30 2c 44 63 2c 30 2c |0...262290,Dc,0,| 000037e0 31 2c 31 34 0d 07 35 13 7f 3a 85 31 2c 22 42 61 |1,14..5..:.1,"Ba| 000037f0 64 20 6d 6f 64 65 22 0d 07 3a 05 cb 0d 07 3f 11 |d mode"..:....?.| 00003800 e7 4a 3c 30 4a 3d 2d 4a 2d 4b 63 2f 32 0d 07 44 |.J<0J=-J-Kc/2..D| 00003810 6c 4d 63 3d 31 36 2a 28 4a 81 31 36 29 3a 4b 63 |lMc=16*(J.16):Kc| 00003820 3d 28 4b 63 2b 4a 2d 4d 63 2b 32 29 80 ac 32 3a |=(Kc+J-Mc+2)..2:| 00003830 f2 73 61 28 4b 63 2c 4c 63 2b 34 29 3a c8 99 32 |.sa(Kc,Lc+4):..2| 00003840 36 32 32 37 38 2c 44 63 2c 64 24 2c 31 36 2c 4a |62278,Dc,d$,16,J| 00003850 2d 4d 63 2c 4a 63 2b 34 3a c8 99 32 36 32 32 37 |-Mc,Jc+4:..26227| 00003860 34 2c 44 63 3a f2 74 61 3a 4a 3d 4d 63 3a 79 63 |4,Dc:.ta:J=Mc:yc| 00003870 3d 4a 3a 7a 63 3d 47 3a e1 0d 07 49 04 0d 07 4e |=J:zc=G:...I...N| 00003880 3e dd a4 63 28 68 24 2c 61 25 29 3a c8 99 32 36 |>..c(h$,a%):..26| 00003890 32 32 37 33 2c 2c 68 24 2c 61 25 2a 31 36 2c 61 |2273,,h$,a%*16,a| 000038a0 25 2a 31 36 2c 30 2c 30 b8 4e 63 3a c8 99 32 36 |%*16,0,0.Nc:..26| 000038b0 32 32 38 32 2c 4e 63 3a 3d 4e 63 0d 07 53 16 dd |2282,Nc:=Nc..S..| 000038c0 f2 73 61 28 4f 63 2c 50 63 29 3a e7 eb 3d 31 32 |.sa(Oc,Pc):..=12| 000038d0 8c 0d 07 58 0a 67 3d 4f 63 81 32 0d 07 5d 0c cc |...X.g=Oc.2..]..| 000038e0 3a 67 3d 4f 63 81 34 0d 07 62 05 cd 0d 07 67 5c |:g=Oc.4..b....g\| 000038f0 6a 3d 50 63 81 34 3a c8 99 76 2c 32 37 31 2c 4f |j=Pc.4:..v,271,O| 00003900 2c 22 77 6f 72 64 73 22 2c 30 2c 67 2c 6a 2c eb |,"words",0,g,j,.| 00003910 3a c8 99 76 2c 33 31 36 2c 4f 2c 22 77 6f 72 64 |:..v,316,O,"word| 00003920 73 22 3a c8 99 76 2c 32 38 30 2c 4f 2c 22 77 6f |s":..v,280,O,"wo| 00003930 72 64 73 22 b8 2c 2c 6d 3a 6d 3d 6d 2b 6d 21 33 |rds".,,m:m=m+m!3| 00003940 32 3a e7 eb 3d 31 32 8c 0d 07 6c 0a e6 31 32 38 |2:..=12...l..128| 00003950 2b 37 0d 07 71 0c cc 3a e7 61 25 3c 30 8c 0d 07 |+7..q..:.a%<0...| 00003960 76 0d e6 31 32 38 2b 30 c8 9c 30 0d 07 7b 12 cc |v..128+0..0..{..| 00003970 3a e6 31 32 38 2b 36 33 c8 9c 31 39 32 0d 07 80 |:.128+63..192...| 00003980 05 cd 0d 07 85 05 cd 0d 07 8a 07 da 3a e1 0d 07 |............:...| 00003990 8f 04 0d 07 94 17 dd f2 74 61 3a c8 99 76 2c 33 |........ta:..v,3| 000039a0 31 36 2c 4f 2c 2c 31 3a e1 0d 07 99 04 0d 07 9e |16,O,,1:........| 000039b0 2b dd f2 72 61 28 51 63 29 3a de 4f 20 51 63 3a |+..ra(Qc):.O Qc:| 000039c0 21 4f 3d 51 63 3a 4f 21 38 3d 31 36 3a c8 99 76 |!O=Qc:O!8=16:..v| 000039d0 2c 32 36 35 2c 4f 3a e1 0d 07 a3 04 0d 07 a8 6f |,265,O:........o| 000039e0 dd f2 6e 3a c8 99 75 2c 2c 6c 2b 34 3a c8 99 34 |..n:..u,,l+4:..4| 000039f0 37 2c 30 2c 32 34 b8 2c 2c 4b 3a 4b 3d 28 4b 3e |7,0,24.,,K:K=(K>| 00003a00 3e 3e 38 29 80 28 31 35 37 39 30 33 32 30 29 3a |>>8).(15790320):| 00003a10 72 61 3d 28 4b 3d 31 35 37 39 30 33 32 30 29 3a |ra=(K=15790320):| 00003a20 71 3d 30 3a e3 49 3d 30 b8 31 35 3a c8 99 6f 3a |q=0:.I=0.15:..o:| 00003a30 e7 ac 72 61 ef 31 39 2c 30 2c 32 34 2c 71 2a 31 |..ra.19,0,24,q*1| 00003a40 37 2c 71 2a 31 37 2c 71 2a 31 37 0d 07 ad 3d c8 |7,q*17,q*17...=.| 00003a50 99 4c 2c 6c 2b 34 2c 30 2c 30 2c 33 32 30 2c 32 |.L,l+4,0,0,320,2| 00003a60 35 36 2c 49 2c 30 3a 71 3d 49 3a ed 3a e7 ac 72 |56,I,0:q=I:.:..r| 00003a70 61 ef 31 39 2c 30 2c 32 34 2c 71 2a 31 37 2c 71 |a.19,0,24,q*17,q| 00003a80 2a 31 37 2c 71 2a 31 37 0d 07 b2 22 c8 99 6f 3a |*17,q*17..."..o:| 00003a90 c8 99 4c 2c 6c 2b 34 2c 30 2c 30 2c 33 32 30 2c |..L,l+4,0,0,320,| 00003aa0 32 35 36 2c 31 35 2c 30 3a e1 0d 07 b7 04 0d 07 |256,15,0:.......| 00003ab0 bc 69 dd f2 41 3a c8 99 75 2c 2c 6c 2b 34 3a c8 |.i..A:..u,,l+4:.| 00003ac0 99 34 37 2c 30 2c 32 34 b8 2c 2c 4b 3a 4b 3d 28 |.47,0,24.,,K:K=(| 00003ad0 4b 3e 3e 3e 38 29 80 28 31 35 37 39 30 33 32 30 |K>>>8).(15790320| 00003ae0 29 3a 52 63 3d 28 4b 3d 30 29 3a 71 3d 31 35 3a |):Rc=(K=0):q=15:| 00003af0 e3 49 3d 30 b8 31 35 3a c8 99 6f 3a e7 ac 52 63 |.I=0.15:..o:..Rc| 00003b00 ef 31 39 2c 30 2c 32 34 2c 71 2a 31 37 2c 71 2a |.19,0,24,q*17,q*| 00003b10 31 37 2c 71 2a 31 37 0d 07 c1 40 c8 99 4c 2c 6c |17,q*17...@..L,l| 00003b20 2b 34 2c 30 2c 30 2c 33 32 30 2c 32 35 36 2c 49 |+4,0,0,320,256,I| 00003b30 2c 32 3a 71 3d 31 35 2d 49 3a ed 3a e7 ac 52 63 |,2:q=15-I:.:..Rc| 00003b40 ef 31 39 2c 30 2c 32 34 2c 71 2a 31 37 2c 71 2a |.19,0,24,q*17,q*| 00003b50 31 37 2c 71 2a 31 37 0d 07 c6 22 c8 99 6f 3a c8 |17,q*17..."..o:.| 00003b60 99 4c 2c 6c 2b 34 2c 30 2c 30 2c 33 32 30 2c 32 |.L,l+4,0,0,320,2| 00003b70 35 36 2c 31 35 2c 32 3a e1 0d 07 cb 04 0d 07 d0 |56,15,2:........| 00003b80 39 dd f2 76 28 53 63 29 3a c8 99 75 3a c8 96 3a |9..v(Sc):..u:..:| 00003b90 eb 31 35 3a eb 53 63 3a 87 3a c8 99 22 41 33 30 |.15:.Sc:.:.."A30| 00003ba0 31 30 5f 52 65 61 64 4d 6f 64 65 22 3a e7 53 63 |10_ReadMode":.Sc| 00003bb0 3d 31 32 52 3d 32 0d 07 d5 0d e7 53 63 3d 31 33 |=12R=2.....Sc=13| 00003bc0 52 3d 34 0d 07 da 05 e1 0d 07 df 04 0d 07 e4 59 |R=4............Y| 00003bd0 dd a4 62 28 47 24 29 3a f5 3a c8 99 31 33 31 30 |..b(G$):.:..1310| 00003be0 38 30 2c 35 2c 47 24 b8 2c 2c 2c 2c 6e 63 3b 56 |80,5,G$.,,,,nc;V| 00003bf0 3a fd 28 56 80 31 29 3d 30 3a de 6d 63 20 6e 63 |:.(V.1)=0:.mc nc| 00003c00 3a f5 3a c8 99 31 33 31 30 38 30 2c 32 35 35 2c |:.:..131080,255,| 00003c10 47 24 2c 6d 63 b8 3b 56 3a fd 28 56 80 31 29 3d |G$,mc.;V:.(V.1)=| 00003c20 30 3a 3d 6d 63 0d 07 e9 3b dd a4 65 28 54 63 29 |0:=mc...;..e(Tc)| 00003c30 3a c8 99 76 2c 32 36 34 2c 6c b8 2c 2c 55 63 2c |:..v,264,l.,,Uc,| 00003c40 2c 2c 56 63 3a e7 55 63 2d 56 63 3c 54 63 85 31 |,,Vc:.Uc-Vc<Tc.1| 00003c50 2c 22 4f 75 74 20 6f 66 20 6d 65 6d 6f 72 79 22 |,"Out of memory"| 00003c60 0d 07 ee 09 3d 6c 2b 56 63 0d ff |....=l+Vc..| 00003c6b