home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 25 / Tiger_Disk_025_19xx_Tiger-Crew-Disk_de_Side_C.d64 / b.splrzahl (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  388b  |  14 lines
  1. 10 code=7*4096:vars=5*4096+6*256
  2. 20 sys code,3:rem clearnorm scn
  3. 30 print"[215]@hlen[160][211]ie[160]die[160][193]nzahl[160]der[160][211]pieler!"
  4. 35 print"[160]1[160][160]2[160][160]3[160][160]4[160]"
  5. 40 sys code,6,5
  6. 50 cl=peek(2):if cl=0 then 50
  7. 55 poke 2,0
  8. 60 if cl=1 then poke vars+0,cl
  9. 70 if cl=2 then poke vars+0,cl
  10. 80 if cl=3 then poke vars+0,cl
  11. 90 if cl=4 then poke vars+0,cl
  12. 95 poke vars+1,1:rem actual player 1
  13. 100 sys code,1,"l.voreinst",8
  14.