home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1987 December / 64er_Magazin_87-12_1987_Markt__Technik_de_Side_A.d64 / demo5.wuerfel (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  478 b   |  20 lines
  1. 10 init
  2. 20 obj 7,11
  3. 30 fori=0to7:readx,y,z:pseti,x,y,z:next
  4. 40 fori=0to11:reada,b:lseti,a,b:next
  5. 50 data -90,-90,-90, 90,-90,-90
  6. 60 data 90,90,-90,   -90,90,-90
  7. 70 data -90,-90,90,  90,-90,90
  8. 80 data 90,90,90,    -90,90,90
  9. 90 data 0,1,1,2,2,3,3,0
  10. 100 data 0,4,1,5,2,6,3,7
  11. 110 data 4,5,5,6,6,7,7,4
  12. 120 modset 0,0,1
  13. 130 dwset-12,-12
  14. 140 perspset-500,-170
  15. 150 print"[147]bitte steuern sie mit joystick und":print"tastatur"
  16. 160 print"ende=(restore) oder button"
  17. 170 print" (taste druecken)
  18. 180 [161]a$:[139]a$[178]""[167]180
  19. 190 dreh
  20.