home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 1 / Tiger_Disk_001_1994-04_Tiger-Crew-Disk_de_Side_B.d64 / herzchen (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  287b  |  14 lines
  1. 10 print"[147]"
  2. 11 poke 1024+10+40*12,12            
  3. 12 poke 1024+15+40*12,15               
  4. 13 poke 1024+20+40*12,22
  5. 14 poke 1024+25+40*12,5    
  6. 15 for l = 1 to 100
  7. 20 x=int(40*rnd(1))+1
  8. 21 y=int(24*rnd(1))+1
  9. 40 poke 1024+x+40*y,83
  10. 45 poke 55296+x+40*y,2
  11. 55 fort=1to200:nextt 
  12. 60 next
  13. 70 print"":end
  14.