" Programm: R+NIM VERSION 1+100QA1$"HEIMCOMPUTER robotron Z9001"r(A2$"SPIEL":A92:A3$"R+NIM"2A4$"NIM-SPIEL"<A5$"EINE EINFACHE VARIANTE"F:A9:8:1:P1;(0,0);" "Z(2,2);A1$:(4,2);"",(34,""),""d(5,2);"":(5,37);""1n(6,2);"",(34,""),""Qx(5,3);A2$:3;(5,29);A3$kA9:(8,2);(36,"")I913:(I,2);"":(I,37);"":I(14,2);(36,"")8:(10,36(A4$));A4$:(12,36(A5$));A5$ 3;(18,2);"VEB ROBOTRON-MESSELEKTRONIK"63;(19,8);">OTTO SCHOEN< DRESDEN":230d3:(19,2);"ERLAEUTERUNGEN: (J)/N "{(18,2);(27," ")4;(22,31);">ENTER<":19,19,30,36:JN$"J":"";JN$2604;(22,31);">ENTER<"T$:T$"":2405:5:8::JN$"N"41085);"DIES IST EIN NIM-SPIEL"N"5);(22,(226))},:"GEGEBEN IST EINE MENGE VON N GEGEN-":6"STAENDEN (Z.B. STREICHHOELZER). DER":@"SPIELER UND DER RECHNER NEHMEN AB-":J"WECHSELND MINDESTENS 1, HOECHSTENS":1T"K HOELZER WEG. ES VERLIERT DERJENIGE,":[^"DER DAS LETZTE HOLZ NEHMEN MUSS.":h:"VIEL SPASS - UND LASSEN SIE SICH":r"DURCH EVENTUELLE NIEDERLAGEN NICHT":|"GLEICH ENTMUTIGEN.":6:"BEGINN DES SPIELS MIT ENTER";B:8 # (0,1);"AUSGANGSANZAHL IST ", 530< 23,23,0,39m 4:1:"41 WAEHLEN!! - ENTER";B:8:5 :620 23,23,0,39 4:1:"K<=N/2 !!! - ENTER";B:8:5::620 23,23,0,39N 4:1:"WIR KENNEN NUR GANZE HOELZER! - ENTER";B:8:5T  21,21,0,39:6:"ZAHL DER HOELZER (4JJ1:MM1e H(Z,SIM20(K51));" "v RI20K5870 \900 fK5K51 pZZ2 zM0 I 940 23,23,0,39 4:1:"FALSCHE EINGABE - ENTER";B:8:5: WE0521,21,0,39:6:"WER BEGINNT: (0)-RECHNER; 1-SPIELER";WE:8GWO$"XXXXXXX"cT6$"DER "WO$" NIMMT"s(4,0);T6$(4,22);"HOELZER (HOLZ)"(5,0);"ES SIND NUN NOCH"(5,22);"HOELZER (HOLZ) DA"(6,0);(40,(251))WE11460 WE09301070J$21,21,0,39:6:"ZUG DES RECHNERS NACH ENTER";B:8k.RN(((N1)(K1))(K1)1)z8R01130BR((K)K)LR01090VRN1130`R1jNNRtN01220~(7,9);" "8,20,0,39:2:1:8,20,7,39:::"Ich fuerchte, Sie haben":="das System erkannt."::f:4:"Ich gebe mich geschlagen!":222,22,0,39:6:5:"ENTER";B:81730(4,4);"RECHNER"(4,18);" "ZK$(R):L(ZK$)2;(4,184L);(ZK$,L1)(5,18);" "ZK$(N):L(ZK$):2;(5,184L);(ZK$,L1)E I1RW(LZ,LS);" "k(LZ1,LS);" "w(LSLS12LS14LS20LS26LSLS1<LS81360FLS31:LZLZ2PIZ1460d23,23,0,39n4:1:"SOVIELE SIND NICHT ZUGELASSEN! - ENTER";B:8:5 x:1460023,23,0,39k4:1:"SOVIELE HABEN WIR GAR NICHT!! - ENTER";B:8:5w:146023,23,0,394:1:"NICHT MOGELN!! - ENTER";B:8:5:21,21,0,39:6:"WIEVIELE HOELZER NIMMT DER SPIELER?";R:8R(R)1450RK1380"RN14101R01440;NNRQ(4,4);"SPIELER"d(4,18);" "zZK$(R):L(ZK$)2;(4,184L);(ZK$,L1)(5,18);" "ZK$(N):L(ZK$)"2;(5,184L);(ZK$,L1),I1R6(LZ,LS);" "@(LZ1,LS);" "JLSLS1=TLS14LS20LS26LSLS1L^LS81650^hLS31:LZLZ2erIs|N010608,20,0,39:2:1:8,20,1,39:::"Ich muss Ihnen die traurige Mitteilung":"machen, dass Sie verloren haben."::%4:"Sicher klappt es beim naechsten Mal":="schon besser!":2h22,22,0,39:6:5:"ENTER";B:8 6:JN$"J":"NEUES SPIEL: (J)/N";JN$JN$"N"17700,23,0,39:8400::8:14);"D A N K E"256:6:JN$"J":"NEUES