home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 30 / 64er_Magazin_Sonderheft_30_19xx_Markt__Technik_de_Side_B.d64 / src.zeisa-anim. (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  918 b   |  68 lines
  1. 8000 chsave76 brk
  2. 8010  brk
  3. 8020  brk
  4. 8030  brk
  5. 8040  brk
  6. 8050  brk
  7. 8060  brk
  8. 8070  brk
  9. 8080 chsave85 brk
  10. 8090  brk
  11. 8100  brk
  12. 8110  brk
  13. 8120  brk
  14. 8130  brk
  15. 8140  brk
  16. 8150  brk
  17. 8151 chardelay brk
  18. 8152 charani ldy#0
  19. 8161  incchardelay
  20. 8162  ldachardelay
  21. 8163  cmp#5
  22. 8164  beqchargoon1
  23. 8165  rts
  24. 8166 chargoon1 stychardelay
  25. 8167  lda#0
  26. 8170 chloop1 lda8800,y
  27. 8180  stachsave76,y
  28. 8190  lda8872,y
  29. 8200  stachsave85,y
  30. 8210  iny
  31. 8220  cpy#8
  32. 8230  bnechloop1
  33. 8240  ldy#135
  34. 8250  ldx#143
  35. 8260 chloop2 lda8736,y
  36. 8270  sta8736,x
  37. 8280  dex
  38. 8290  dey
  39. 8300  cpy#255
  40. 8310  bnechloop2
  41. 8320  ldy#0
  42. 8330 chloop3 ldachsave76,y
  43. 8340  sta8736,y
  44. 8350  ldachsave85,y
  45. 8360  sta8808,y
  46. 8372  iny
  47. 8380  cpy#9
  48. 8390  bnechloop3
  49. 8400  rts
  50. 8500 farbini lda#12
  51. 8510  sta53282
  52. 8520  lda#11
  53. 8530  sta53283
  54. 8540  lda53270
  55. 8550  ora#16
  56. 8560  sta53270
  57. 8565  lda#24
  58. 8566  sta53272
  59. 8570  ldy#0
  60. 8580  lda#9
  61. 8590 farbloop sta55296,y
  62. 8600  sta55546,y
  63. 8610  sta55796,y
  64. 8620  sta56041,y
  65. 8630  iny
  66. 8640  bnefarbloop
  67. 8650  rts
  68.