home *** CD-ROM | disk | FTP | other *** search
- 5 ifa=0thena=1:load"demo-sprites",8,1
- 10 rem ********************************
- 11 rem * *
- 12 rem * demo f. animation v. sprites *
- 13 rem * *
- 14 rem * sprite 1+2 uebereinader *
- 15 rem * (overlaysprites) *
- 16 rem * *
- 17 rem * sprite 1 wird animiert durch *
- 18 rem * wechsel der bloecke 252+253 *
- 19 rem * *
- 20 rem * (p)(c) 1993 by 64'er m&t *
- 21 rem * *
- 23 rem ********************************
- 25 v=53248
- 30 pokev,100:pokev+1,100:rem sprite 1+2
- 40 pokev+2,100:pokev+3,100:rem position
- 50 pokev+28,2:rem sprite 2 auf multicol
- 60 pokev+39,8:pokev+40,1:rem spritecol
- 70 pokev+37,11:pokev+38,10
- 80 poke2040,252:poke2041,254
- 90 pokev+21,3:rem sprites an
- 100 i=1-i:poke2040,252+i
- 110 forp=1to300:next:rem pause
- 120 goto100
-