ZXTape!NIM 2 y163999:3 &f=6500065071/:n:f,n:f 205,124|,0,59;,59;,225,1,15,0,9 ,235,42*,61=,92\,115s,35#,114r,201,0,205,142,2,123{,254,255,32 ,248,58:,58:,92\,254,12 ,40(,10 ,254,16,40(,6,254,20,40(,2,24,25,60<,502,129,92\,253,546,0,255,33!,23,37%,34",66B,92\,33!,0,0,34",68D,92\,59;,59;,195,125},27,195,3,19 965000:65053,40(:65054,0 7: "" W5:5:19,0;"":"":19,0;"":T=64000:""T L236066\,T-256*(T/256):236077\,(T/256)-1 19,0;"":"" 0:7:.01z# =,38&:1;21,0;" Nacinij dowolny klawisz! ":0:.01z# =,40( ' 41) ( ) * 502 NIM 2 t<'pWU TW?UXPPPUP@U`XXU@ UUXUPXXU` UXVU9]U`XX]UXXWxUǀX5UXXX5UX_XUUXXXXXUXXXXXXXXXUXXXUPUXUU9]U`XX]UUPXWUXUUXXXUX@X5UXXXPXUXXUXUXUXXXXXX?UTXXUPUXUU[UPXX[UUPXWȟUX UUXXX UXX5UXXX0X5XUX5X5X5XXUVXXUX5VXUU[UXXX[UU`XWUXUUXXX VXXUXXX X5X5X5X5X5XϟUVXXUT5VXU}UٓYUTXXYUU`XWUXUUXXXVXX UXXXXX5XXXXXXXXXc>|UUXXUVUTXUUٓXVXXXU@XPTXUUXXXTXXUXXXX XX X X X88888ff`fa`ff`Wpw>|UUXXUVUTXVUӀXUVXXXUU@X_WXUUXXXTXXUXXXXX XXXX8f`ff`V;<|UU@XXUUXXV{UӀX5UXXXUUX@PXUXXXXXXUXXXXXXXXXff`facf`ABg%"RD8XԄUU|<||<~f`f`F@`!UE]AQEAUܔTPffff!E]AUAUܐff||U]U]ܕT|~ff@"!UHAIԉ@lfff`5TBD ff||<%REVefP2#btUDP :::::::::::::::::::::::::::::::::::::::888888888888888888888888::::::::888888888888888888888888::::::::::::::::8888888888888888::888888888888888888888888888888::8888888888::::::::::::::::::88::8888888888::::::::::::::::::88::8888888888::::::::::::::::::88::8888888888<<<<<<<<<<<<<<<<<<88::8888888888<<<<<<<<<<<<<<<<<<88::8888888888<<<<<<<<<<<<<<<<<<88::888888888899999999999999999988::888888888899999999999999999988::888888888899999999999999999988::888888888888888888888888888888::8800 88888888888888888888::88xxxxxxxx88888888888888888888::8800 88888888888888888888::888888888888888888888888888888::888888888888888888888888888888:::::::::::::::::::::::::::::::::((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((fNIM -2+65053,70F:65054,0 Fm0:7:7::7;2;0,12 ;" NIM - 2 ":2,0;"ZASADY GRY" G4,0;"Do gry uywa si dowolnej liczby'kamieni', ktre dzielimy na 2 grupy - w tej wersji podziau dokonuje losowo komputer." H9 ,0;" Ruch polega na wziciu co najm-niej jednego 'kamienia' z jednejgrupy. Mona rwnie wzi 'ka- mienie' z obu grup, pod warun- kiem, e wemie si tyle samo z kadej." I16,0;" Wygrywa ten, kto wemie ostatni'kamie'.";19,0;"yczymy wesoej zabawy !":1;21,0;" Nacinij dowolny klawisz! ":0: Z/7::"NIM-2 C.Waniewski KAW 1986 " [::"Chcesz rozpoczyna gr? (t/n)";1;"?";8; \0:A$= ]%A$="t"A$="T"B3=0:96` ^%A$="n"A$="N"B3=1:96` _ 92\ `A$:1376` a$="0":"Exit":"C.Waniewski": d;4::WS=0:WK=0:ST=0:KT=0 i01000:1010:1020:1425 n#B3=1B3=0:119w oB3=0B3=1 wB3=0200 x 1030 1400x KT=1105i 1100L , 1400x -ST=1105i ^ 120x N=02:2;N,0;" ":N:N=39 :2;N,0;" ":N:2;10 ,0;"" N=11 20:2;N,0;"";N,10 ;"";N,31;"":N:2;21,0;" " /7;2;1,13 ;"NIM - 2" N3,7;"";12 ;"";17;"";22;"";27;"" N9 ,7;"";12 ;"";17;"";22;"";27;"" o1;12 ,2;" WYNIK ";14,1;" TY ";14,6;" ZX ":16,5;":"  LX=0:Y=0:A1=(*19)+7:(*3+1):A2= A2<.5X=27:Y=A1 A2.5Y=27:X=A1  ?N=1X:4,N+2;"";5,N+2;"":N ?N=1Y:7,N+2;"";8,N+2;"":N  -.01z# =,34":.01z# =,38&:ST=0:KT=0:11 ,16;"Twj ruch!";13 ,12 ;"Wybierz rzd:";15,18;"grny";17,18;"dolny";19,18;"obydwa";1;1;15,16;"G";17,16;"D";19,16;"O" 0:A3=0:A$= 3X>0(A$="G"A$="g")A3=1:1050 3Y>0(A$="D"A$="d")A3=2:1050 =X>0Y>0(A$="O"A$="o")A3=3:1050  1040 .01z# =,38& A3=11091C A3=21092D $A3=31092D:1091C  7N=13 19:N,12 ;" ":N "14,18;"wybieranie";16,18;"koniec ruchu";4;1;14,12 ;"SPACE";16,12 ;"ENTER" # A4=0 $0:A$= &A$=32 X>0A3=14,X+2;" ";5,X+2;" ":X=X-1:A4=1:.01z# =,45- 'A$=32 Y>0X>0A3=37,Y+2;" ";8,Y+2;" ";4,X+2;" ";5,X+2;" ":Y=Y-1:X=X-1:A4=1:.01z# =,35# (A$=32 Y>0A3=27,Y+2;" ";8,Y+2;" ":Y=Y-1:A4=1:.01z# =,35# ,8A$=13 A4=1.2~L,40(:1070. - 1060$ .e1090B:4,1;" ";5,1;" ";7,1;" ";8,1;" " 2!X=0Y=0KT=1 A B>N=11 20:N,11 ;" ":N: CA1;5;4,1;"";5,1;"": DA1;5;7,1;"";8,1;"": LST=0:KT=0 M=X=0Y=0X=YXX=0:YY=0:1160 QT(27):1110V R$N=127:A5:T(N)=A5:N V2,1,5,7,3,10 ,4,13 ,15,6,18,20,8,23,9 ,26,100d,11 ,100d,12 ,100d,100d,14,100d,100d,16,100d X$<.5A7=1:1129i Y A7=0 [#Y>T(X)XX=X:YY=T(X):1160 `#X>T(Y)YY=Y:XX=T(Y):1160 i Z=0 j X1Y-1XXX=X:YY=Y-1:1160 ~7X>1X-1YYY=Y:XX=X-1:1160 $A7=1A7=0:1140t +X>0YY=Y:XX=X-1:1160 Y>0YY=Y-1:XX=X .1}L,37% N12 ,19;"RUCH";1;14,17;"SPECTRUM":1376` BYY=Y17,15;"Rzd grny ";1;X-XX:1091C BXX=X17,15;"Rzd dolny ";1;Y-YY:1092D UXXXYYY17,14;"Obydwa rzdy ";1;Y-YY:1091C:1092D  1376` XX=X1300 YY=Y1320( XXXYYY1340< q4,1;" ";5,1;" ";7,1;" ";8,1;" ":1376`:1090B  X=XX:Y=YY !X=0Y=0ST=1  N=YYY+1-1 O7,N+2;" ";8,N+2;" ":.01z# =,30:1375_ N: -N=XXX+1-1 2O4,N+2;" ";5,N+2;" ":.01z# =,30:1375_ 3N: FN=0Y-YY-1 KG4,X+2-N;" ";5,X+2-N;" ":.01z# =,30 L?7,Y+2-N;" ";8,Y+2-N;" ":1375_ ON Z _L=130:L: `L=1300,:L: x'ST=11430:WS=WS+1 y'KT=11450:WK=WK+1 716,2;WK;16,7;WS:1090B  D1090B:1;15,16;"PRZEGRAE":1460: B1090B:1;15,17;"WYGRAE":1460: ]N=17:.005y# =,N:N:N=71-1:.005y# =,N:N:N:4 (N=-40(40(:.01z# =,N:N: 7CHR$ L$$$~$$~$>8>>fl0fF4>> 0`< 0 >>0 0l88llll< 8| 0|xxx(8 xllll8lll8|0`||0`|Z<