home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1987 December / 64er_Magazin_87-12_1987_Markt__Technik_de_Side_A.d64 / demo3.bsplobjekt (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  358b  |  20 lines
  1. 5 print"[147]ende mit (restore)"
  2. 10 init
  3. 20 obj 4,3
  4. 40 pset 0,0,-60,0
  5. 50 pset 1,0,0,0
  6. 60 pset 2,0,60,0
  7. 70 pset 3,0,0,60
  8. 80 pset 4,60,60,0
  9. 90 lset 0,0,1
  10. 100 lset 1,1,2
  11. 110 lset 2,2,4
  12. 120 lset 3,1,3
  13. 130 modset 1,0,0
  14. 140 delset .3,0,0
  15. 150 dwset -19,-35
  16. 160 video 1,0,0
  17. 164 print"            (taste = anfang)"
  18. 165 geta$:ifa$=""then165
  19. 170 dreh
  20.