(\W`gIHCp SY26V#61}::=['] \ ::=

STOP΀n:x ,,,: ,,:  : : ,: ,/ A : B: CHCHB: A,B: Ae A /: B: CHCHB: A,B: A:  , ,: "#"(,%)"#": ,: "$";);"$": , : "$ KEYBOARD BLASTER $": , : "$";);"$": , : "#"(,%)"#"%  ,: "F1 PAUSE":  ,: "F2 STOP"  ,: ,:  ,: ,: ,: ,: ,: ,:  ,F:  ,:  , A ?: B: CHCHB: A,B: Aނ : A@ : B: CHCHB: A,B: A : A : B: CHCHB: A,B: A= A : B: CHCHB: A,B: A A : S$"": B  : C: CHCHC: S$S$(C): B: $(A)S$: Aƒ CHE : : "Fout in dataregels.": A  : A,a: A A  : A,Q: A!  ,a:  ,:  ,!G A : A,(A): Al A : A0,(A): A" A : A,(A): A, A! ': A,(A): Aۄ6 A( .: A,(A): A@ A  : A,A: A#J *: AZ: E$(`),A$(d): . hT A : B  : C: CHCHC: S$(A)S$(A)(C): B: A^ CH0 : : "Fout in dataregels.": Ʌh A d: A$(A): A$(A)A$(A)" ": ArN$"microware": HS: E$()"LOW "| A : E1$E1$(A): A: A : E2$E2$(A): A^ A : E3$E3$(A): AE4$(,)(,): E5$(,)ކQ: A` 9 : QQ: B : E$(A(B))E4$(Q,)(E3$,B,): B: A9Q: A8  : QQ: B : E$(A(B))E5$(Q,)(E2$,B,): B: AQ: A  : QQ: B : E$(A(B))(Q,)(E1$,B,): B: A:: titelbeeld ********************LJ:: E`: L:  ,: V: ,oA$()()()()()()()()()()()()()()()()؈B$()()()()()()()()()()()()()() A  : A,: AW , : A  : B  A : ,(B): B,: (A$,A,)" ": B: A A  : B A : ,(B): B,: " "(B$,A,): B: A: ,Ӊ A  : A,A: A& ,: "COPYRIGHT @ 1987 MICROWARE"0 ,: "R.VAN HOUT"@: , : "HIGH SCORE **#####";HSD ,: "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%#$ $$ ENERGY LEVEL 01 $$ $$ :;<=>? SCORE $& &";N "!''''''''''''''''''''''''''''''";: ,!: ,: "\ \";E$(`): ,: "**#####";SCNjX X_  : ,: "\ \";E$(X): () ϋb Xl X ` : ,: "\ \";E$(X): () v X$ X,:T: spel hoofdlus *****************\: A : ,A:  );: A: NT: SC: A(): ,: "0000000"⌲ ,: "#";(,"%");"#&";);"&!";(,"'");"!"$( )(&B1)$( )(&B10)(&B111)(&B10)Z A  : A,((),(A )), , : A A  : A,((),(A )), , : Aҍ A  : A,((),(A) ),, : A  A : A,((),(A)),, : AΎC$(): D$()"welcome to KEYBOARD BLASTER"C$"written by r. van hout"C$"type away the words before they reach the laser beam"C$"good luck..."C$"high score"(HS)" by "N$" "A$"KEYBOARD BLASTER": B$"keyboard blaster"   ,: ,: A (D$): ,: (D$,A,): ,: W F: W: , : W : W: A$,B$: (D$,*,)A$͏ X` XX: ,: "\ \";E$(X) : ,: E$(`)Տ  Aߏ* ,4() : () *> ,: "#";(,"%");"#$";);"$#";(,"%");"#"HV: W": S1: S2: ,(,),,: A : A,(,(A)),,: A: ,(,w),,: pR NT NT : ڐ\ E\ EE : E`f .p L LL:  ,L: VV: WW: ,: "##";L : Jz L ,: "0"ɑ ,: ,8: A(V) (V): , S1: ,A: ,A: $()S$(S1): S1,S2: B : (B),A: Bᑎ ,( ) @( C : DC: D,(C(D)): C: A: ,WI(d()): H(()): X()sS!: N(A$(I)): T"A$(!)A$(I) J !N ,( ) @ʒ !,H: (A$,J,!) C : DC: D,(C(D)): C$()S$(S1): S1,S2? T(A$) NTNT: R ,: I$: I$(A$,T,) (A$,T)" ": TT: SS: SCSCL:  : I$"" EE: Ɠ J(S")W J!NΓ J (H) V,((H) V) 6$ ,: ,0: EE: E ,EA1: ,EA&PN. ,( ) @X8 B C : DC: D,(C(D)): CL$()S$(S1): S1,S2̔V(A$,T)" ": TT: SS` V,H: (A$,T, V): (H) V,((H) V) 8j T(A$) ,: NTNT: RBt $J~:q: plaatsen score & energie *****y: E Eʕ ,: "\ \";E$(E): ,: "**#####";SC# E A : A,(,): A: ,: ,H:  ): W 2: W: )1:X: einde spel *******************`:() : () :  ,: A : ,A: ( ,): AӖ ,: ,: ,: ,:  ,d:  ,* A (:  ,f: W Z: W:  ,: W Z: W: A: W d: WL ,: ,: ,8:  ,i A(): W : W A : A,(,),,: A SCHS nǗ(HSSC: ,: "NEW HIGH SCORE"2 , : "NAME ..............":  , <N$"": A F ,: A$$(): A$( ) Z : A$() A AA: N$(N$,A): A , : ".";();: F : A$" " A$"A" A$"Z" FטP A$;:  ,: W x: W: N$N$A$: A8Z N$"" A (N$): ((N$,A,))@ (N$,A,)(((N$,A,)) ): A : AYd N$"" N$"a lazy person"|n A : ,A:  ): Ax ,: "#%%%%%%%%%%%%#": ,: "$ $": ,: "$ GAME OVER $": , : "& &": , : "!''''''''''''!"$ W  : W: . 6:]: pause ************************e:ٚ ,:  ,: A : ,A:  ): A:  ,: "PAUSED": , : "PRESS RETURN TO CONTINUE": ()  ( ) -  ,: ): , : ): X(): () :  ,: 5:\: stop *************************d:() : () : ,:  ,: ,8: A : A,(,),,: A: :: data lettertype **************: 60,102,102,0,204,204,120,0'" 4,6,6,0,12,12,8,0E, 60,6,6,56,192,192,120,0a6 60,6,6,56,12,12,120,0@ 36,102,102,56,12,12,8,0J 60,96,96,56,12,12,120,0T 60,96,96,56,204,204,120,0֜^ 60,6,6,0,12,12,8,0h 60,102,102,56,204,204,120,0r 60,102,102,56,12,12,120,0<| 226,246,254,254,234,226,226,0^ 255,0,204,218,216,218,204,0 255,0,227,214,230,214,211,0 255,0,52,181,189,189,53,0 255,0,206,173,174,237,173,0❮ 248,0,120,96,112,96,120,0 126,193,221,217,221,193,126,0% 16,56,56,92,92,238,238,0I 236,238,236,224,236,238,236,0m 108,238,224,224,224,238,108,0 236,238,238,238,238,238,236,0 254,254,0,252,224,254,254,0՞ 254,254,0,252,224,224,224,0 108,238,224,224,238,230,108,0 238,238,238,254,238,238,238,0: 56,56,56,56,56,56,56,0Z 14,14,14,14,238,238,108,0~& 238,236,232,224,232,236,238,00 224,224,224,224,226,230,238,0Ɵ: 130,198,238,238,238,238,238,0D 198,230,118,186,220,206,198,0N 108,238,238,238,238,238,108,02X 236,238,238,236,224,224,224,0Vb 108,238,238,230,234,236,110,0zl 236,238,236,224,232,236,238,0v 110,230,114,56,156,206,236,0 254,254,0,96,96,126,62,0ࠊ 238,238,238,238,238,238,108,0 238,238,238,108,108,40,40,0& 238,238,238,238,238,198,130,0H 238,238,116,56,92,238,238,0i 238,238,238,124,56,56,56,0 238,206,156,56,114,230,238,0 0,126,102,90,90,102,126,0ҡ 126,126,126,126,126,126,126,126 0,255,255,255,255,255,255,0 255,85,170,85,170,85,255,06 254,84,170,84,170,84,254,0W 252,84,168,84,168,84,252,0x 248,80,168,80,168,80,248,0  240,80,160,80,160,80,240,0 224,64,160,64,160,64,224,0ۢ  192,64,128,64,128,64,192,0* 128,0,128,0,128,0,128,04 126,126,126,126,126,126,126,0?> 127,127,0,127,126,127,127,0_H 126,120,96,0,96,120,126,0R 254,254,0,248,0,254,254,0\ 126,126,126,31,7,7,7,0f 126,126,126,248,224,224,224,0p 120,126,120,0,120,126,120,0z 30,126,126,126,126,126,30,0  1,7,7,25,25,126,126,0D 120,126,126,126,126,126,120,0h 128,224,224,248,248,126,126,0 120,126,120,0,96,120,126,0 30,126,31,7,97,120,126,0 0,0,0,0,6,30,126,0 126,30,134,224,248,126,120,0 127,127,0,30,30,31,7,0 254,254,0,0,0,254,254,0< 1,3,6,13,26,53,106,213_ 250,21,58,53,106,117,234,255 128,64,160,80,168,84,170,65 175,72,164,84,170,82,171,255ǥ 255,234,117,106,53,58,21,250 213,106,53,26,13,6,3,1 255,171,82,170,84,164,72,175)$ 65,170,84,168,80,160,64,128?. 1,0,0,0,0,0,0,1W8 3,6,6,12,12,6,6,3wB 192,96,96,48,48,96,96,192L 128,0,0,0,0,0,0,128V 3,6,6,12,12,6,6,3` 1,0,0,0,0,0,0,1٦j 128,0,0,0,0,0,0,128t 192,96,96,48,48,96,96,192~ :( : woorden (Kleine letters!) ****0 : aalbes,aalmoes,aambeeld,aanvraag,aardappel,acteur,adelaar,advertentie,driemaster,pijpleiding槦 baken,maquette,badminton,bakvis,ballon,bankschroef,belasting,beton,vliegtuig# concert,contract,crypte,cultuur,cursief,cyclus,concept? dadel,dagblad,dictaatz eekhoorn,evolutie,element,endeldarm,eenhoorn,extreem fietspomp,factuur,fase steengroeve,grafkelder,grondwetݨ handappel,hekwerk,herberg informatie,jaarverslag,kaleidoscoop,kalenderI ledematen,metronoom,neushoorn,onderzoek,pneumatiek bergkristal,rooksignaal,spaarbank,tekentafel,uurwerk,universeel,vragenlijst,wegennet,xylofoon,yoghurt,zwavelzuurS hoofdkwartier,koptelefoon,platenspeler,microcomputer,zakenreis,naslagwerk,aardrijkskunde,gymnastiek,boekhouding,schuifdeur,codeslot,huurhuisު electromagneet,stralingsveld,hoogspanning,informatica,waterwingebied,verkeerslicht,spoorlijn,kofferset,vuurwerk,controleur,chauffeurp vloerbedekking,wasmachine,centrifuge,machinecode,toetsenbord,microprocessor,audiocassette,huisraad,inboedel,automaat,melkboer,atlas,bestandx( :2 : (c) 1987 Rob van Hout \ ::=['] \ ::=x" * . . *"j" * . M I D D E N . *"" * . . *"" * . IN DE . *"" * . . *"" * . W I N T E R N A C H T . *"F" * . . *"r" * ............ ............ *"" * *"ʂ" ************ ************"" * *" " * *"8" ************ ************"d" * *"" * 3-stemmige harmonisatie *"" * *"" * simon c.dekker *""" * *"@," ***********************************"96G$"T120O4F#4.E8DA8A16R16AG4F#2ADGF#E2D2F#.E8D4A8A16R16AGF#2ADGF#4E2D2O5D8D16R16D4C#8C#16R16C#4O4B8B16R16B4A2O5D8D16R16D4C#8C#16R16C#4O4B8B16R16B4A4F#8G8A4B4A4F#8G8A4B4A4R4O7D16F#16D16F#16D8R8O2D16A16D16A16O4F#8G8A8A16R16A4B2A2F#4D4G4F#4E2E8D1"@M$"T120O3A4GF#O4ED2.O3B4A2B2O4DC#D2O3A4GF#O4ED4.D16R16D2O3A2B8O4C#8D4O3B4O4C#4D2F#8E8F#8G8A8B8A8F#8G8A8G8F#8E2D4EF#FE8C#8D8O3B8O4C#4D8E8F#4GF#D8E8F#4GF#8F#16R16F#8G8A4F#8G8A4D8E8F#4EDGE2D4O3B2O4D8D16R16D4C#4.D1" JR$"T120O3D2.C#4O2B2AGF#2E2A2O3D4.D16R16D2.C#4O2B2A4GF#2E4BGAO3D4.D16R16D8D16R16D4F#8F#16R16F#4G8G16R16G4A2O2B4O3C#DD#E8E16R16E4O2A4O3D8D16R16D8D16R16D8D16R16D8D16R16D8D16R16D8D16R16D8D16R16D8D16R16D8E8F#4D8E8F#4D8D16R16D4F#E2A2B4GEF#8G8A2A8D1"T G$,M$,R$)^ G$,M$,R$ssor,audiocassette,huisraad,inboedel,automaat,melkboer,atlas,bestandx( :2 : (c) 1987 Rob van Hout \ ::=['] \ ::=::=['] \ ::=::=['] \ ::= ": I : P: P$P$(P): : $()P$ :paardAH 6: I : T: T$T$(T): : $()T$ :toren~R J: I : D: D$D$(D): : $()D$ :dame\ ^: I : K: K$K$(K): : $()K$ :koningŐf:p:********** oplossing **********z ,: "Wit is aan zet. Wie wint?"M ,: "Druk toets voor oplossing": "" | ,: (): ,: "volgende zet" ,: "1.Tg1xg7": ,: "Dreigt"‘ ,: "Tg8 mat!" A( ,),: A( ,),: A( ,),: A( ,),/ Y ' : : ,(x,Y),,: Yj A( ,),: A( ,),: A( ,),: A( ,), ""  : ,: "Ta4xa2+" ,: (): ,: "Op 1...Txg7" ,: "of 1...Th8": ,: "volgt 2.Dxh5"+ ,: "+ en mat via": , : "h8 of g8."_ , : "En 1...Dxg7": , : "faalt op" ,: "2.Dxc6+ en": ,: "mat op a8."˓ A(,),: A(,),: A(,),: A(,), YW w: : ,(,Y),,: Y0 A(, ),: A(, ),: A(, ),: A(, ),^$ "" $ : ,: " 2.Pc1xa2 ". Y : ,Y: ( ): Y8 A(,),: A(,),: A(,),: A(,),BX9: Y w : XX: : ,(X,Y),,: Y+L X(  : : ,(X,w),,: X?V ,(,)i` "" ` : ,: "Dc3-e1+"j A(, ),: A(, ),: A(, ),: A(, ),ڕtX7: Yg : XX: : ,(X,Y),,: Y~ "" ~ : ,: "3.Tb2-b1"@ A(, ),: A(, ),: A(, ),: A(, ),j Yw : : ,((,Y),,: Y ""  : , : "De1xe6"̖ , : "Voorkomt het": , : "mat op g8." Y 7 : : ,(X,Y),,: Y2 A(,),: A(,),: A(,),: A(,),b ""  : , : " 4.Df3xc6+ "x , : ( ) A( , ),: A( , ),: A( , ),: A( , ),Xi: Yg 7 : XX: : ,(X,Y),,: Y* A(,),: A(,),: A(,),: A(,),T ""  : , : "Ke8-d8" A(,),: A(,),: A(,),: A(,),  XX H : : ,(X,),,: X ""  : ,: "5.Dc6-c7+" Y7 ' : : ,(8,Y),,: Y@( "" ( : ,: "Kd8-e8"j2 XH X: : ,(X,),,: X< "" < : ,: "6.Dc7-b8+"ÙF ,: (): ,: "en op de"P ,: "volgende": ,: "zet mat!"0ZX9: Y'  : XX: : ,(X,Y),,: Y8d:^n:****** opnieuw/stoppen *******x ,: "[1]=opnieuw [2]=stoppen"K(): K : K ̚ ,,: : %: : O3E-4.E-4.O2B-4.B-4.O3F4.F4.O2R64B-4.B-4.B-4.F4.B-4.B-4." G$,M$,R$& G$,M$,R$ssor,audiocassette,huisraad,inboedel,automaat,melkboer,atlas,bestandx( :2 : (c) 1987 Rob van Hout \ ::=['] \ ::=nZx MSX Computer Magazine`h z X(d),Y(d)ML : minimum lengteSA: schalingsfact. y-richt.πPIA1AY&PSW: SH :scherm matenCZ(PI) :D:startlijnstuk wordt bepaald door twee coordinaten.YX()SW: Y() nX() : Y() vP~:: begin van de hoofdlus:"L((X(P)X(P))(Y(P)Y(P))) :lengte van een lijnstukje,:(6: als het lijnstuk kleiner is dan ML, tekenen!u@: in het andere geval moet het lijnstuk nog een keer worden opgebrokenJ LML (X(P),SHSY(P))(X(P),SHSY(P)),: PP : łT:^: zolang er nog lijnstukken zijn (van meer dan 2 punten!) doorgaan met de lus!*h P "0r:| |B:e: de lijnstuk-breek routine.m:: tussen de twee coordinaten (x(p),y(p)) en (x(p-1),y(p-1)) wordenۃ: drie coordinaten toegevoegd.ヸ:XLX(P)YLY(P) XRX(P)YRY(P)#CXRXL/DYRYLDL(CCDD)CZSGD(DC)f XRXL LLtX(P)XL&Y(P)YL0X(P)CXL:Y(P)DYLDX(P)CL(GD)XL܄NY(P)DL(GD)YLXX(P )CXLbY(P )DYLlX(P)XR vY(P)YR*PP0en naar cartesische (nx,ny) coordinaten.qRAALPHA(S)BW)`&NXL(S)(RA)WX0NYL(S)(RA)AWYǃ:: msx2 : factor 1.2 wordt 0.6D (WX,WY)(NX,NY),NWXNX: WYNYX

s); { totdat deler gevonden of klaar } if (j>s) then write(i,' '); { ja! priemgetal! } end; writeln('Klaar met priemgetallen'); end.  JAANTAL(J); NAAM$(J) JXL܄NY(P)DL(GD)YLXX(P )CXLbY(P )DYLlX(P)XR vY(P)YR*PP0en naar cartesische (nx,ny) coordinaten.qRAALPHA(S)BW)`&NXL(S)(RA)WX0NYL(S)(RA)AWYǃ:: msx2 : factor 1.2 wordt 0.6D (WX,WY)(NX,NY),NWXNX: WYNYXa[j+1] then { verkeerdom? } begin { verwissel! } t:=a[j]; a[j]:=a[j+1]; a[j+1]:=t; end; writeln('Klaar met sorteren'); { Klaar. } end. YLlX(P)XR vY(P)YR*PP0en naar cartesische (nx,ny) coordinaten.qRAALPHA(S)BW)`&NXL(S)(RA)WX0NYL(S)(RA)AWYǃ:: msx2 : factor 1.2 wordt 0.6D (WX,WY)(NX,NY),NWXNX: WYNYX