A200:20: SCHIEBEFAX A$(15):RY1 1870 R$"COMPUTERMAGAZIN " N0 15:A$(N)(R$,N1,1):N!GT15:HG3:VG3:BE1#!$---teken het speelveld--->!.A$"+---------------+"Y!8B$"! !"p!BHO9:VE4:110:A$!LVE17:110:A$!VN5 16:VEN:110:B$:N!`---print de letters---!j1530!t---in de war maken---!~1590!HO4:VE0:110!""Bedienung mit Cursortasten"/"VE1:110Q""(und 2 oder 3) S = Stoppen"e"HO8:VE20:110""Schwierigkeitsgrad ";MM"VE21:110"SRBE:300"SR$;". Zug...""---de cursor---"SD10000:450"IN50 RY2:1260 #IN51 RY3:1260# IN83 9509#QIN27:(Q1)(Q4) 1260U#Q 1670,1720,1770,1820d#(1530:RY1s#2SRBE:300#<BEBE1:HO8:VE21:110:SR$;". Zug ..."#FT$"":N0 15:T$T$A$(N):N#PT$R$ 1260#ZSV7:SD4:SP80:400#dSP84:400 $nSP87:400 $xSP92:SD12:400:$HO23:VE16:110:" "N$HO8:VE21:110s$"Geschafft in ";BE1;" Zuegen!"$VE23:110:"Noch einmal? (J/N) ";$210:IN78 950$IN74 1000$1450$-----------------$$---SUBROUTINES---%#%---druk de getallen af---@%VE3:J0 15 4:VEVE3V%K0 3:HO114Kk%110:A$(JK):Kr%Jx%"%,---in de war maken---%6SD20:450%@N1 10MM%J260:X1(RV4)%TX 1670,1720,1770,1820%^N10(N10) 1530&hN&rHC11:VC7:0&|---gat naar rechts---=&HG3 a&HGHG1:A$(GT)A$(GT1):GTGT1&A$(GT)" ":RYRY1:RY0 1670&&---gat naar links---&HG0 &HGHG1:A$(GT)A$(GT1):GTGT1&A$(GT)" ":RYRY1:RY0 1720&'---gat omhoog---!'VG0 E'VGVG1:A$(GT)A$(GT4):GTGT4h'A$(GT)" ":RYRY1:RY0 1770n''---gat omlaag---'VG3 '&VGVG1:A$(GT)A$(GT4):GTGT4'0A$(GT)" ":RYRY1:RY0 1820':'D---intro---(N:"SCHIEBEFAX"::)(X:"Das weltberuehmte Spiel."F(b:"Hier ueber die vier"](l:"Cursortasten."(v:"Moechten Sie zwei oder drei"(:"Bloecke gleichzeitig verschieben,"(:"dann vorher 2 oder 3 eingeben."(:):"-Welchen Schwierigkeitsgrad ?"):" Waehle 1 bis 9 ";G)210:MM(IN$):(MM1)(MM9) 1970R)100:r)}--------------------------) } Ch.W.Brederode)} NL - LISSE)}--------------------------)(} TROS-RADIO dd 891115)2} Erstausstrahlung Radio DDR *<}-spezial 900525 NL - LISSE)}--------------------------)(} TROS-RADIO dd 891115)2} Erstausstrahlung Radio DDR *<