Chopperman Demo
Emulation Item Preview
Share or Embed This Item
- Topics
- Apple II games, Action games, Demo
- Language
- English
Notes
Disk info for b03d05a_demo_jeu_chopperman_by_sss.dsk:
File Name: a2_asimov_b03d05a_demo_jeu_chopperman_by_sss/b03d05a_demo_jeu_chopperman_by_sss.dsk
Disk Name: DISK VOLUME #254
Physical Size (bytes): 143360
Free Space (bytes): 57600
Used Space (bytes): 85760
Physical Size (KB): 140
Free Space (KB): 56
Used Space (KB): 83
Archive Order: DOS
Disk Format: DOS 3.3
Total Sectors: 560
Free Sectors: 225
Used Sectors: 335
Tracks On Disk: 35
Sectors On Disk: 16
Disk directory for b03d05a_demo_jeu_chopperman_by_sss.dsk:
a2_asimov_b03d05a_demo_jeu_chopperman_by_sss/b03d05a_demo_jeu_chopperman_by_sss.dsk DISK VOLUME #254
B 033 PI.PIC
B 012 TABLE
B 014 MEGAFFICHE.S
B 003 MEGAFFICHE
B 002 MASK.HELI2.W
B 002 MASK.HELI1.W
B 002 HELI2.W
B 002 HELI1.W
B 002 SHAPE.HELI1
B 002 SHAPE.HELI2
A 002 ROUT1_BAS
B 003 ROUT_ANIM
B 033 PI.DECOR
B 013 SCROLLING.S
B 003 SCROLLING
B 002 SCROL.EX
B 008 ANIMATION.S
B 003 ANIMATION
B 002 BOOT
A 002 HELLO
B 002 MSK.HELI1.W
B 002 MSK.HELI2.W
B 010 MAIN2.S
B 003 MAIN2
B 003 BOOT.S
B 041 MAIN.S
B 007 MAIN
B 002 HELI.AVANT1.W
B 002 HELI.AVANT2.W
B 002 MSK.HELI.AVANT1.W
B 002 MSK.HELI.AVANT2.W
B 004 SHAPE.HELI
B 002 SHAPE.HELI.AVANT2.W
B 004 SET.BRODY
B 002 TIR_HORI.W
B 002 MSK_TIR_HORI.W
B 002 TIR_BAS.W
B 002 MSK_TIR_BAS.W
B 002 SHAPE.TIR.ALONE
B 002 MSK.EXPLO1.W
B 002 EXPLO1.W
B 002 EXPLO2.W
B 002 MSK.EXPLO2.W
B 002 SHAPE.EXPLO
B 002 SHAPE.TIR
B 008 MINIFFICHE.S
B 002 MINIFFICHE
B 002 HELI1.W+M
B 002 HELI2.W+M
B 002 HELI.AVANT1.W+M
B 002 HELI.AVANT2.W+M
DOS 3.3 format; 57,600 bytes free; 85,760 bytes used.
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/ANIMATION.S:
;ESSAI ANIMATION
;BY THE GOG'S
;15 AVRIL 1988
ORG $6300
;
STA $C050
STA $C057
STA $C052
LDA #$00
STA FIRST54
STA FIRST55
STA DIR
START LDA $E6
CMP #$20
BEQ START2
START1 STA $C055
LDA #$20
STA $E6
LDA FIRST54
BEQ CONT54
LDA #$00
STA $0E
LDA #$1E
STA $0F
LDX #$FF
JSR $6800
CONT54 LDA #$FF
STA FIRST54
JSR $7000
LDA #$00
STA $00
LDA #$61
STA $01
LDA #$00
STA $0E
LDA #$1E
STA $0F
L1 LDA #$60
P1 LDX #$02
C1 LDY #$01
JSR $6800
JMP CONT1
START2 LDA #$40
STA $E6
STA $C054
LDA FIRST55
BEQ CONT55
LDA #$00
STA $0E
LDA #$1F
STA $0F
LDX #$FF
JSR $6800
CONT55 LDA #$FF
STA FIRST55
JSR $7000
LDA #$00
STA $00
LDA #$62
STA $01
LDA #$00
STA $0E
LDA #$1F
STA $0F
L2 LDA #$60
P2 LDX #$02
C2 LDY #$01
JSR $6800
CONT1 LDA DIR
BNE DIR1
LDA P2+1
CLC
ADC #$02
STA P2+1
CMP #$07
BNE BCL_P2
LDA #$00
STA P2+1
JMP CONT_P2
BCL_P2 CMP #$08
BNE BCL_P3
LDA #$01
STA P2+1
CONT_P2 INC C2+1
BCL_P3 LDA P2+1
STA P1+1
LDA C2+1
STA C1+1
LDA C2+1
CMP #$14
BNE GOOD
LDA #$01
STA DIR
GOOD JMP START
DIR1 CMP #$01
BNE DIR2
LDA L2+1
SEC
SBC #$01
STA L2+1
STA L1+1
CMP #$40
BNE GOOD
LDA #$02
STA DIR
JMP GOOD
DIR2 CMP #$02
BNE DIR3
LDA P2+1
SEC
SBC #$02
STA P2+1
CMP #$FF
BNE BCL_P2_N
LDA #$06
STA P2+1
JMP CONT_P2_N
BCL_P2_N CMP #$FE
BNE BCL_P3_N
LDA #$05
STA P2+1
CONT_P2_N DEC C2+1
BCL_P3_N LDA P2+1
STA P1+1
LDA C2+1
STA C1+1
LDA C2+1
CMP #$00
BNE GOOD
LDA #$03
STA DIR
JMP GOOD
DIR3 LDA L2+1
CLC
ADC #$01
STA L2+1
STA L1+1
CMP #$7A
BNE G1
LDA #$00
STA DIR
G1 JMP GOOD
FIRST54 DS 1
FIRST55 DS 1
DIR DS 1
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/BOOT.S:
;BOOT
ORG $1800
LST OFF
LDA #MSG
STA $0F
LDY #$00
BLC1 LDA ($0E),Y
BEQ END
JSR $FDED
INY
BNE BLC1
END JMP $6300
MSG HEX 8D8D84
ASC "MONC,I,O"
HEX 8D8D84
ASC "BLOADPI.DECOR,A$2000"
HEX 8D8D84
ASC "BLOADPI.DECOR,A$4000"
HEX 8D8D84
ASC "BLOADTABLE"
HEX 8D8D84
ASC "BLOADSCROLLING"
HEX 8D8D84
ASC "BLOADSHAPE.HELI,A$6000"
HEX 8D8D84
ASC "BLOADMEGAFFICHE"
HEX 8D8D84
ASC "BLOADSHAPE.TIR,A$1100"
HEX 8D8D84
ASC "BLOADMAIN"
HEX 8D8D00
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/BOOT.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A9 17 85 0E A9 18 85 0F A0 00 B1 0E F0 06 20 ED )...)... .1.p. m
$000010 FD C8 D0 F6 4C 00 63 8D 8D 84 CD CF CE C3 AC C9 }HPvL.c. ..MONC,I
$000020 AC CF 8D 8D 84 C2 CC CF C1 C4 D0 C9 AE C4 C5 C3 ,O...BLO ADPI.DEC
$000030 CF D2 AC C1 A4 B2 B0 B0 B0 8D 8D 84 C2 CC CF C1 OR,A$200 0...BLOA
$000040 C4 D0 C9 AE C4 C5 C3 CF D2 AC C1 A4 B4 B0 B0 B0 DPI.DECO R,A$4000
$000050 8D 8D 84 C2 CC CF C1 C4 D4 C1 C2 CC C5 8D 8D 84 ...BLOAD TABLE...
$000060 C2 CC CF C1 C4 D3 C3 D2 CF CC CC C9 CE C7 8D 8D BLOADSCR OLLING..
$000070 84 C2 CC CF C1 C4 D3 C8 C1 D0 C5 AE C8 C5 CC C9 .BLOADSH APE.HELI
$000080 AC C1 A4 B6 B0 B0 B0 8D 8D 84 C2 CC CF C1 C4 CD ,A$6000. ..BLOADM
$000090 C5 C7 C1 C6 C6 C9 C3 C8 C5 8D 8D 84 C2 CC CF C1 EGAFFICH E...BLOA
$0000A0 C4 D3 C8 C1 D0 C5 AE D4 C9 D2 AC C1 A4 B1 B1 B0 DSHAPE.T IR,A$110
$0000B0 B0 8D 8D 84 C2 CC CF C1 C4 CD C1 C9 CE 8D 8D 00 0...BLOA DMAIN...
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/EXPLO1.W.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 0F 17 00 03 80 80 80 80 84 80 A0 95 80 A0 D5 80 ........ .. .. U.
$000010 80 D5 80 80 FD 80 80 9C 80 80 80 80 .. .. .. .. .U..}... ....
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/EXPLO2.W.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 18 23 00 03 80 80 80 80 82 80 C0 8A 80 D0 8A 80 .#...... ..@..P..
$000010 D0 AA 80 D0 AA 80 D0 AB 81 80 AF 81 80 FE 81 80 P*.P*.P+ ../..~..
$000020 B8 80 80 80 80 .. .. .. .. .. .. .. .. .. .. .. 8....
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/HELLO.bas:
0 TEXT : HOME
1 PRINT "CHOPPERMAN."
2 PRINT "___________"
3 PRINT : PRINT "BY SSS."
5 PRINT "BRUN BOOT"
10 PRINT : PRINT "BRUN BOOT"
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/MAIN.S:
* GESTION DE L'HELICO
* DE CHOPPERMAN
* __________
*
* THE GOG'S . 16 AVRIL 1988
ORG $6300
LST OFF
BUF_SH = $00
BUF_FN = $0E ; POINTEUR POUR SAUVEGARDE OU RESTITUTION
BUF_LO = $FC ; DU DECOR.
BUF_HI = $FB ; IDEM , MAIS INVARIANT.
BUTTON0 = $FA
BUTTON1 = $F9
PAGE = $E6
CORLIGNE = $FF
CORCOL = $FE
CORPIXEL = $FD
NB_TIR = $F8
CURENT_TIR = $F7
SCROLLING = $7000
MEGAFFICHE = $1E00
GET_JOY = $FB1E
ADR_HGR_BAS = $0800
ADR_HGR_HAUT = $08C0
LDA #$40
STA PAGE
JSR SCROLLING+3
STA $C050
STA $C057
STA $C052
LDA #$20
STA CORLIGNE ; LIGNE
LDA #$01
STA CORCOL ; COLONNE
LDA #$00
STA CORPIXEL ; PIXEL
LDA #$FE
STA FIRST54
STA FIRST55
LDA #$00
STA DIR
LDA #$00
STA SHAPE
LDA #$00
STA NB_TIR
LDA #$00
STA TEMPO_TIR
LDX #$00
LDA #$FF
MORE_INITIR STA TBL_TIR,X
INX
CPX TIR_MAX
BNE MORE_INITIR
JMP START2
HMIN HEX 20 ; COORDONNES LIMITES DE L'HELICO
HMAX HEX 80
VMIN HEX 00
PMIN HEX 00
VMAX HEX 22
PMAX HEX 01
BUF_54 HEX 0004 ; BUFFER DES 2 PAGES POUR SAUVEGARDE
BUF_55 HEX 8004 ; DECOR POUR HELICO
FIRST54 DS 1
FIRST55 DS 1
SHAPE DS 1
DIR DS 1
DIR_MAX HEX 02 ; NB DE SHAPE POUR L'ANIMATION
DIR_TBL1 HEX 0060 ; ADRESSE DES 2 DESSINS POUR LA SHAPE 1
HEX A460 ; (HELICO NORMAL)
DIR_TBL2 HEX 4861 ; IDEM SHAPE 2
HEX 1C62 ; HELICO VERS LE BAS.
VIDE HEX 7807 ; DESSIN POUR
PLEIN HEX 0804 ; L'ALTIMETRE
DIVISION HEX 13 ; NB DE DIVISION DE L'ALTIMETRE
SHAPE_TBL DFB #DIR_TBL1
DFB #DIR_TBL2
; DES SHAPES
TIR_MAX HEX 07 ; NB DE TIR MAXIMUM.
TEMPO_TIR DS 1
TEMPO_MAX HEX 02
AFFICHE_HORI LDX #$01
MORE21 LDA ADR_HGR_BAS,X
STA $26
LDA ADR_HGR_HAUT,X
ORA PAGE
STA $27
LDY #$01
CPX $00
BCS VIDE1
LDA PLEIN
STA ($26),Y
INY
LDA PLEIN+1
STA ($26),Y
BNE CONT_AFFI
VIDE1 LDA VIDE
STA ($26),Y
INY
LDA VIDE+1
STA ($26),Y
CONT_AFFI INX
CPX #$15
BNE MORE21
RTS
START2 LDA PAGE
EOR #$60
STA PAGE
CMP #$20
BEQ P55
LDA $C054
LDA BUF_54
PHA
LDA BUF_54+1
PHA
LDA FIRST54
PHA
LDA #$FF
STA FIRST54
BNE CONT1
P55 LDA $C055
LDA BUF_55
PHA
LDA BUF_55+1
PHA
LDA FIRST55
PHA
LDA #$FF
STA FIRST55
CONT1 LDA $C061
STA BUTTON0
LDX #$01
JSR GET_JOY
TYA
LSR
LSR
CLC
ADC #$04
LSR
LSR
LSR
STA $00
SEC
SBC #$04
BNE NOTHING
LDA #$00 ; SHAPE HELICO NORMAL.
STA SHAPE
JMP END_JOY1
NOTHING BPL AJOUTE
LDA #$00 ; SHAPE HELICO VIRAGE HAUT.
STA SHAPE
LDA #$04
SEC
SBC $00
STA $00
LDA CORLIGNE
SEC
SBC $00
STA CORLIGNE
CMP HMIN
BCS END_ENLEVE
LDA HMIN
STA CORLIGNE
END_ENLEVE JMP END_JOY1
AJOUTE STA $00
LDA #$00 ; SHAPE HELICO VIRGAE BAS.
STA SHAPE
LDA CORLIGNE
CLC
ADC $00
STA CORLIGNE
CMP HMAX
BEQ END_AJOUTE
BCC END_AJOUTE
LDA HMAX
STA CORLIGNE
END_AJOUTE NOP
END_JOY1 LDX #$10
BR1 STA $C030
DEX
BNE BR1
LDA HMAX
SEC
SBC HMIN
STA $01
LDA CORLIGNE
SEC
SBC HMIN
STA $00
LDX #$FF
MORUE LDA $01
INX
SEC
SBC DIVISION
STA $01
CMP #$00
BPL MORUE
STX $01
LDX #$FF
MORU2 LDA $00
INX
SEC
SBC $01
STA $00
BPL MORU2
INX
STX $00
JSR AFFICHE_HORI
LDA #$20
JSR $FCA8
CONT2 LDX #$00
JSR GET_JOY
TYA
LSR
LSR
CLC
ADC #$04
LSR
LSR
STA $00
LSR
SEC
SBC #$04
BNE CONT3
JMP END_JOYSTICK
CONT3 BPL AJOUTE_PIX
LDA #$00 ; SHAPE HELICO VERS L'ARRIERE
STA SHAPE
LDA #$08
SEC
SBC $00
STA $00
LDA CORPIXEL
SEC
SBC $00
STA CORPIXEL
BPL END_ENL_PX
COUNT_PIX CLC
ADC #$07
STA CORPIXEL
LDA CORCOL
CMP VMIN
BEQ END_VMIN
DEC CORCOL
LDA CORPIXEL
BMI COUNT_PIX
JMP END_JOYSTICK
END_VMIN LDA VMIN
STA CORCOL
LDA PMIN
STA CORPIXEL
END_ENL_PX JMP END_JOYSTICK
AJOUTE_PIX ASL
STA $00
CMP #$05
BCS SH_AVANT
LDA #$00
BEQ CONT_SH_AVANT
SH_AVANT LDA #$01 ; SHAPE HELICO VERS L'AVANT.
CONT_SH_AVANT STA SHAPE
LDA CORPIXEL
CLC
ADC $00
STA CORPIXEL
CMP #$07
BEQ COUNT_PIX2
BCC END_AJ_PX
COUNT_PIX2 SEC
SBC #$07
STA CORPIXEL
LDA CORCOL
CMP VMAX
BEQ END_VMAX
INC CORCOL
LDA CORPIXEL
CMP #$07
BCS COUNT_PIX2
JMP END_JOYSTICK
END_VMAX LDA VMAX
STA CORCOL
LDA PMAX
STA CORPIXEL
END_AJ_PX JMP END_JOYSTICK
END_JOYSTICK JSR EFFA_TIR
PLA
TAX
PLA
STA BUF_HI
PLA
STA BUF_LO
CPX #$FE
BEQ FIRST_TIME
LDA BUF_LO
STA BUF_FN
LDA BUF_HI
STA BUF_FN+1
JSR MEGAFFICHE ; X CONTIENT #$FF D'OU RESTITUTION.
FIRST_TIME JSR SCROLLING
LDA BUF_LO
STA BUF_FN
LDA BUF_HI
STA BUF_FN+1
INC DIR
LDA DIR
CMP DIR_MAX
BNE CONT_DIR
LDA #$00
STA DIR
CONT_DIR LDA SHAPE
ASL
TAX
LDA SHAPE_TBL,X
STA $03
LDA SHAPE_TBL+1,X
STA $04
LDA DIR
ASL
TAY
LDA ($03),Y
STA BUF_SH
INY
LDA ($03),Y
STA BUF_SH+1
LDA CORLIGNE
LDY CORCOL
LDX CORPIXEL
JSR MEGAFFICHE ; AFFICHAGE
LDA TEMPO_TIR
BEQ CONT_DEB_TIR
DEC TEMPO_TIR
LDY TEMPO_TIR
INY
CPY TEMPO_MAX
BEQ MORE_BRUIT
JMP CONT_BUTTON
CONT_DEB_TIR LDA BUTTON0
BPL CONT_BUTTON
JSR NEW_TIR
LDA TEMPO_MAX
STA TEMPO_TIR
MORE_BRUIT LDX #$0A
BR_B2 STA $C030
LDY #$10
BR_B1 DEY
BNE BR_B1
DEX
BNE BR_B2
CONT_BUTTON JSR CALC_TIR
JSR SCROLLING+6
JMP START2
TABLE_TIR
TBL_TIR HEX FFFFFF
HEX FFFFFF
HEX FF
TABLE_NB54 HEX 0005 ; BUFFER POUR SAUVEGARDE DECOR
HEX 3005 ; DERRIERE TIR.
HEX 6005
HEX 9005
HEX C005
HEX F005
HEX 2006
TABLE_NB55 HEX 5006
HEX 8006
HEX B006
HEX E006
HEX 1007
HEX 4007
HEX 7007
TABLE_COOR HEX A007
HEX B007
HEX C007
HEX D007
HEX E007
HEX F007
HEX F002
TIR_SHAPE HEX 0011 ; SHAPE.TIR A PARTIR DE $1100
HEX 1411
TIR_DIR HEX 000A
HEX 050B
TIR_COOR HEX 070502
HEX 0F0504
EFFACE DS 1
T_HMAX HEX 90
T_CMAX HEX 27
V_EXPLO HEX 92 ; POINTEURS POUR EXPLOSION
SH_EXPLO HEX 3011
HEX 6811
TABLE_EXPLO HEX 00
HEX 00
HEX 01
HEX 01
HEX 01
HEX 01
HEX 00
HEX 00
HEX 00
HEX 00
HEX 00
HEX FF ; #$FF = FIN ANIM
NEW_TIR LDX #$00
CONT_GETIR LDA TBL_TIR,X
CMP #$FF
BEQ CONT_TIR
INX
CPX TIR_MAX
BNE CONT_GETIR
PLA ; TROP DE TIR DEJA TIRE...
PLA
JMP CONT_BUTTON
* TABLE EN $10,$11
* OCTECT 0 : No DE LA SHAPE
* ----- 1&2 : Adresse de la Shape en Memoire
* ----- 3 : Direction hori du tir
* ----- 4 : Direction verti du tir
* ----- 5&6 : Buffer 54
* ----- 7&8 : Buffer 55
* ----- 9&10&11 : Coordonn{es du tir.
* ----- 12 : Firstime.
CONT_TIR LDA #$01 ; CREATION TABLE POUR TIR A.
STA TBL_TIR,X
RTS
NEW_TIR2 LDA #$0F
STA TBL_TIR,X
TXA
ASL
TAX
LDA TABLE_COOR,X
STA $10
LDA TABLE_COOR+1,X
STA $11
LDY #5
LDA TABLE_NB54,X
STA ($10),Y
INY
LDA TABLE_NB54+1,X
STA ($10),Y
INY
LDA TABLE_NB55,X
STA ($10),Y
INY
LDA TABLE_NB55+1,X
STA ($10),Y
LDY #$00
LDA SHAPE ; NUMERO DE LA SHAPE
STA ($10),Y
INY
ASL
TAX
LDA TIR_SHAPE,X ; ADRESSE DE LA SHAPE EN MEV.
STA ($10),Y
INY
LDA TIR_SHAPE+1,X
STA ($10),Y
INY
LDA TIR_DIR,X ; DIRECTION VERTI.
STA ($10),Y
INY ; DIRECTION HORI.
LDA TIR_DIR+1,X
STA ($10),Y
LDY #8
TXA
ADC SHAPE ; *3
TAX
INY
LDA CORLIGNE
CLC
ADC TIR_COOR,X
STA ($10),Y
INY
LDA CORCOL
CLC
ADC TIR_COOR+1,X
STA ($10),Y
INY
LDA CORPIXEL
CLC
ADC TIR_COOR+2,X
CMP #$07
BCS DEBORDEMENT
STA ($10),Y
JMP CONT_DEB
DEBORDEMENT DEY
PHA
LDA ($10),Y
CLC
ADC #$01
STA ($10),Y
PLA
SEC
SBC #$07
INY
STA ($10),Y
CMP #$07
BCS DEBORDEMENT
CONT_DEB LDA #$FF
STA EFFACE
INY
LDA #$00
STA ($10),Y
AFFI_TIR LDY #$5
LDA PAGE
CMP #$40
BNE CONT
LDY #$07
CONT LDA ($10),Y
STA BUF_FN
INY
LDA ($10),Y
STA BUF_FN+1
LDY #$01
LDA ($10),Y
STA BUF_SH
INY
LDA ($10),Y
STA BUF_SH+1
LDY #$09
LDA ($10),Y ; LDA
PHA
INY
INY
LDA ($10),Y ; LDX
TAX
DEY
LDA ($10),Y ; LDY
TAY
LDA EFFACE
BNE CONT_AFFIL
LDX #$FF
CONT_AFFIL PLA
JSR MEGAFFICHE
RTS
EFFA_TIR LDX TIR_MAX
DEX
STX CURENT_TIR
BCL_EFF LDX CURENT_TIR
LDA TBL_TIR,X
CMP #$FF
BEQ NO_EFF
JSR EFF
NO_EFF DEC CURENT_TIR
LDA CURENT_TIR
CMP #$FF
BNE BCL_EFF
RTS
EFF PHA
TXA
ASL
TAX
PLA
CMP #$FE
BNE CONT_EF
CONT_EFF2 LDA #$FF
LDY CURENT_TIR
STA TBL_TIR,Y
CONT_EF LDA TABLE_COOR,X
STA $10
LDA TABLE_COOR+1,X
STA $11
LDY #12 ; ATTENTION , 12 EN DECI
LDA ($10),Y
PHA
LDA #$FF
STA ($10),Y
PLA
BNE CONT_EFFA
RTS
CONT_EFFA LDA #$00
STA EFFACE
JSR AFFI_TIR
RTS
CALC_TIR LDA #$00
STA CURENT_TIR
CONT_CALC LDX CURENT_TIR
LDA TABLE_TIR,X
CMP #$01
BNE CONT_CALC0
JSR NEW_TIR2
JMP CONT_CALC2
CONT_CALC0 CMP #$F0
BEQ CONT_CL1
CMP #$F3
BNE CONT_CL2
CONT_CL1 JSR MEGA2
JMP CONT_CALC2
CONT_CL2 CMP #$0F
BNE CONT_CALC2
JSR MEGATIR
CONT_CALC2 INC CURENT_TIR
LDA CURENT_TIR
CMP TIR_MAX
BNE CONT_CALC
RTS
MEGATIR TXA
ASL
TAX
LDA TABLE_COOR,X
STA $10
LDA TABLE_COOR+1,X
STA $11
LDY #9
LDA ($10),Y
CLC
LDY #3
ADC ($10),Y
LDY #9
STA ($10),Y
CMP T_HMAX
BCC CONTA
LDA #$F0
LDX CURENT_TIR
STA TBL_TIR,X
LDX #$10
BR_EXPLO1 TXA
JSR $FCA8
STA $C030
DEX
BNE BR_EXPLO1
RTS
CONTA LDY #11
LDA ($10),Y
CLC
LDY #4
ADC ($10),Y
LDY #11
STA ($10),Y
CMP #$07
BCS DEBX
JMP CONT_MEGA
DEBX PHA
LDY #10
LDA ($10),Y
CLC
ADC #$01
STA ($10),Y
CMP T_CMAX
BCC CONTX
LDA #$FE
LDX CURENT_TIR
STA TBL_TIR,X
PLA
RTS
CONTX PLA
SEC
SBC #$07
LDY #11
STA ($10),Y
CMP #$07
BCS DEBX
CONT_MEGA LDA #$FF
STA EFFACE
JMP AFFI_TIR
MEGA2 PHA ; ECLAT TIR AU SOL.
TXA
ASL
TAX
LDA TABLE_COOR,X
STA $10
LDA TABLE_COOR+1,X
STA $11
PLA
CMP #$F3
BNE MEGA3_BIS
JMP MEGA3
MEGA3_BIS LDA #$00
LDY #3
STA ($10),Y ; SHAPE A UTILISER.
LDY #12
STA ($10),Y
LDA V_EXPLO
LDY #9
STA ($10),Y
LDA #$F3
LDX CURENT_TIR
STA TBL_TIR,X
MEGA3 LDY #11
LDA ($10),Y
SEC
SBC #$02
STA ($10),Y
BPL CONT_MEGA3
CLC
ADC #$07
STA ($10),Y
DEY
LDA ($10),Y
SEC
SBC #$01
STA ($10),Y
CONT_MEGA3 LDY #3
LDA ($10),Y
TAX
CLC
ADC #$01
STA ($10),Y
LDA TABLE_EXPLO,X
CMP #$FF
BEQ FIN_MEGA3
ASL
TAX
LDA SH_EXPLO,X
LDY #1
STA ($10),Y
LDA SH_EXPLO+1,X
INY
STA ($10),Y
LDA #$FF
STA EFFACE
JSR AFFI_TIR
LDY #$10
BR_EXPO2 LDX #$10
BR_EXPO1 STA $C030
DEX
BNE BR_EXPO1
DEY
BNE BR_EXPO2
RTS
FIN_MEGA3 LDX CURENT_TIR
LDA #$FE
STA TBL_TIR,X
RTS
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/MAIN2.S:
* GESTION DE L'HELICO
* DE CHOPPERMAN
* __________
*
* THE GOG'S . 16 AVRIL 1988
ORG $6300
LST OFF
BUF_SH = $00
BUF_FN = $0E ; POINTEUR POUR SAUVEGARDE OU RESTITUTION
BUF_LO = $FC ; DU DECOR.
BUF_HI = $FB ; IDEM , MAIS INVARIANT.
PAGE = $E6
CORLIGNE = $FF
CORCOL = $FE
CORPIXEL = $FD
SCROLLING = $7000
MEGAFFICHE = $6800
GET_JOY = $FB1E
STA $C050
STA $C057
STA $C052
STA $C054
JMP START
HMIN HEX 20
HMAX HEX 80
BUF_54 HEX 0004
BUF_55 HEX 0005
FIRST54 DS 1
FIRST55 DS 1
DIR DS 1
DIR_TBL HEX 0060
HEX 0061
DIR_MAX HEX 02
START LDA #$40
STA PAGE
LDA #$20
STA CORLIGNE ; LIGNE
LDA #$00
STA CORCOL ; COLONNE
LDA #$00
STA CORPIXEL ; PIXEL
LDA #$FE
STA FIRST54
STA FIRST55
LDA #$00
STA DIR
START2 LDA PAGE
EOR #$60
STA PAGE
CMP #$20
BEQ P55
LDA $C054
LDA BUF_54
PHA
LDA BUF_54+1
PHA
LDA FIRST54
PHA
LDA #$FF
STA FIRST54
BNE CONT1
P55 LDA $C055
LDA BUF_55
PHA
LDA BUF_55+1
PHA
LDA FIRST55
PHA
LDA #$FF
STA FIRST55
CONT1 LDX #$01
JSR GET_JOY
TYA
LSR
LSR
LSR
LSR
LSR
LSR
BNE MOVE_M1
LDA CORLIGNE ; JOYSTICK ENTRE 0 ET 64,
SEC ; DEPLACEMENT DE 2 LIGNES VERS LE HAUT.
SBC #$04
STA CORLIGNE
CMP HMIN
BCS END_M2
LDA HMIN
STA CORLIGNE
END_M2 JMP END_JOY1
MOVE_M1 CMP #$01 ; JOYSTICK ENTRE 64 ET 128,
BNE MOVE_0 ; DEPLACEMENT D'UNE LIGNE VERS LE HAUT.
LDA CORLIGNE
SEC
SBC #$02
STA CORLIGNE
CMP HMIN
BCS END_M1
LDA HMIN
STA CORLIGNE
END_M1 JMP END_JOY1
MOVE_0 CMP #$02
BNE MOVE_P1
JMP END_JOY1
MOVE_P1 CMP #$03
BNE MOVE_P2
LDA CORLIGNE
CLC
ADC #$02
STA CORLIGNE
CMP HMAX
BEQ END_P1
BCC END_P1
LDA HMAX
STA CORLIGNE
END_P1 JMP END_JOY1
MOVE_P2 LDA CORLIGNE
CLC
ADC #$04
STA CORLIGNE
CMP HMAX
BEQ END_P2
BCC END_P2
LDA HMAX
STA CORLIGNE
END_P2 NOP
END_JOY1 PLA ;RECUPERE FIRST54 OU FIRST55
TAX
PLA
STA BUF_HI
PLA
STA BUF_LO
CPX #$FE
BEQ FIRST_TIME
LDA BUF_LO
STA BUF_FN
LDA BUF_HI
STA BUF_FN+1
JSR MEGAFFICHE ; X CONTIENT #$FF D'OU RESTITUTION.
FIRST_TIME JSR SCROLLING
LDA BUF_LO
STA BUF_FN
LDA BUF_HI
STA BUF_FN+1
INC DIR
LDA DIR
CMP DIR_MAX
BNE CONT_DIR
LDA #$00
STA DIR
CONT_DIR ASL
TAX
LDA DIR_TBL,X
STA BUF_SH
LDA DIR_TBL+1,X
STA BUF_SH+1
LDA CORLIGNE
LDY CORCOL
LDX CORPIXEL
JSR MEGAFFICHE ; AFFICHAGE
JMP START2
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/MEGAFFICHE.S:
;* MEGA ROUTINE D'AFFICHAGE...
;* EN ENTREE : A LIGNE
;* Y COLONNE
;* X PIXEL
;* $00,$01 : SHAPE A AFFICHER
;* $0E,$0F : EMPLACEMENT POUR SAUVER
; LE DECOR
; SI PIXEL=#$FF , ALORS RESTITUTION
; DU DECOR
ORG $1E00
LST OFF
ADR_HGR_BAS = $800
ADR_HGR_HAUT = $8C0
ADR_BAS = $26
ADR_HAUT = $27
PAGE = $E6
SH_BAS = $00
SH_HAUT = $01
COLONNE = $02
BUF_COLONNE = $08
NB_COLONNE = $03
BUF_NB_COL = $09
BUF_ADR = $0A
LIGNE = $04
NB_LIGNE = $05
FN_BAS = $06
FN_HAUT = $07
DEP_FN = $0B
DEP_SH = $0C
PIXEL = $0D
DEC_BAS = $0E
DEC_HAUT = $0F
; MEGA ROUTINE D'AFFICHAGE
; AVEC FOND ???
; 13 AVRIL 1988
STA LIGNE
STX PIXEL
STY COLONNE
CPX #$FF
BNE START3
JMP START2
START3 LDY #$00
STA (DEC_BAS),Y ; LIGNE
INY
LDA COLONNE
STA (DEC_BAS),Y
LDY #$01
LDA (SH_BAS),Y
DEY
SEC
SBC (SH_BAS),Y
STA NB_LIGNE
LDY #$02
STA (DEC_BAS),Y ; NB DE LIGNE
LDY #$03
LDA (SH_BAS),Y
STA NB_COLONNE
CLC
ADC #$01
STA (DEC_BAS),Y ; NB DE COLONNE
LDA SH_HAUT
STA FN_HAUT
LDA DEC_BAS
CLC
ADC #$04
STA DEC_BAS
BCC MORE_DEC
INC DEC_HAUT
MORE_DEC LDX NB_COLONNE ; CALCUL COORDONNEES FOND.
LDA #$00
MORE_COL CLC
ADC NB_LIGNE
DEX
BNE MORE_COL
CLC
ADC SH_BAS
STA FN_BAS
BCC :<
INC FN_HAUT
:< LDA SH_BAS
CLC
ADC #$04
STA SH_BAS
BCC MORE_SH
INC SH_HAUT
MORE_SH LDA FN_BAS
CLC
ADC #$08
STA FN_BAS
BCC MORE_FN
INC FN_HAUT
MORE_FN LDX LIGNE
LDA ADR_HGR_BAS,X
STA ADR_BAS
LDA ADR_HGR_HAUT,X
ORA PAGE
STA ADR_HAUT
LDA PIXEL
CLC
ADC #$0A ; TABLE A PARTIR DE #$0A
STA ADR_T1+2
STA ADR_T2+2
STA ADR_T3+2
STA ADR_T4+2
LDA COLONNE
STA BUF_COLONNE
LDA NB_COLONNE
STA BUF_NB_COL
LDX #$00
STX DEP_FN
STX DEP_SH
MORE_1 LDY BUF_COLONNE
LDA (ADR_BAS),Y ; SAUVEGARDE DECOR.
STA (DEC_BAS,X)
LDA (FN_BAS,X)
AND #$7F
TAX
ADR_T1 LDA $FF00,X
ORA DEP_FN
EOR #$7F
AND (ADR_BAS),Y
STA BUF_ADR
ADR_T2 LDA $FF80,X
STA DEP_FN
LDX #$00
LDA (SH_BAS,X)
AND #$7F
TAX
ADR_T3 LDA $FF00,X
ORA DEP_SH
ORA BUF_ADR
STA (ADR_BAS),Y
ADR_T4 LDA $FF80,X
STA DEP_SH
INC DEC_BAS
BNE NON_DEC
INC DEC_HAUT
NON_DEC INC SH_BAS
BNE NON_SH
INC SH_HAUT
NON_SH INC FN_BAS
BNE NON_FN
INC FN_HAUT
NON_FN INC BUF_COLONNE
LDX #$00
DEC BUF_NB_COL
BNE MORE_1
LDY BUF_COLONNE
LDA ($26),Y
STA (DEC_BAS,X)
LDA DEP_FN
EOR #$7F
AND ($26),Y
ORA DEP_SH
ORA #$80
STA ($26),Y
;FIN AFFICHAGE
INC DEC_BAS
BNE NON_DEC1
INC DEC_HAUT
NON_DEC1 INC LIGNE
DEC NB_LIGNE
BEQ PAGE_CH
JMP MORE_FN
PAGE_CH RTS
;AFFICHAGE DECOR.
START2 LDY #$00
LDA (DEC_BAS),Y
STA LIGNE
INY
LDA (DEC_BAS),Y
STA COLONNE
INY
LDA (DEC_BAS),Y
STA NB_LIGNE
INY
LDA (DEC_BAS),Y
STA NB_COLONNE
LDA DEC_BAS
CLC
ADC #$04
STA DEC_BAS
BCC BCL3
INC DEC_HAUT
BCL3 LDX LIGNE
LDA ADR_HGR_BAS,X
STA $26
LDA ADR_HGR_HAUT,X
ORA PAGE
STA $27
LDA NB_COLONNE
STA BUF_NB_COL
LDX #$00
LDY COLONNE
BCL1 LDA (DEC_BAS,X)
STA ($26),Y
INC DEC_BAS
BNE BCL2
INC DEC_HAUT
BCL2 INY
DEC BUF_NB_COL
BNE BCL1
INC LIGNE
DEC NB_LIGNE
BNE BCL3
RTS
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/MINIFFICHE.S:
;* MINI ROUTINE D'AFFICHAGE...
;* EN ENTREE : A LIGNE
;* Y COLONNE
;* X PIXEL
;* $00,$01 : SHAPE A AFFICHER
; SI EFFACE CONTIENT #$FF : AFFICHE
; . .. . . . . . . #$00 : EFFACE
ORG $1E00
LST OFF
ADR_HGR_BAS = $800
ADR_HGR_HAUT = $8C0
ADR_BAS = $26
ADR_HAUT = $27
PAGE = $E6
SH_BAS = $00
SH_HAUT = $01
EFFACE = $02 ; FF : AFFICHE NORMALEMENT
; 00 : METS DU NOIR.
; MINI ROUTINE D'AFFICHAGE
STA LIGNE
STX PIXEL
STY COLONNE
JMP CONT
LIGNE DS 1
NB_LIGNE DS 1
PIXEL DS 1
COLONNE DS 1
BUF_COLONNE DS 1
NB_COLONNE DS 1
DEP_SH DS 1
BUF_NB_COL DS 1
FOND DS 1
CONT LDY #$01
LDA (SH_BAS),Y
DEY
SEC
SBC (SH_BAS),Y
STA NB_LIGNE
LDY #$03
LDA (SH_BAS),Y
STA NB_COLONNE
LDA SH_BAS
CLC
ADC #$04
STA SH_BAS
BCC MORE_FN
INC SH_HAUT
MORE_FN LDX LIGNE
LDA ADR_HGR_BAS,X
STA ADR_BAS
LDA ADR_HGR_HAUT,X
ORA PAGE
STA ADR_HAUT
LDA PIXEL
CLC
ADC #$0A ; TABLE A PARTIR DE #$0A
STA ADR_T3+2
STA ADR_T4+2
LDA COLONNE
STA BUF_COLONNE
LDA NB_COLONNE
STA BUF_NB_COL
LDX #$00
STX DEP_SH
MORE_1 LDY BUF_COLONNE
LDX #$00
LDA (SH_BAS,X)
PHA
AND #$80
STA FOND
PLA
AND #$7F
TAX
ADR_T3 LDA $FF00,X
ORA DEP_SH
ORA (ADR_BAS),Y
PHA
TAY
ROR
ASL
AND EFFACE
AND #$7F
ORA FOND
STA (ADR_BAS),Y
ADR_T4 LDA $FF80,X
STA DEP_SH
INC SH_BAS
BNE NON_FN
INC SH_HAUT
NON_FN INC BUF_COLONNE
LDX #$00
DEC BUF_NB_COL
BNE MORE_1
LDY BUF_COLONNE
LDA ($26),Y
PHA
AND #$80
STA FOND
PLA
ORA DEP_SH
AND #$7F
AND EFFACE
ORA FOND
STA ($26),Y
;FIN AFFICHAGE
NON_DEC1 INC LIGNE
DEC NB_LIGNE
BEQ PAGE_CH
JMP MORE_FN
PAGE_CH RTS
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/ROUT1_BAS.bas:
10 HGR
20 HGR2
30 PRINT : PRINT "BLOAD TABLE"
40 PRINT : PRINT "BLOAD MEGAFFICHE"
50 PRINT : PRINT "BLOAD SHAPE.HELI1,A$6100"
60 PRINT : PRINT "BLOAD SHAPE.HELI2,A$6200"
70 PRINT : PRINT "BLOADROUT_ANIM"
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/ROUT_ANIM.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A9 00 85 00 A9 61 85 01 A9 00 A2 00 A0 00 20 00 )...)a.. ).". . .
$000010 60 A5 E6 49 60 85 E6 A9 00 85 00 A9 62 85 01 A9 `%fI`.f) ...)b..)
$000020 00 A2 00 A0 00 20 00 60 8D 54 C0 8D 30 C0 A0 20 .". . .` .T@.0@
$000030 88 D0 FD A2 30 8D 30 C0 CA D0 FA A9 80 20 A8 FC .P}"0.0@ JPz). (|
$000040 8D 55 C0 A0 30 88 D0 FD A2 20 8D 30 C0 CA D0 FA .U@ 0.P} " .0@JPz
$000050 A9 80 20 A8 FC 4C 28 63 00 00 00 00 00 00 00 00 ). (|L(c ........
$000060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000070 00 A9 00 85 0E 20 11 F4 A0 00 A9 80 91 26 C8 C0 .)... .t .)..&H@
$000080 10 D0 F9 E6 0E A5 0E C9 20 D0 EA 60 00 00 00 00 .Pyf.%.I Pj`....
$000090 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000A0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000B0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000C0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000D0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000E0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0000F0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/SCROL.EX.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A9 20 85 E6 8D 55 C0 20 00 70 8D 54 C0 A9 40 85 ) .f.U@ .p.T@)@.
$000010 E6 20 00 70 4C 00 03 00 00 00 00 00 00 00 00 00 f .pL... ........
$000020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/SCROLLING.S:
ORG $7000
LST OFF
ADR_HGR_BAS = $800
ADR_HGR_HAUT = $8C0
ADR_BAS = $26
ADR_HAUT = $27
PAGE = $E6
SH_BAS = $00
SH_HAUT = $01
COLONNE = $02
BUF_COLONNE = $08
NB_COLONNE = $03
BUF_NB_COL = $09
BUF_ADR = $0A
LIGNE = $04
NB_LIGNE = $05
FN_BAS = $06
FN_HAUT = $07
DEP_FN = $0B
DEP_SH = $0C
PIXEL = $0D
COULEUR = $0E
; SCROLLING
; 13 AVRIL 1988
JMP SCROLL_ALL
JMP INIT_SCROLL
JMP ANIM1
INIT_SCROLL LDA #$05
STA PIC1+1
LDA #$03
STA PIC2+1
LDA #$00
STA LAR+1
JSR SCROLL_ALL
LDA #$03
STA PIC1+1
LDA #$06
STA PIC2+1
LDA #$FF
STA LAR+1
LDA #$FF
STA FIRST_A1
RTS
SCROLL_ALL LDA #$72
STA LIGNE
LDA #$11
STA NB_LIGNE
PIC1 LDA #$03
STA PIXEL
LDA #$01
STA COULEUR
LDA #$00
STA LARGE
JSR MORE_FN
SCROLL_PRES LDA #$9E
STA LIGNE
LDA #$13
STA NB_LIGNE
PIC2 LDA #$01
STA PIXEL
LDA #$00
STA COULEUR
LAR LDA #$FF
STA LARGE
JSR MORE_FN
RTS
MORE_FN LDX LIGNE
LDA ADR_HGR_BAS,X
STA ADR_BAS
LDA ADR_HGR_HAUT,X
ORA PAGE
STA ADR_HAUT
LDA PIXEL
CLC
ADC #$0A ; TABLE A PARTIR DE #$0A
STA ADR_T1+2
STA ADR_T2+2
LDA #$27
STA BUF_COLONNE
LDA #$28
STA BUF_NB_COL
LDA LARGE
BEQ CONT_LARGE
LDY #$00
LDA (ADR_BAS),Y
PHA
CONT_MOVE INY
LDA (ADR_BAS),Y
DEY
STA (ADR_BAS),Y
INY
CPY #$27
BNE CONT_MOVE
PLA
STA (ADR_BAS),Y
CONT_LARGE LDX #$00
STX DEP_FN
MORE_1 LDY BUF_COLONNE
LDA (ADR_BAS),Y
AND #$7F
TAX
ADR_T1 LDA $FF80,X
ORA DEP_FN
STA BUF_ADR
ADR_T2 LDA $FF00,X
STA DEP_FN
LDA BUF_ADR
LDX COULEUR
BEQ COUL2
ORA #$80
BNE CONT2
COUL2 AND #$7F
CONT2 STA (ADR_BAS),Y
DEC BUF_COLONNE
LDX #$00
DEC BUF_NB_COL
BNE MORE_1
LDY #$27
LDA DEP_FN
ORA ($26),Y
LDX COULEUR
BEQ COUL1
ORA #$80
BNE CONT1
COUL1 AND #$7F
CONT1 STA ($26),Y
;FIN AFFICHAGE
INC LIGNE
DEC NB_LIGNE
BEQ PAGE_CH
JMP MORE_FN
PAGE_CH RTS
LARGE DS 1
FIRST_A1 DS 1
ANIM1 LDA PAGE
CMP #$40
BEQ INIT55
LDA #$00
STA IN1+1
STA AFFI+1
STA CONTA1_TER+1
STA BCL_A1+1
STA IN2+1
STA IN3+1
BEQ CONT_INIT
INIT55 LDA #$01
STA IN1+1
STA AFFI+1
STA CONTA1_TER+1
LDA #$20
STA BCL_A1+1
STA IN2+1
STA IN3+1
CONT_INIT LDA FIRST_A1
CMP #$FF
BEQ CONT_A1
CMP #$FE
BEQ CONT_A1
IN1 LDX $200
LDA ADR_HGR_BAS,X
STA $26
LDA ADR_HGR_HAUT,X
ORA PAGE
STA $27
LDY #$0E
BCL_A1 LDA $200,Y
STA ($26),Y
INY
CPY #$1A
BNE BCL_A1
CONT_A1 CMP #$FF
BNE CONTA1_BIS
LDA #$03
JSR AFFI
LDA #$FE
STA FIRST_A1
RTS
CONTA1_BIS CMP #$FE
BNE CONTA1_TER
LDA #$04
JSR AFFI
LDA #$00
STA FIRST_A1
RTS
CONTA1_TER LDA $200
CLC
ADC #$01
CMP #$0F
BCC AFFI
STA $00
LDA #$0F
SEC
SBC $00
ADC #$03
AFFI STA $200
TAX
LDA ADR_HGR_BAS,X
STA $26
LDA ADR_HGR_HAUT,X
ORA PAGE
STA $27
LDY #$0E
BCL_AFFI LDA ($26),Y
IN2 STA $200,Y
AND #%11010101
STA ($26),Y
INY
CPY #$1A
BEQ END_AFFI
LDA ($26),Y
IN3 STA $200,Y
AND #%10101010
STA ($26),Y
INY
CPY #$1A
BNE BCL_AFFI
END_AFFI RTS
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/SET.BRODY.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 02 42 52 4F 44 59 20 20 20 20 20 20 20 20 20 20 .BRODY
$000010 5E 21 01 0B 0A 00 98 02 90 F7 B2 66 14 66 28 66 ^!...... .w2f.f(f
$000020 80 01 94 01 94 01 94 01 94 01 94 01 94 01 94 01 ........ ........
$000030 94 01 94 01 94 01 94 01 94 01 94 01 94 01 94 01 ........ ........
$000040 94 01 94 01 94 01 94 01 94 01 94 01 94 01 94 01 ........ ........
$000050 94 01 94 01 94 01 94 01 94 01 94 01 94 01 94 01 ........ ........
$000060 94 01 94 01 9E 01 A8 01 B2 01 BC 01 C6 01 D0 01 ......(. 2.<.F.P.
$000070 DA 01 E4 01 EE 01 F8 01 02 02 0C 02 16 02 20 02 Z.d.n.x. ...... .
$000080 2A 02 34 02 3E 02 48 02 52 02 5C 02 66 02 70 02 *.4.>.H. R.\.f.p.
$000090 7A 02 84 02 8E 02 98 02 98 02 98 02 98 02 98 02 z....... ........
$0000A0 98 02 98 02 98 02 98 02 98 02 98 02 98 02 98 02 ........ ........
$0000B0 98 02 98 02 98 02 98 02 98 02 98 02 98 02 98 02 ........ ........
$0000C0 98 02 98 02 98 02 98 02 98 02 98 02 98 02 98 02 ........ ........
$0000D0 98 02 98 02 98 02 98 02 98 02 98 02 98 02 98 02 ........ ........
$0000E0 4E 05 0B 00 00 00 00 00 00 00 00 00 00 00 00 00 N....... ........
$0000F0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000100 00 00 00 05 05 05 05 05 05 05 05 02 05 05 05 08 ........ ........
$000110 05 05 05 05 05 05 04 05 05 08 05 05 05 00 00 00 ........ ........
$000120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000130 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000140 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000150 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000170 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$000190 00 00 00 00 00 0E 1B 1B 1F 1B 1B 1B 00 00 00 0F ........ ........
$0001A0 1B 1B 0F 1B 1B 0F 00 00 00 1E 03 03 03 03 03 1E ........ ........
$0001B0 00 00 00 0F 1B 1B 1B 1B 1B 0F 00 00 00 1F 03 03 ........ ........
$0001C0 0F 03 03 1F 00 00 00 1F 03 03 0F 03 03 03 00 00 ........ ........
$0001D0 00 1E 03 03 1B 1B 1B 1E 00 00 00 1B 1B 1B 1F 1B ........ ........
$0001E0 1B 1B 00 00 00 03 03 03 03 03 03 03 00 00 00 18 ........ ........
$0001F0 18 18 18 1B 1B 0E 00 00 00 1B 1B 1B 0F 1B 1B 1B ........ ........
$000200 00 00 00 03 03 03 03 03 03 1F 00 00 00 EF DB DB ........ .....o[[
$000210 DB DB DB DB 00 00 00 0F 1B 1B 1B 1B 1B 1B 00 00 [[[[.... ........
$000220 00 0E 1B 1B 1B 1B 1B 0E 00 00 00 0F 1B 1B 0F 03 ........ ........
$000230 03 03 00 00 00 0E 1B 1B 1B 1B 1F 1E 00 00 00 0F ........ ........
$000240 1B 1B 0F 1B 1B 1B 00 00 00 1E 03 03 0E 18 18 0F ........ ........
$000250 00 00 00 0F 06 06 06 06 06 06 00 00 00 1B 1B 1B ........ ........
$000260 1B 1B 1B 1F 00 00 00 1B 1B 1B 1B 1B 1B 0E 00 00 ........ ........
$000270 00 C3 C3 C3 C3 DB DB 76 00 00 00 1B 1B 1B 0E 1B .CCCC[[v ........
$000280 1B 1B 00 00 00 1B 1B 1B 0E 0C 0C 0C 00 00 00 1F ........ ........
$000290 18 1C 0E 07 03 1F 00 00 .. .. .. .. .. .. .. .. ........
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/TIR_BAS.W.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 96 9B 00 02 80 80 8C 80 B0 80 C0 81 80 80 .. .. ........ 0.@...
** END **
Text found in b03d05a_demo_jeu_chopperman_by_sss.dsk/TIR_HORI.W.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 8F 92 00 02 80 80 FC 80 80 80 .. .. .. .. .. .. ......|. ..
** END **
- Addeddate
- 2014-06-24 02:25:37
- Emulator
- apple2e
- Emulator_ext
- dsk
- Identifier
- a2_asimov_b03d05a_demo_jeu_chopperman_by_sss
- Scanner
- Internet Archive Python library 0.6.5
comment
Reviews
412 Views
DOWNLOAD OPTIONS
IN COLLECTIONS
The Apple II Library: Games The Software Library: Apple Computer Software Library The Emulation StationUploaded by Jason Scott on