mirror of
https://github.com/antoinevignau/source.git
synced 2024-12-30 18:31:21 +00:00
1407 lines
18 KiB
NASM
1407 lines
18 KiB
NASM
*
|
|
* Bill Palmer
|
|
*
|
|
|
|
lessalles
|
|
da s00,s01,s02,s03,s04,s05,s06,s07,s08,s09
|
|
da s10,s11,s12,s13,s14,s15,s16,s17,s18,s19
|
|
da s20,s21,s22,s23,s24,s25,s26,s27,s28,s29
|
|
da s30,s31,s32,s33,s34,s35,s36,s37,s38,s39
|
|
da s40,s41,s42,s43,s44,s45,s46,s47,s48,s49
|
|
da s50,s51,s52,s53,s54,s55,s56
|
|
|
|
*---
|
|
|
|
s00
|
|
rts
|
|
|
|
*---
|
|
|
|
s01
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0199
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s012
|
|
|
|
ldx #laitue
|
|
lda #s1_str1
|
|
jmp apparition_objet
|
|
|
|
s012 cmp #2
|
|
bne s013
|
|
|
|
ldx #journal
|
|
lda #s1_str2
|
|
jmp apparition_objet
|
|
|
|
s013 cmp #4
|
|
bne s0199
|
|
|
|
lda #2
|
|
sta salle
|
|
|
|
s0199 rts
|
|
|
|
s1_str1 str 'Bill r'8e'cup'8f're une laitue pas tr'8f's fra'94'che'
|
|
s1_str2 str 'Tiens, le journal du jour est arriv'8e
|
|
|
|
*---
|
|
|
|
s02
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0299
|
|
lda zone_cliquee
|
|
cmp #3
|
|
bne s022
|
|
|
|
ldx #livre
|
|
lda #s2_str3
|
|
jmp apparition_objet
|
|
|
|
s022 cmp #2
|
|
bne s0299
|
|
|
|
ldx #carte_de_credit
|
|
lda #s2_str2
|
|
jmp apparition_objet
|
|
|
|
s0299 rts
|
|
|
|
s2_str3 str 'Bill remarque un ancien manuel'
|
|
s2_str2 str 'Saperlipopette ! La carte de cr'8e'dit que Bill pensait avoir perdue '88' tout jamais'
|
|
|
|
*---
|
|
|
|
s03
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0399
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s032
|
|
|
|
ldx #machette
|
|
lda #strVIDE
|
|
jsr apparition_objet
|
|
ldx #souris_mecanique
|
|
lda #strVIDE
|
|
jsr apparition_objet
|
|
ldx #carte_didentite
|
|
lda #strVIDE
|
|
jsr apparition_objet
|
|
ldx #boite_de_conserve
|
|
lda #strVIDE
|
|
jsr apparition_objet
|
|
ldx #ouvre_boite
|
|
lda #strVIDE
|
|
jmp apparition_objet
|
|
|
|
s032 cmp #2
|
|
bne s0399
|
|
|
|
ldx #passeport
|
|
lda #s3_str2
|
|
jmp apparition_objet
|
|
|
|
s0399 rts
|
|
|
|
s3_str2 str 'Fichtre ! Le passeport que Bill dans son inorganisation toute h'8e'ro'95'que avait '8e'gar'8e' apr'8f's un s'8e'jour en Afrique du sud...'
|
|
|
|
*---
|
|
|
|
s04
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0499
|
|
lda zone_cliquee
|
|
cmp #3
|
|
bne s0499
|
|
|
|
lda #5
|
|
sta salle
|
|
s0499 rts
|
|
|
|
*---
|
|
|
|
s05
|
|
lda instruction1
|
|
cmp #oeil
|
|
bne s0599
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s0599
|
|
|
|
ldx #bombe
|
|
lda #s5_str1
|
|
jmp apparition_objet
|
|
|
|
s0599 rts
|
|
|
|
s5_str1 str 'Explorant d'8e'licatement les recoins du moteur du v'8e'hicule, Bill remarque un curieux engin visiblement plac'8e' l'88' '88' des fins hostiles'
|
|
|
|
*---
|
|
|
|
s06
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0699
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s063
|
|
|
|
ldx #bombe
|
|
lda objet-1,x
|
|
and #$ff
|
|
cmp #objet_inexistant
|
|
bne s062
|
|
|
|
lda #s6_str1
|
|
jmp fin
|
|
|
|
s062 lda #s6_str2
|
|
jsr ecriture
|
|
lda #7
|
|
sta salle
|
|
rts
|
|
|
|
s063 cmp #3
|
|
bne s0699
|
|
|
|
ldx #briquet
|
|
lda #s6_str3
|
|
jmp apparition_objet
|
|
|
|
s0699 rts
|
|
|
|
s6_str1 str 'Baaaaooooouuuuummmmm ! ! ! ! ! ! Sans que Bill ait eu le temps de r'8e'agir, la voiture explose en mille morceaux. Echouer si pr'8f's du but...'
|
|
s6_str2 str 'La voiture d'8e'marre...'
|
|
s6_str3 str 'Un briquet tra'94'nait par l'88'...'
|
|
*---
|
|
|
|
s07
|
|
s0799 rts
|
|
|
|
*---
|
|
|
|
s08
|
|
s0899 rts
|
|
|
|
*---
|
|
|
|
s09
|
|
lda instruction1
|
|
cmp #main
|
|
bne s0999
|
|
lda instruction2
|
|
cmp #carte_de_credit
|
|
bne s0901
|
|
|
|
ldx #billet_davion
|
|
lda #s9_str1
|
|
jmp apparition_objet
|
|
|
|
s0901 cmp #billet_davion
|
|
bne s0999
|
|
|
|
lda #10
|
|
sta salle
|
|
|
|
s0999 rts
|
|
|
|
s9_str1 str 'L'27'h'99'tesse donne '88' Bill son billet pour le N'27'Gwanal'8e'l'8e
|
|
|
|
*---
|
|
|
|
s10
|
|
lda instruction1
|
|
cmp #droite
|
|
bne s1001
|
|
|
|
lda #s10_str1
|
|
jmp ecriture
|
|
|
|
s1001 cmp #main
|
|
bne s1099
|
|
lda instruction2
|
|
cmp #passeport
|
|
bne s1099
|
|
|
|
lda #11
|
|
sta salle
|
|
lda #s10_str2
|
|
jmp ecriture
|
|
|
|
s1099 rts
|
|
|
|
s10_str1 str 'On ne passe pas !'
|
|
s10_str2 str 'C'27'est en r'8f'gle, vous pouvez passer !'
|
|
|
|
*---
|
|
|
|
s11
|
|
s1199 rts
|
|
|
|
*---
|
|
|
|
s12
|
|
s1299 rts
|
|
|
|
*---
|
|
|
|
s13
|
|
lda instruction1
|
|
cmp #main
|
|
bne s1399
|
|
lda zone_cliquee
|
|
cmp #3
|
|
bne s1399
|
|
|
|
lda #s13_str3
|
|
jmp fin
|
|
|
|
s1399 rts
|
|
|
|
s13_str3 str 'Les pierres peuvent cacher beaucoup d'27'animaux. Et les serpents sont souvent tr'8f's dangereux...'
|
|
|
|
*---
|
|
|
|
s14
|
|
s1499 rts
|
|
|
|
*---
|
|
|
|
s15
|
|
lda instruction1
|
|
cmp #main
|
|
bne s1599
|
|
lda instruction2
|
|
cmp #carte_de_credit
|
|
bne s1501
|
|
|
|
lda #s15_str1
|
|
jmp ecriture
|
|
|
|
s1501 cmp #livre
|
|
bne s1502
|
|
|
|
ldx #livre
|
|
lda #s15_str2
|
|
jsr disparition_objet
|
|
sep #$20
|
|
ldx #livre_donne
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s1502 lda instruction2
|
|
cmp #laitue
|
|
bne s1599
|
|
|
|
ldx #livre_donne
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s1503 ; FALSE
|
|
|
|
lda #17
|
|
sta salle
|
|
|
|
ldx #laitue
|
|
lda #s15_str3
|
|
jmp disparition_objet
|
|
|
|
s1503
|
|
lda #s15_str4
|
|
jmp ecriture
|
|
|
|
s1599 rts
|
|
|
|
s15_str1 str 'Qu'27'ice que c'27'est qu'278d'a ? T'27'y payes pas comme '8d'a...'
|
|
s15_str2 str 'T'27'y es un vrai z'27'aventurier alors ! ! J'27'y t'27'y garde le livre et t'27'y pars avec le dromadaire !'
|
|
s15_str3 str 'Le dromadaire avale la laitue et se baisse pour que Bill parte sur son dos'
|
|
s15_str4 str 'L'27'homme refuse que Bill nourrisse les dromadaires'
|
|
|
|
*---
|
|
|
|
s16
|
|
sep #$20
|
|
ldx #bill_desert
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s1601
|
|
inc indicateur-1,x
|
|
s1601 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #4
|
|
bne s1699
|
|
|
|
lda #s16_str1
|
|
jmp fin
|
|
s1699 rts
|
|
|
|
s16_str1 str 'Sans moyen de transport s'9e'r et rapide, Bill meurt bient'99't '8e'puis'8e
|
|
|
|
*--- Was protection check
|
|
|
|
s17
|
|
s1799 rts
|
|
|
|
*---
|
|
|
|
s18
|
|
s1899 rts
|
|
|
|
*---
|
|
|
|
s19
|
|
lda instruction1
|
|
cmp #main
|
|
bne s1999
|
|
lda instruction2
|
|
cmp #carte_de_credit
|
|
bne s1902
|
|
|
|
lda #s19_str1
|
|
jmp ecriture
|
|
|
|
s1902 cmp #machette
|
|
bne s1999
|
|
|
|
lda #s19_str2
|
|
jmp ecriture
|
|
|
|
s1999 rts
|
|
|
|
s19_str1 str 'Les cartes de cr'8e'dit ne sont pas accept'8e'es. Bill va devoir prendre le train sans billet'
|
|
s19_str2 str 'On ne joue pas les fiers-'88'-bras dans ma gare. L'27'homme se rendort...'
|
|
|
|
*---
|
|
|
|
s20
|
|
lda instruction1
|
|
cmp #main
|
|
bne s2099
|
|
lda zone_cliquee
|
|
cmp #4
|
|
bne s2001
|
|
|
|
lda #s20_str4
|
|
jsr ecriture
|
|
|
|
sep #$20
|
|
ldx #train_arrete
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s2001 lda zone_cliquee
|
|
cmp #5
|
|
bne s2003
|
|
|
|
ldx #train_arrete
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s2002
|
|
|
|
lda #22
|
|
sta salle
|
|
bra s2003
|
|
|
|
s2002 lda #23
|
|
sta salle
|
|
|
|
s2003 sep #$20
|
|
ldx #controleur_passe
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s2004
|
|
inc indicateur-1,x
|
|
s2004 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #8
|
|
bcc s2099
|
|
|
|
lda #s20_str3
|
|
jmp fin
|
|
|
|
s2099 rts
|
|
|
|
s20_str4 str 'Le train est arr'90't'8e
|
|
s20_str3 str 'Le contr'99'leur vient et arr'90'te Bill qui n'27'a pas de billet'
|
|
|
|
*---
|
|
|
|
s21
|
|
s2199 rts
|
|
|
|
*---
|
|
|
|
s22
|
|
s2299 rts
|
|
|
|
*---
|
|
|
|
s23
|
|
lda instruction1
|
|
cmp #main
|
|
bne s2399
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s2399
|
|
|
|
lda #s23_str1
|
|
jmp fin
|
|
|
|
s2399 rts
|
|
|
|
s23_str1 str 'La pierre cachait un scorpion. Et les scorpions d'8e'testent '90'tre d'8e'rang'8e's... Mauvais plan'
|
|
|
|
*---
|
|
|
|
s24
|
|
s2499 rts
|
|
|
|
*---
|
|
|
|
s25
|
|
sep #$20
|
|
ldx #elephant_arrive
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s2500
|
|
inc indicateur-1,x
|
|
s2500 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #6
|
|
bcc s2501
|
|
|
|
lda #s25_str1
|
|
jmp fin
|
|
|
|
s2501 lda instruction1
|
|
cmp #main
|
|
bne s2599
|
|
lda instruction2
|
|
cmp #souris_mecanique
|
|
bne s2599
|
|
|
|
lda #s25_str2
|
|
jsr ecriture
|
|
|
|
sep #$20
|
|
ldx #elephant_enfuis
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
lda #26
|
|
sta salle
|
|
|
|
s2599 rts
|
|
|
|
s25_str1 str 'Bill est lamin'8e', '8e'crabouill'8e' et atomis'8e' par le mammif'8f're en d'8e'lire'
|
|
s25_str2 str 'Effray'8e' par l'27'engin, l'27'animal prend ses jambes '88' son cou et s'27'enfuit'
|
|
|
|
*---
|
|
|
|
s26
|
|
lda instruction1
|
|
cmp #main
|
|
bne s2699
|
|
lda instruction2
|
|
cmp #machette
|
|
bne s2699
|
|
|
|
ldx #brindilles
|
|
lda #s26_str1
|
|
jmp apparition_objet
|
|
|
|
s2699 rts
|
|
|
|
s26_str1 str 'Bill arrive '88' couper quelques brindilles'
|
|
|
|
*---
|
|
|
|
s27
|
|
lda instruction1
|
|
cmp #main
|
|
bne s2799
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s2701
|
|
|
|
lda #30
|
|
sta salle
|
|
|
|
s2701 cmp #3
|
|
bne s2799
|
|
|
|
ldx #photo
|
|
lda #s27_str3
|
|
jmp apparition_objet
|
|
|
|
s2799 rts
|
|
|
|
s27_str3 str 'En le fouillant, Bill d'8e'couvre une photographie'
|
|
|
|
*---
|
|
|
|
s28
|
|
lda instruction1
|
|
cmp #main
|
|
bne s2899
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s2899
|
|
|
|
lda #s28_str1
|
|
jsr ecriture
|
|
|
|
lda #29
|
|
sta salle
|
|
|
|
s2899 rts
|
|
|
|
s28_str1 str 'Bill commence '88' grimper la colline'
|
|
|
|
*---
|
|
|
|
s29
|
|
sep #$20
|
|
ldx #mechant
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s2901
|
|
inc indicateur-1,x
|
|
s2901 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #4
|
|
bcc s2999
|
|
|
|
lda #s29_str1
|
|
jmp fin
|
|
s2999 rts
|
|
|
|
s29_str1 str 'L'27'ignoble individu '8e'trangle Bill avec son couteau'
|
|
|
|
*---
|
|
|
|
s30
|
|
lda instruction1
|
|
cmp #main
|
|
bne s3099
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s3099
|
|
|
|
lda #s30_str2
|
|
jmp fin
|
|
|
|
s3099 rts
|
|
|
|
s30_str2 str 'Manque de chance, la touffe d'27'herbe se d'8e'tache de la roche et Bill tombe dans le vide'
|
|
|
|
*---
|
|
|
|
s31
|
|
s3199 rts
|
|
|
|
*---
|
|
|
|
s32
|
|
sep #$20
|
|
ldx #mechant
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s3200
|
|
inc indicateur-1,x
|
|
s3200 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #8
|
|
bcc s3201
|
|
|
|
lda #s32_str8
|
|
jmp fin
|
|
|
|
s3201 lda instruction1
|
|
cmp #main
|
|
bne s3299
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s3299
|
|
|
|
lda #s32_str1
|
|
jsr ecriture
|
|
|
|
sep #$20
|
|
ldx #mechant_assome
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
lda #31
|
|
sta salle
|
|
s3299 rts
|
|
|
|
s32_str8 str 'L'27'homme du Professeur rattrape Bill. C'27'en est fini...'
|
|
s32_str1 str 'Bill renverse la pierre dans le vide. Elle assomme le sc'8e'l'8e'rat qui le suivait'
|
|
|
|
*---
|
|
|
|
s33
|
|
ldx #photo_montree
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
bne s3301
|
|
|
|
sep #$20
|
|
ldx #camera_mort
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s3300
|
|
inc indicateur-1,x
|
|
s3300 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #8
|
|
bcc s3301
|
|
|
|
lda #s33_str1
|
|
jmp fin
|
|
|
|
s3301 lda instruction1
|
|
cmp #main
|
|
bne s3399
|
|
lda instruction2
|
|
cmp #photo
|
|
bne s3399
|
|
|
|
lda #s33_str2
|
|
jsr ecriture
|
|
|
|
sep #$20
|
|
ldx #photo_montree
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s3399 rts
|
|
|
|
s33_str1 str 'Soudain, un rayon pulv'8e'rise Bill (gniark gniark !)'
|
|
s33_str2 str 'Bill montre la photo '88' la cam'8e'ra qui semble r'8e'agir'
|
|
|
|
*---
|
|
|
|
s34
|
|
lda instruction1
|
|
cmp #main
|
|
bne s3499
|
|
lda instruction2
|
|
cmp #briquet
|
|
bne s3402
|
|
|
|
ldx #brindilles
|
|
lda objet-1,x
|
|
and #$ff
|
|
* cmp #34 ; LOGO - original code
|
|
cmp #objet_pris
|
|
bne s3401
|
|
|
|
ldx #brindilles
|
|
lda #s34_str2
|
|
jsr disparition_objet
|
|
|
|
sep #$20
|
|
ldx #feu_allume
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
lda #35
|
|
sta salle
|
|
rts
|
|
|
|
s3401 lda #s34_str2
|
|
jmp ecriture
|
|
|
|
s3402 cmp #brindilles
|
|
bne s3499
|
|
|
|
lda #s34_str3
|
|
jmp ecriture
|
|
|
|
s3499 rts
|
|
|
|
s34_str1 str 'Bill allume un feu avec les brindilles...'
|
|
s34_str2 str 'Il n'27'y a rien '88' br'9e'ler dans la pi'8f'ce'
|
|
s34_str3 str 'Et pourquoi ne pas les faire br'9e'ler ?'
|
|
*---
|
|
|
|
s35
|
|
s3599 rts
|
|
|
|
*---
|
|
|
|
s36
|
|
lda instruction1
|
|
cmp #main
|
|
bne s3699
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s3699
|
|
|
|
ldx #professeur_parti
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #4
|
|
bcs s3601
|
|
|
|
lda #s36_str1
|
|
jmp fin
|
|
|
|
s3601 lda #38
|
|
sta salle
|
|
lda #s36_str2
|
|
jmp ecriture
|
|
|
|
s3699 rts
|
|
|
|
s36_str1 str 'Avant que Bill ait pu p'8e'n'8e'trer dans le laboratoire du Professeur X., celui-ci saisit une mitraillette et le transforme en passoire'
|
|
s36_str2 str 'Ouf... La porte s'27'ouvre !'
|
|
|
|
*---
|
|
|
|
s37
|
|
s3799 rts
|
|
|
|
*---
|
|
|
|
s38
|
|
lda instruction1
|
|
cmp #main
|
|
bne s3803
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s3801
|
|
|
|
ldx #appeau
|
|
lda #s38_str1
|
|
jmp apparition_objet
|
|
|
|
s3801 cmp #2
|
|
bne s3802
|
|
|
|
ldx #mitraillette
|
|
lda #s38_str2
|
|
jmp apparition_objet
|
|
|
|
s3802 cmp #3
|
|
bne s3803
|
|
|
|
lda #s38_str3
|
|
jmp fin
|
|
|
|
s3803 lda instruction1
|
|
cmp #bouche
|
|
bne s3899
|
|
lda zone_cliquee
|
|
cmp #3
|
|
bne s3899
|
|
|
|
lda #s38_str4
|
|
jmp fin
|
|
|
|
s3899 rts
|
|
|
|
s38_str1 str 'Bill trouve un appeau...'
|
|
s38_str2 str 'Ca alors ! Une mitraillette !'
|
|
s38_str3 str 'Bill aurait d'9e' savoir qu'27'il vaut mieux manipuler des produits toxiques avec des gants...'
|
|
s38_str4 str 'Bon sang ! C'278e'tait du poison ! Bill s'278e'trangle et agonise en quelques minutes'
|
|
|
|
*---
|
|
|
|
s39
|
|
lda instruction1
|
|
cmp #oeil
|
|
bne s3999
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s3999
|
|
|
|
sep #$20
|
|
ldx #professeur_parti
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s3901
|
|
inc indicateur-1,x
|
|
s3901 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #3+1
|
|
bcc s3999
|
|
|
|
lda #s39_str1
|
|
jmp ecriture
|
|
|
|
s3999 rts
|
|
|
|
s39_str1 str 'Le Professeur reste pour inspecter ses hommes !'
|
|
|
|
*---
|
|
|
|
s40
|
|
lda instruction1
|
|
cmp #bouche
|
|
bne s4001
|
|
lda instruction2
|
|
cmp #appeau
|
|
bne s4001
|
|
|
|
lda #41
|
|
sta salle
|
|
lda #s40_str1
|
|
jsr ecriture
|
|
|
|
s4001 lda instruction1
|
|
cmp #oeil
|
|
bne s4099
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s4099
|
|
|
|
ldx #feu_allume
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s4002
|
|
|
|
lda #s40_str2
|
|
jmp ecriture
|
|
|
|
s4002 lda #s40_str3
|
|
jmp ecriture
|
|
|
|
s4099 rts
|
|
|
|
s40_str1 str 'Attir'8e' par l'27'appeau, l'27'oiseau vient se poser...'
|
|
s40_str2 str 'De la fum'8e'e chaude s'27'en '8e'chappe'
|
|
s40_str3 str 'On dirait le conduit d'27'une chemin'8e'e'
|
|
|
|
*---
|
|
|
|
s41
|
|
ldx #feu_allume
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
bne s4101
|
|
|
|
lda #40
|
|
sta salle
|
|
lda #s41_str1
|
|
jmp ecriture
|
|
|
|
s4101 lda #42
|
|
sta salle
|
|
lda #s41_str2
|
|
jmp ecriture
|
|
|
|
s4199 rts
|
|
|
|
s41_str1 str 'L'27'oiseau repart aussit'99't'
|
|
s41_str2 str 'L'27'oiseau bouche le conduit de la chemin'8e'e, aussit'99't les hommes du Professeur sortent asphyxi'8e's...'
|
|
|
|
*---
|
|
|
|
s42
|
|
sep #$20
|
|
ldx #homme_attaque
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s4200
|
|
inc indicateur-1,x
|
|
s4200 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #8
|
|
bcc s4201
|
|
|
|
lda #s42_str1
|
|
jmp fin
|
|
|
|
s4201 lda instruction1
|
|
cmp #main
|
|
bne s4299
|
|
lda instruction2
|
|
cmp #mitraillette
|
|
bne s4202
|
|
|
|
lda #43
|
|
sta salle
|
|
lda #s42_str2
|
|
jsr ecriture
|
|
jsr chargement_image
|
|
lda #s42_str3
|
|
jsr ecriture
|
|
|
|
lda #3
|
|
jsr nowWAIT
|
|
|
|
lda #44
|
|
sta salle
|
|
rts
|
|
|
|
s4202 cmp #machette
|
|
bne s4299
|
|
|
|
lda #s42_str4
|
|
jmp fin
|
|
|
|
s4299 rts
|
|
|
|
s42_str1 str 'Les hommes du Professeur '8e'tripent Bill'
|
|
s42_str2 str 'Bill d'8e'gaine sa mitraillette...'
|
|
s42_str3 str 'Et massacre ses agresseurs...'
|
|
s42_str4 str 'Bill engage le combat '88' la machette mais il succombe sous le nombre'
|
|
|
|
*--- Check protection
|
|
|
|
s43
|
|
s4399 rts
|
|
|
|
*---
|
|
|
|
s44
|
|
s4499 rts
|
|
|
|
*---
|
|
|
|
s45
|
|
lda instruction1
|
|
cmp #main
|
|
bne s4599
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s4599
|
|
|
|
lda #46
|
|
sta salle
|
|
lda #s45_str2
|
|
jsr ecriture
|
|
jsr chargement_image
|
|
lda #s45_str3
|
|
jsr ecriture
|
|
|
|
lda #48
|
|
sta salle
|
|
|
|
lda #3
|
|
jsr nowWAIT
|
|
|
|
ldx #1
|
|
]lp phx
|
|
lda #strVIDE
|
|
jsr disparition_objet
|
|
plx
|
|
inx
|
|
cpx #nombre_objets
|
|
bcc ]lp
|
|
|
|
s4599 rts
|
|
|
|
s45_str2 str 'Bill tire sur le drapeau. Soudain...'
|
|
s45_str3 str 'Une trappe s'27'ouvre sous ses pieds. Bill est captur'8e' par les hommes du Professeur X.'
|
|
|
|
*---
|
|
|
|
s46
|
|
s4699 rts
|
|
|
|
*---
|
|
|
|
s47
|
|
s4799 rts
|
|
|
|
*---
|
|
|
|
s48
|
|
sep #$20
|
|
ldx #canon
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s4600
|
|
inc indicateur-1,x
|
|
s4600 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #6
|
|
bcc s4801
|
|
|
|
lda #s48_str6
|
|
jmp fin
|
|
|
|
s4801 lda instruction1
|
|
cmp #main
|
|
bne s4899
|
|
lda zone_cliquee
|
|
cmp #1
|
|
bne s4899
|
|
|
|
lda #s48_str1
|
|
jsr ecriture
|
|
|
|
lda #49
|
|
sta salle
|
|
|
|
s4899 rts
|
|
|
|
s48_str6 str 'Le canon r'8e'duit Bill en miettes. Le Professeur X. devient ma'94'tre du monde'
|
|
s48_str1 str 'Bill arrive '88' se lib'8e'rer discr'8f'tement et '88' '8e'teindre la m'8f'che'
|
|
|
|
*---
|
|
|
|
s49
|
|
lda instruction1
|
|
cmp #main
|
|
bne s4999
|
|
lda zone_cliquee
|
|
cmp #2
|
|
beq s4901
|
|
cmp #3
|
|
bne s4902
|
|
|
|
s4901 lda #s49_str2
|
|
jmp fin
|
|
|
|
s4902 cmp #1
|
|
bne s4999
|
|
|
|
lda #s49_str1
|
|
jsr ecriture
|
|
lda #50
|
|
sta salle
|
|
|
|
s4999 rts
|
|
|
|
s49_str2 str 'Bill commet une maladresse et se fait mortellement rep'8e'rer par le lieutenant du Professeur...'
|
|
s49_str1 str 'Bill baisse l'27'interrupteur, plongeant la pi'8f'ce enti'8f're dans l'27'obscurit'8e
|
|
|
|
*---
|
|
|
|
s50
|
|
lda instruction1
|
|
cmp #main
|
|
bne s5099
|
|
lda zone_cliquee
|
|
beq s5099
|
|
|
|
lda #s50_str1
|
|
jmp fin
|
|
|
|
s5099 rts
|
|
|
|
s50_str1 str 'Plut'99't que de s'278e'clipser discr'8f'tement, Bill a cru bon de manifester sa pr'8e'sence...'
|
|
|
|
*---
|
|
|
|
s51
|
|
lda instruction1
|
|
cmp #main
|
|
bne s5102
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s5101
|
|
|
|
lda #s51_str2
|
|
jmp fin
|
|
|
|
s5101 cmp #3
|
|
bne s5102
|
|
|
|
sep #$20
|
|
ldx #destruction_base
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s5102 ldx #destruction_base
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s5103
|
|
|
|
sep #$20
|
|
ldx #compte_a_rebours
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s5100
|
|
inc indicateur-1,x
|
|
s5100 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #6
|
|
bcc s5103
|
|
|
|
lda #s51_str2
|
|
jmp fin
|
|
|
|
s5103 lda instruction1
|
|
cmp #main
|
|
bne s5105
|
|
lda zone_cliquee
|
|
cmp #4
|
|
bne s5104
|
|
|
|
lda #s51_str4
|
|
jsr ecriture
|
|
lda #54
|
|
sta salle
|
|
|
|
s5104 cmp #6
|
|
bne s5105
|
|
|
|
ldx #revolver
|
|
lda #s51_str6
|
|
jmp apparition_objet
|
|
|
|
s5105 lda instruction1
|
|
cmp #bouche
|
|
bne s5199
|
|
lda zone_cliquee
|
|
cmp #5
|
|
bne s5199
|
|
|
|
lda #52
|
|
sta salle
|
|
|
|
s5199 rts
|
|
|
|
s51_str2 str 'La base et tout ce qu'27'elle contenait explose. Trop exp'8e'ditif...'
|
|
s51_str4 str 'Bill s'278e'jecte...'
|
|
s51_str6 str 'Voil'88' qui pourra '90'tre utile...'
|
|
|
|
*---
|
|
|
|
s52
|
|
lda instruction1
|
|
cmp #main
|
|
bne s5201
|
|
lda instruction2
|
|
cmp #revolver
|
|
bne s5201
|
|
|
|
lda #53
|
|
sta salle
|
|
|
|
ldx #fetiche
|
|
lda #s52_str1
|
|
jsr apparition_objet
|
|
|
|
s5201 ldx #lieutenant
|
|
sep #$20
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s5200
|
|
inc indicateur-1,x
|
|
s5200 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #4
|
|
bcc s5202
|
|
|
|
lda #s52_str2
|
|
jmp fin
|
|
|
|
s5202 lda instruction1
|
|
cmp #main
|
|
bne s5204
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s5203
|
|
|
|
lda #s52_str3
|
|
jmp fin
|
|
|
|
s5203 cmp #3
|
|
bne s5204
|
|
|
|
sep #$20
|
|
ldx #destruction_base
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s5204 ldx #destruction_base
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s5205
|
|
|
|
sep #$20
|
|
ldx #compte_a_rebours
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s5252
|
|
inc indicateur-1,x
|
|
s5252 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #6
|
|
bcc s5205
|
|
|
|
lda #s52_str3
|
|
jmp fin
|
|
|
|
s5205 lda instruction1
|
|
cmp #main
|
|
bne s5299
|
|
lda zone_cliquee
|
|
cmp #4
|
|
bne s5206
|
|
|
|
lda #s52_str4
|
|
jsr ecriture
|
|
lda #54
|
|
sta salle
|
|
|
|
s5206 cmp #6
|
|
bne s5299
|
|
|
|
ldx #revolver
|
|
lda #s52_str6
|
|
jmp apparition_objet
|
|
|
|
s5299 rts
|
|
|
|
s52_str1 str 'Bill d'8e'gaine rapidement et tient en respect les deux hommes. Le Professeur doit l'89'cher le F'8e'tiche'
|
|
s52_str2 str 'L'27'homme de main du Professeur supprime froidement Bill'
|
|
s52_str3 str 'La base et tout ce qu'27'elle contenait explose. Trop exp'8e'ditif...'
|
|
s52_str4 str 'Bill s'278e'jecte...'
|
|
s52_str6 str 'Voil'88' qui pourra '90'tre utile...'
|
|
|
|
*---
|
|
|
|
s53
|
|
lda instruction1
|
|
cmp #main
|
|
bne s5302
|
|
lda zone_cliquee
|
|
cmp #2
|
|
bne s5301
|
|
|
|
lda #s53_str2
|
|
jmp fin
|
|
|
|
s5301 cmp #3
|
|
bne s5302
|
|
|
|
sep #$20
|
|
ldx #destruction_base
|
|
lda #TRUE
|
|
sta indicateur-1,x
|
|
rep #$20
|
|
|
|
s5302 ldx #destruction_base
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
beq s5303
|
|
|
|
sep #$20
|
|
ldx #compte_a_rebours
|
|
lda indicateur-1,x
|
|
cmp #-1
|
|
beq s5300
|
|
inc indicateur-1,x
|
|
s5300 rep #$20
|
|
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
cmp #6
|
|
bcc s5303
|
|
|
|
lda #s53_str2
|
|
jmp fin
|
|
|
|
s5303 lda instruction1
|
|
cmp #main
|
|
bne s5399
|
|
lda zone_cliquee
|
|
cmp #4
|
|
bne s5399
|
|
|
|
lda #s53_str4
|
|
jsr ecriture
|
|
lda #54
|
|
sta salle
|
|
s5399 rts
|
|
|
|
s53_str2 str 'La base et tout ce qu'27'elle contenait explose. Trop exp'8E'ditif...'
|
|
s53_str4 str 'Bill s'278e'jecte...'
|
|
|
|
*---
|
|
|
|
s54
|
|
lda #55
|
|
sta salle
|
|
jsr chargement_image
|
|
|
|
lda #3
|
|
jsr nowWAIT
|
|
|
|
ldx #destruction_base
|
|
lda indicateur-1,x
|
|
and #$ff
|
|
bne s5401
|
|
|
|
lda #s54_str1
|
|
jmp fin
|
|
|
|
s5401 ldx #fetiche
|
|
lda objet-1,x
|
|
and #$ff
|
|
cmp #objet_pris
|
|
beq s5402
|
|
|
|
lda #s54_str2
|
|
jmp fin
|
|
|
|
s5402 lda #56
|
|
sta salle
|
|
jsr chargement_image
|
|
|
|
lda #3
|
|
jsr nowWAIT
|
|
|
|
lda #s54_str3 ; on a gagné !
|
|
jmp fin
|
|
|
|
s5499 rts
|
|
|
|
s54_str1 str 'A sa chute, Bill est de nouveau captur'8e'. Il ne peut plus contrecarrer les plans du Professeur...'
|
|
s54_str2 str 'La base du Professeur X. est r'8e'duite en miettes. H'8e'las, Bill n'27'a pas r'8e'ussi '88' r'8e'cup'8e'rer le F'8e'tiche'
|
|
s54_str3 str 'FELICITATIONS ! ! Bill a r'8e'cup'8e'r'8e' le F'8e'tiche et d'8e'truit la base du Professeur X. Gageons que celui-ci prendra sa revanche...'
|
|
|
|
*---
|
|
|
|
s55
|
|
s5599 rts
|
|
|
|
*---
|
|
|
|
s56
|
|
s5699 rts |