diff --git a/MHC.cbmprj b/MHC.cbmprj index 778ba1c..a20a43c 100644 --- a/MHC.cbmprj +++ b/MHC.cbmprj @@ -36,9 +36,7 @@ - - sprites.asm - + 0 0 @@ -62,8 +60,8 @@ - False - False + True + True sprites.asm @@ -73,8 +71,8 @@ - True - True + False + False Sprites.spt diff --git a/SpritesC.spt b/SpritesC.spt new file mode 100644 index 0000000..4fb4ebe --- /dev/null +++ b/SpritesC.spt @@ -0,0 +1,431 @@ + + + + Mac + + True + False + 1 + 0 + 6 + 7 + False + False + + 524256 + 524304 + 655248 + 655440 + 655440 + 655440 + 655440 + 655440 + 655440 + 655440 + 655440 + 655248 + 524304 + 524304 + 659408 + 524304 + 524304 + 524256 + 264864 + 349536 + 524256 + + + + PC + + True + False + 1 + 0 + 6 + 7 + False + False + + 524256 + 524304 + 786384 + 786256 + 786128 + 786256 + 786128 + 786256 + 786128 + 786384 + 524304 + 524256 + 98688 + 8388606 + 8388609 + 8404989 + 8396805 + 8400501 + 11190269 + 11173889 + 8388606 + + + + SX64 + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 0 + 0 + 0 + 0 + 0 + 8388606 + 8388609 + 10473465 + 10496681 + 10497369 + 10498041 + 10498041 + 10496009 + 10496457 + 10473465 + 8388609 + 8388606 + 112 + 7190262 + 16777215 + + + + RAM + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 0 + 7680 + 24832 + 98432 + 393280 + 1572896 + 6291472 + 8388616 + 10485832 + 9306392 + 10028072 + 5902632 + 3818152 + 1708776 + 404136 + 142992 + 76416 + 59648 + 10240 + 4096 + + + + DISK + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 0 + 2097144 + 1048584 + 1223336 + 1398088 + 1212552 + 605264 + 1196680 + 1393224 + 1196712 + 1393224 + 1195176 + 1376328 + 1219240 + 1399112 + 1185832 + 1087752 + 2064120 + 0 + 0 + + + + HP + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 1048568 + 1048580 + 4194060 + 2097396 + 3145220 + 3145268 + 3145220 + 3145220 + 2097156 + 4194300 + 5592402 + 4893222 + 8737873 + 8511491 + 16777215 + 8388609 + 4194306 + 4194300 + 0 + 0 + + + + Hyperion + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 16777215 + 8388609 + 12579841 + 11546877 + 11547697 + 11546625 + 11546625 + 11546877 + 12579889 + 8388609 + 16777215 + 8388865 + 8389121 + 14680327 + 512 + 4194300 + 2796116 + 3495212 + 2357332 + 4194300 + + + + Spectrum + + True + False + 1 + 0 + 6 + 7 + False + False + + 0 + 0 + 0 + 0 + 0 + 16777215 + 14647299 + 14647299 + 12582915 + 16777215 + 8388609 + 11983725 + 8388609 + 9287387 + 8388615 + 9287389 + 8388621 + 11983725 + 8388633 + 16777215 + 0 + + + + + 0 + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + A + + diff --git a/main.bas b/main.bas index bd81cdb..b956ea2 100644 --- a/main.bas +++ b/main.bas @@ -4,35 +4,41 @@ !- Comments : !- Author : XWolfOverride !- ======================================== +!- V=53248 10 print chr$(147) 20 poke 53280,1 30 poke 53281,1 40 gosub 10000 -50 V=53248 -70 gosub 5200 -!- m(spr),x,y,dx,dy -80 dim m(8,4) -90 for z=0 to 7 -100 m(z,0)=100+(rnd(1)*150):m(z,1)=100+(rnd(1)*150):m(z,2)=2:m(z,3)=2 -110 next -120 m(1,2)=-m(1,2) +50 gosub 5200 +60 dim m(8) -220 for z=0 to 7 -230 m(z,0)=m(z,0)+m(z,2):m(z,1)=m(z,1)+m(z,3) -240 if m(z,0)>255 then m(z,0)=255:m(z,2)=-m(z,2) -250 if m(z,0)<70 then m(z,0)=70:m(z,2)=-m(z,2) -260 if m(z,1)>230 then m(z,1)=230:m(z,3)=-m(z,3) -270 if m(z,1)<95 then m(z,1)=95:m(z,3)=-m(z,3) -280 poke 53248+(z*2),m(z,0):poke 53249+(z*2),m(z,1) -290 next +100 for z=0 to 7 +110 poke 53248+(z*2),100+(rnd(1)*150) +120 m(z)=100+(rnd(1)*150) +130 next -1000 goto 220 +!-200 for z=0 to 7 +!-210 m(z)=m(z)+1 +!-220 if m(z)>250 then poke 53248+(z*2),100+(rnd(1)*150):m(z)=0 +!-230 poke 53249+(z*2),m(z) +!-240 next +!-250 goto 200 + +200 jj=53248 +210 for z=0 to 7 +220 m(z)=m(z)+1 +230 if m(z)>250 then poke jj,100+(rnd(1)*150):m(z)=0 +240 jj=jj+1 +250 poke jj,m(z) +260 jj=jj+1 +270 next +280 goto 200 5200 REM Prepare sprites 5210 poke 53269,255 5270 POKE 53275,170:rem under chars -5280 for z=0 to 8:poke2040+z,200+z:poke53287+z,2:next +5280 for z=0 to 8:poke2040+z,128+z:poke53287+z,11:next 5290 return 10000 REM SCREEN 1 - @@ -56,3 +62,4 @@ 10180 PRINT "{reverse off} {reverse on}Q" 10500 return + diff --git a/sprites.asm b/sprites.asm index c5e64ec..20836ea 100644 --- a/sprites.asm +++ b/sprites.asm @@ -1,4 +1,5 @@ -*=12800 +!-12800 +*=$2000 ; Mac BYTE 7,255,224 BYTE 8,0,16