+ .db 8,6 ;4
+ .db %00110110 ; ██ ██
+ .db %00000101 ; █ █
+ .db %11000001 ;██ █
+ .db %01100001 ; ██ █
+ .db %11000010 ;██ █
+ .db %01010001 ; █ █ █
+
+;--------------------------------- bullets ----------------------------------
+
+spr_bullet01:
+ .db 2,1
+ .db %11000000 ;▒██
+spr_bullet02:
+ .db 4,1
+ .db %11110000 ;▒████
+spr_bullet03:
+ .db 2,2
+ .db %11000000 ;▒██
+ .db %11000000 ;▒██
+spr_bullet04:
+ .db 3,2
+ .db %11100000 ;▒███
+ .db %11100000 ;▒███
+spr_bullet05:
+ .db 4,3
+ .db %01100000 ; ▒██
+ .db %11110000 ;▒████
+ .db %01100000 ; ▒██
+spr_bullet06:
+ .db 5,3
+ .db %00110000 ; ▒██
+ .db %11111000 ;▒█████
+ .db %00110000 ; ▒██
+spr_bullet07:
+ .db 5,3
+ .db %01110000 ; ▒███
+ .db %11111000 ;▒█████
+ .db %01110000 ; ▒███
+spr_bullet08:
+ .db 5,3
+ .db %11110000 ;▒████
+ .db %11111000 ;▒█████
+ .db %11110000 ;▒████
+spr_bullet09:
+ .db 5,4
+ .db %00010000 ; ▒█
+ .db %10111000 ;▒█▒███
+ .db %01111000 ; ▒████
+ .db %00010000 ; ▒█
+spr_bullet10:
+ .db 6,4
+ .db %00111000 ; ▒███
+ .db %01111100 ; ▒█████
+ .db %11111100 ;▒██████
+ .db %00110000 ; ▒██
+spr_bullet11:
+ .db 7,5
+ .db %00011000 ; ▒██
+ .db %11111100 ;▒██████
+ .db %00111110 ; ▒█████
+ .db %01111100 ; ▒█████
+ .db %00011000 ; ▒██
+spr_bullet12:
+ .db 7,6
+ .db %00110000 ; ▒██
+ .db %11111100 ;▒██████
+ .db %00111110 ; ▒█████
+ .db %01111110 ; ▒██████
+ .db %11111100 ;▒██████
+ .db %00111000 ; ▒███
+spr_bullet13:
+ .db 8,8
+ .db %00111100 ; ▒████
+ .db %11111110 ;▒███████
+ .db %01111111 ; ▒███████
+ .db %00011111 ; ▒█████
+ .db %01111111 ; ▒███████
+ .db %11111110 ;▒███████
+ .db %00111100 ; ▒████
+spr_bullett1:
+ .db 4,3 ;▒▒▒
+ .db %11100000 ;▒███
+ .db %11110000 ; ████
+ .db %01110000 ; ███
+
+spr_bullete1:
+ .db 4,3 ;enemy bullets
+ .db %01100000 ; ██▒
+ .db %11110000 ;████▒
+ .db %01100000 ; ██▒
+
+bullettable:
+ .db (spr_bullet01-spr_bullet01) ;0
+ .db (spr_bullet02-spr_bullet01) ;4
+ .db (spr_bullet03-spr_bullet01) ;8
+ .db (spr_bullet04-spr_bullet01) ;12
+ .db (spr_bullet05-spr_bullet01) ;16
+ .db (spr_bullet06-spr_bullet01) ;20
+ .db (spr_bullet07-spr_bullet01) ;24
+ .db (spr_bullet08-spr_bullet01) ;28
+ .db (spr_bullet09-spr_bullet01) ;32
+ .db (spr_bullet10-spr_bullet01) ;36
+ .db (spr_bullet11-spr_bullet01) ;40
+ .db (spr_bullet12-spr_bullet01) ;44
+ .db (spr_bullet13-spr_bullet01) ;48
+ .db (spr_bullet13-spr_bullet01) ;52
+ .db (spr_bullet13-spr_bullet01) ;56
+ .db (spr_bullet13-spr_bullet01) ;60
+
+;format:[min.damage] [dam.inc] [0000:direction 0000:speed] [offset]
+;damage = min.damage + dam.inc*incs (0<=incs<=6)
+maxnrweapons = 8+1
+weapondata:
+ .db 1,1,%11110000,0,%11110000,6,%00000000,0 ;LASER
+ .db 1,1,%00000010,3,%00000000,0,%00000000,0 ;single fire
+ .db 3,1,%00000011,3,%00000000,0,%00000000,0 ;fast single
+ .db 1,1,%00000010,0,%00000010,6,%00000000,0 ;double
+ .db 1,1,%00010010,2,%00110010,2,%01000010,2 ;triple
+ .db 3,2,%00010011,2,%00110011,2,%01000011,2
+ .db 5,3,%00010011,2,%00110011,2,%01000100,2
+ .db 7,4,%00010100,2,%00110100,2,%01000100,2
+ .db 12,5,%00010110,2,%00110110,2,%01000110,2
+
+collidedamage = 4
+
+;------------------------------------ bar -----------------------------------
+
+spr_lship:
+ .db 5,3
+ .db %11100000
+ .db %01111000
+ .db %11100000
+lshipsize = 5
+
+spr_icon:
+ .db 16,7 ;selected .......:.......:
+ .db %11111111 ; ████████████████
+ .db %11000000 ; ██ █
+ .db %11000000 ; ██ █
+ .db %11000000 ; ██ █
+ .db %11000000 ; ██ █
+ .db %11000000 ; ██ █
+ .db %11111111 ; ████████████████
+ .db 7
+ .db %11111111
+ .db %00000001
+ .db %00000001
+ .db %00000001
+ .db %00000001
+ .db %00000001
+ .db %11111111
+spr_icon00:
+ .db 16,7 ;unused .......:.......:
+ .db %10101010 ; █ █ █ █ █ █ █ █
+ .db %11010101 ; ██ █ █ █ █ █ █ █
+ .db %10101010 ; █ █ █ █ █ █ █ █
+ .db %11010101 ; ██ █ █ █ █ █ █ █
+ .db %10101010 ; █ █ █ █ █ █ █ █
+ .db %11010101 ; ██ █ █ █ █ █ █ █
+ .db %10101010 ; █ █ █ █ █ █ █ █
+ .db 7
+ .db %10101010
+ .db %01010101
+ .db %10101010
+ .db %01010101
+ .db %10101010
+ .db %01010101
+ .db %10101010
+spr_icon01:
+ .db 16,7 ;armor ; .......:.......:
+ .db %10000111 ; █ ███████
+ .db %10011000 ; █ ██ ██
+ .db %10110011 ; █ ██ ████ ██
+ .db %10110000 ; █ ██ ████ ██
+ .db %10110011 ; █ ██ ████ ██
+ .db %10011000 ; █ ██ ██
+ .db %10000111 ; █ ███████
+ .db 7
+ .db %11110000
+ .db %00001100
+ .db %11000110
+ .db %11100110
+ .db %11000110
+ .db %00001100
+ .db %11110000
+spr_icon02:
+ .db 16,7 ;torpedo .......:.......:
+ .db %10111000 ; █ ███ █ █ █
+ .db %10011100 ; █ ███ █ █ █
+ .db %10111000 ; █ ███ █ █ █
+ .db %10000000 ; █ ███ █ █
+ .db %11100001 ; ███ ████ █ █
+ .db %10011000 ; █ ██ ████ █ █
+ .db %11100110 ; ███ ██ ██ █
+ .db 7
+ .db %00010101
+ .db %00010101
+ .db %01001010
+ .db %11101010
+ .db %11100101
+ .db %11110101
+ .db %00110010
+spr_icon03:
+ .db 16,7 ;bullets .......:.......:
+ .db %10000000 ; █ ██
+ .db %10000011 ; █ █████ ▒▒▒
+ .db %10011000 ; █ ██ ██ ▒▒▒
+ .db %11111100 ; ██████ ▒▒▒
+ .db %10011000 ; █ ██ ██ ▒▒▒
+ .db %10000011 ; █ █████ ▒▒▒
+ .db %10000000 ; █ ██
+ .db 7
+ .db %11000000
+ .db %11100000
+ .db %11000000
+ .db %00000000
+ .db %11000000
+ .db %11100000
+ .db %11000000
+spr_icon04:
+ .db 16,7 ;laser .......:.......:
+ .db %10000000 ; █
+ .db %10110010 ; █ ██ █ █
+ .db %10111011 ; █ ███ ██
+ .db %10011101 ; █ ███ █████████
+ .db %10111011 ; █ ███ ██
+ .db %10110010 ; █ ██ █ █
+ .db %10000000 ; █
+ .db 7
+ .db %00000000
+ .db %10000000
+ .db %00000000
+ .db %11111111
+ .db %00000000
+ .db %10000000
+ .db %00000000
+spr_icon05:
+ .db 16,7 ;multiple .......:.......:
+ .db %10000011 ; █ ███
+ .db %10000001 ; █ ████ ██
+ .db %10000001 ; █ ████
+ .db %10000011 ; █ ███
+ .db %10011000 ; █ ██
+ .db %10111100 ; █ ████ ██ ██
+ .db %10011000 ; █ ██
+ .db 7
+ .db %10000000
+ .db %11100110
+ .db %11100000
+ .db %10000000
+ .db %00000000
+ .db %11000011
+ .db %00000000
+spr_dividerline:
+ .db 8,7
+ .db 128,128,128,128,128,128,128 ;128 = %10000000
+
+;---------------------------- texts -----------------------------------------
+
+txt_email: .db "www.shiar.org ",127 ;title screen
+ .db " shiar0@hotmail.com",0
+_txt_email = $3A01 ;$3A1E=just email
+txt_about: .db " v0.97.625 ",127," by Shiar",0 ;right behind txt_email
+_txt_about = $331F
+txt_menu1: .db "NEW GAME",0
+txt_menu2: .db "CONTINUE",0
+
+txt_level: .db "LEVEL ",0 ;new level screen
+txt_lives: .db "Lx0",0
+txt_savekey: .db "Press [F1] to save",0
+
+txt_gameover: .db "GAME OVER!",0 ;game over screen
+txt_score: .db "Score",0
+txt_hiscore: .db "Hiscore",0
+
+txt_pressenter: .db "Enter to continue",0 ;pause
+txt_teacher: .db "(2",Lpi,"*.95)/sin 13",0 ;boss
+txt_teacherans: .db Lneg,"14.2063168184",0
+
+;---------------------------- save data -------------------------------------
+
+storehi_start:
+hiscore .dw $0000
+hiname .db "Shiar.97",0
+storehi_end:
+
+storesave_start:
+level .db $01 ;level number
+levelp .dw level01 ;pointer to level data
+pickuptimer .db $04 ;counts when to place a pickup
+your_ship .dw spr_ship04 ;your sprite
+your_score .dw $0000 ;current score
+
+your_pickup .db $04
+your_occ .db $00 ;0=normal 1..16=exploding
+your_inv .db $00 ;invincibility left
+your_armor .db $0a ;HP left
+your_lives .db $03 ;
+
+your_weapon .db $02 ;weapon: 0=no, 1=laser, 2+=bullet n+1
+your_multiples .db $00 ;multiples present
+torp_occ .db $00 ;torp.state: 0=unavail 1=avail 2=presnt
+torp_pos .dw $0000 ;torpedo position (x,y)
+storesave_end:
+
+;XLlevelsdata:---------------------------------------------------------------
+
+level00:
+ .db 0 ;story identifier
+ .db $21,$1d,"Cosmic year 6716" ,0,0,$1d,$06
+ .db $1b,$1d,"STORYLINE COMING SOON" ,0,0,$1d,$06
+ .db $09,$19,"STORYLINE COMING SOON" ,0,1
+ .db $2e,$21,"**** NEMESIS 86" ,0,1
+ .db $52,$36,"by Shiar" ,0,0,$19,$23
+ .db $ff ;story end
+
+;format:[nr.dif.enemies]x [enemy nr]
+; [min. enemy frequency] [enemy frequency max.inc] [next lvl]
+; [level_info: 0000:damage 0:directfire 0:ground 0:ceiling 0:diagfire]
+; [level_move] [tunnel size] [groundtype]
+; [16_ground] [16_ceiling] [stars1] [stars2]
+
+ .db $07,$08 ;moveType; enemyType
+level01: ;efrequency must be odd if halfluring!
+ .db 3,1,2,3
+ .db 6,10,180,%00000000
+ .db 2,0,0
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 ;16
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+
+ .db $07,$08 ;moveType; enemyType
+level02: ;efrequency must be odd if halfluring!
+ .db 3,4,5,6
+ .db 30,1,40,%00010000
+ .db 0,0,0
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 ;16
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+
+ .db 0,0
+
+ .db 0
+ .db $01,01,"And the storyline conti",
+ .db "nues.....",0,1
+ .db $01,09,"You decide to fly close",
+ .db " to the",0,1
+ .db $01,15,"surface of a nearby pl",
+ .db "anet =)",0,0,1,20
+ .db $FF
+
+ .db $07,$09
+level03:
+ .db 1,$02
+ .db $13,40,$4b,%00100100,0,-5,1
+ .db 1,2,3,4,5,6,6,5,4,3,4,5,4,5,6,5
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+
+ .db 0,0
+
+ .db 0
+ .db $01,01,"Blablabla...",0,1
+ .db $01,34,"this storyline sux",0,0,1,39
+ .db $FF
+
+ .db $07,$09
+level03a:
+ .db 1,$03
+ .db $2d,$3f,%00010110,0,-9,1
+ .db 3,2,4,3,2,2,1,1,1,1 ,1,1,21,17,18,20
+ .db 1,1,1,1,1,1,1,3,6,12,9,1,21,19,18,18
+ .db -1,-1 ;=%11111111=line
+
+ .db $07,$08
+level04:
+ .db 1,$04
+ .db $11,$41,%00100001,0,0,0
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+ .db $07,$09
+level05:
+ .db 1,$05
+ .db $11,$45,%00100101,%10,-7,1
+ .db 14,12,11,9,10,7,7,5,4,3,4,4,2,3,1,2
+ .db 1, 1, 1, 1,1, 1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+ .db $07,$08
+level06:
+ .db 1,$06
+ .db $19,$3a,%00100111,0,-4,1
+ .db 20,22,18,15,9,1,1,1,1,1,1,1,1,1,1,1
+ .db 20,22,18,15,9,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+
+ .db $07,$09
+level07:
+ .db 1,$07
+ .db $09,$ff,%00100001,0,0,0
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
+ .db 1,1
+
+;------------------------------ enemies -------------------------------------
+
+;format: [HP64] [000000:HP 00:occ] [sprite] [appearance(ypos)]
+; [time2fire] [firefreq] [0] [0]
+enemyspecs:
+ .db 0,%00100110,(spr_enemy01-spr_enemy00)/2,1,0,0,0,0 ;#1
+ .db 0,%00111111,(spr_enemy02-spr_enemy00)/2,1,0,0,0,0 ;#2
+ .db 0,%01011010,(spr_enemy03-spr_enemy00)/2,1,0,0,0,0 ;#2
+
+ .db 0,%00100110,(spr_enemy04-spr_enemy00)/2,1,1,46,0,0 ;#1
+ .db 0,%00101010,(spr_enemy05-spr_enemy00)/2,3,39,13,0,0 ;#2
+ .db 0,%00001111,(spr_enemy06-spr_enemy00)/2,2,87,5,0,0 ;#3
+
+ .db 0,%00000110,(spr_enemy04-spr_enemy00)/2,2,0,0,0,0 ;#4
+ .db 0,%00000111,(spr_enemy05-spr_enemy00)/2,3,0,0,0,0 ;#5
+ .db 0,%00001011,(spr_enemy06-spr_enemy00)/2,2,0,0,0,0 ;#6
+
+ .db 0,%00011011,(spr_enemy07-spr_enemy00)/2,3,0,0,0,0 ;#7
+
+ .db 1,%00110011,(spr_boss0_1-spr_enemy00)/2,1,15,10,0,0 ;boss1
+ .db 1,%01001011,(spr_boss0_2-spr_enemy00)/2,3,10,8,0,0 ;boss2
+
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+ .db 0,%00000000,0,0,0,0,0,0
+
+spr_enemy00:
+ .db 8,8 ;pickup
+ .db %00011000 ; ██
+ .db %00011000 ; ██
+ .db %00011000 ; ██
+ .db %11111111 ; ████████
+ .db %11111111 ; ████████
+ .db %00011000 ; ██
+ .db %00011000 ; ██
+ .db %00011000 ; ██