4 .org $E9E3-16 ;$E9E3-[name size]
6 .db "89" ;worm header (version .88)
7 .db 16,"Worm LevelPack I" ;level name
8 .dw hiscore-single ;leveldata size
13 .dw single ;points to singleplayer levels
14 .dw 0 ;...peaworm level (0 = no levels/empty level)
15 .dw deathmatch ;...deathmatch
16 .dw foodmatch ;...foodmatch
17 .dw linkmatch ;...linkmatch
18 .dw hunting ;...hunting
20 .dw ctf ;...capture the flag
22 .db 2,2,3,2 ;max. choosable level+1 for each gametype
23 .db 2,2,2,2 ;so: 2 = level 1 only; 4 = level 1 to 3 available
27 .db 5,4,15 ;peas in level, delay (0=fastest), pea-growth
28 .db 15,5 ;begin_size, sprite size (0=use default sprite)
34 .db 0 ;balls (see below)
35 .db 0,2,63 ;your start d (0=down,$80=up), y, x
36 .db 128,57 ;field width (128-255), height (57-255)
37 .db 0,0 ;no additional lines, boxes
43 .db 28,28,100,28 ;line coords: x1,y1,x2,y2
55 .db 2,4,0 ;1 bouncing ball, begin y, x, direction (%11=left+up)
134 ;Code to run when all levels are done:
135 ;Worm waits a second, then screen is cleared and this code will be run.
136 ;End with <ret> (stats-screen will then be displayed.)
137 ;If you don't want an ending, simply put <ret>.
140 call _puts ;display text
141 jp _getkey ;wait for a key
144 .db " Congratulations!!",0
149 .db $40,28,2 ;begin stats for each player
150 .db $C0,28,125 ;player 2 moves left
151 .db $00,2,63 ;player 3 moves down
152 .db $80,54,63 ;player 4 moves up
156 .db 16,12,48,12 ;x1,y1,x2,ysize(y2-y1)
157 .db 80,12,112,12 ;...
162 .db $40,30,2,$C0,30,125, $00,2,64,$80,54,64
170 .db $40,30,2,$C0,30,125, $00,2,64,$80,54,64
177 .db $40,30,2,$C0,30,125, $00,2,64,$80,54,64
184 .db $40,28,2,$C0,28,125, $00,2,63,$80,54,63
196 .db $40,3,2,$40,6,2, $40,9,2,$40,12,2
204 .dw 0 ;singleplayer hiscore will be saved here
205 .dw 0 ;same for peaworm hiscore