mirror of
https://github.com/antoinevignau/source.git
synced 2024-06-01 00:41:39 +00:00
v+1
This commit is contained in:
parent
2f23dd37a0
commit
f6bb84d690
|
@ -13,57 +13,39 @@ strVOUSDETENEZ
|
||||||
asc 8D"Vous avez en votre possession : "00
|
asc 8D"Vous avez en votre possession : "00
|
||||||
|
|
||||||
strVOUSRIEN
|
strVOUSRIEN
|
||||||
asc 8D"Pas la peine de regarder, vous n"A7"avez"8D
|
asc 8D"Vous ne devez pas etre fatigue, vous"8D
|
||||||
asc "rien sur vous"00
|
asc "n"A7"avez rien sur vous"00
|
||||||
|
|
||||||
strPOINT
|
strPOINT
|
||||||
asc "."00
|
asc "."00
|
||||||
|
|
||||||
strEVIDENT
|
|
||||||
asc 8D"Vous vous prenez pour HULK..., vous ne"8D
|
|
||||||
asc "pouvez porter tant de choses !"8D00
|
|
||||||
|
|
||||||
strVOUSLAVEZ
|
strVOUSLAVEZ
|
||||||
asc 8D"Vous l"A7"avez deja. Si votre memoire"8D
|
asc 8D"Vous avez deja cela... Etourdi !"8D00
|
||||||
asc "est mauvaise, faites une liste"8D00
|
|
||||||
|
|
||||||
strNOTOWNED
|
strNOTOWNED
|
||||||
asc 8D"Jusqu"A7"a nouvel ordre, on ne peut poser"8D
|
asc 8D"Je ne savais pas qu"A7"on pouvait poser"8D
|
||||||
asc "ce que l"A7"on ne possede pas..."8D00
|
asc "ce qu"A7"on ne possede pas..."8D00
|
||||||
|
|
||||||
strDACCORD
|
strDACCORD
|
||||||
asc "D"A7"accord"00
|
asc "D"A7"accord"00
|
||||||
|
|
||||||
strILFAITNOIR
|
strILFAITNOIR
|
||||||
asc "Il fait trop sombre pour voir quelque"8D
|
asc "La salle n"A7"est pas eclairee."8D00
|
||||||
asc "chose, il faudrait peut-etre allumer"8D00
|
|
||||||
|
|
||||||
strILYA asc 8D"Ici, il y a egalement :"00
|
strVOSYEUX asc "Vos yeux ne voient plus rien."8D00
|
||||||
|
|
||||||
|
strNIVEAU asc "NIVEAU : 0"00
|
||||||
|
|
||||||
|
strILYA asc 8D"Il y a aussi :"00
|
||||||
strCOMMA asc ","00
|
strCOMMA asc ","00
|
||||||
strSPACE asc 8D" "00
|
strSPACE asc 8D" "00
|
||||||
strRETURN asc 8D00
|
strRETURN asc 8D00
|
||||||
|
|
||||||
strCMD asc 8D"Votre commande ? "00
|
strCOMMANDE asc 8D"Ordre ? "00
|
||||||
|
|
||||||
strCOMMANDE asc 8D"Commande ("
|
strJENECOMPRENDS
|
||||||
strTEMPS asc "5000) ? "00
|
asc 8D"Je ne comprends pas"00
|
||||||
|
|
||||||
tbl580 da $bdbd
|
|
||||||
da str581,str582,str583,str584,str585
|
|
||||||
da str586,str587,str588,str589,str590
|
|
||||||
|
|
||||||
str581 asc 8D"Ne racontez pas n"A7"importe quoi"8D00
|
|
||||||
str582 asc 8D"Pardon"8D00
|
|
||||||
str583 asc 8D"Comment"8D00
|
|
||||||
str584 asc 8D"Je ne comprends pas"8D00
|
|
||||||
str585 asc 8D"Sorry, I don"A7"t understand"8D00
|
|
||||||
str586 asc 8D"Les rigolos qui m"A7"ont programme ne m"A7"ont"
|
|
||||||
asc "pas appris ce vocabulaire"8D00
|
|
||||||
str587 asc 8D"Je n"A7"ai pas compris"8D00
|
|
||||||
str588 asc 8D"OK"8D00
|
|
||||||
str589 asc 8D"Ca marche"8D00
|
|
||||||
str590 asc 8D"D"A7"accord"8D00
|
|
||||||
|
|
||||||
strIMPOSSIBLE
|
strIMPOSSIBLE
|
||||||
asc 8D"Impossible "00
|
asc 8D"Impossible "00
|
||||||
strCECHEMIN
|
strCECHEMIN
|
||||||
|
@ -74,37 +56,21 @@ strEXCLAM
|
||||||
strREPLAY asc 8D"Voulez-vous rejouer ? "00
|
strREPLAY asc 8D"Voulez-vous rejouer ? "00
|
||||||
|
|
||||||
strPERDU
|
strPERDU
|
||||||
asc "EN CETTE HEURE PENIBLE, MOI APPLE ]["8D8D
|
|
||||||
asc "J"A7"ai le terrible devoir de vous"8D
|
|
||||||
asc "annoncer la mort tragique de votre"8D
|
|
||||||
asc "propre personne dans la redoutable"8D
|
|
||||||
asc "KIKEKANKOI, mais peut-etre vous en"8D
|
|
||||||
asc "etiez vous rendu compte...?"8D
|
|
||||||
asc 8D
|
|
||||||
asc "Vos funerailles furent respectables,"8D
|
|
||||||
asc "de par la preuve de courage que vous"8D
|
|
||||||
asc "aviez donnee et pour la personne qui"8D
|
|
||||||
asc "a cette heure-ci est encore prison-"8D
|
|
||||||
asc "niere de la cite mysterieuse... "00
|
|
||||||
|
|
||||||
strPERDU2
|
strGAGNE asc " D"A7"accord,"8D
|
||||||
asc 8D8D"OUF..... oui je sais, c"A7"est toujours"8D
|
asc "vous m"A7"avez battu, mais c"A7"est un coup"8D
|
||||||
asc "trop long les sepultures..."8D8D00
|
asc "de chance, et la prochaine fois ma"8D
|
||||||
|
asc "vengeance sera terrible."8D
|
||||||
|
asc "Prenez peur, car le jour ou je serai"8D
|
||||||
|
asc "a nouveau la, ma puissance n"A7"aura plus"8D
|
||||||
|
asc "de limites, alors l"A7"heure de la souf-"8D
|
||||||
|
asc "-france aura sonne..."8D
|
||||||
|
asc " Dr GENIUS."00
|
||||||
|
|
||||||
strGAGNE
|
strINTRO asc " LE RETOUR DU Dr GENIUS"8D
|
||||||
asc "Quelle classe..., ressortir vivant de"8D
|
asc " Vous avez 20 minutes et"8D
|
||||||
asc "KIKEKANKOI, il fallait le faire,"8D
|
asc " 400 unites de force pour"8D
|
||||||
asc "d"A7"autant plus que vous ne vous etes"8D
|
asc " remplir votre mission..."00
|
||||||
asc "meme pas ecorche un doigt! Mais ne"8D
|
|
||||||
asc "restez pas trop dans les parages, car"8D
|
|
||||||
asc "le savant fou a peut-etre encore"8D
|
|
||||||
asc "quelques experiences a faire sur vous,"8D
|
|
||||||
asc "comme vous greffer une tete de singe"8D
|
|
||||||
asc "ou un cerveau electronique de 64 Ko..."8D
|
|
||||||
asc 8D
|
|
||||||
asc "Merci d"A7"etre reste si longtemps a"8D
|
|
||||||
asc "votre clavier et encore toutes mes"8D
|
|
||||||
asc "felicitations"8D8D00
|
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
* LES DONNEES
|
* LES DONNEES
|
||||||
|
@ -809,7 +775,7 @@ str4520 asc "Le systeme automatique est deregle, il met du gaz carbonique a la p
|
||||||
str4530 asc "Vous respirez un grand coup."00
|
str4530 asc "Vous respirez un grand coup."00
|
||||||
str4540 asc "Que voulez-vous respirer, il n"A7"y a plus d"A7"oxygene."00
|
str4540 asc "Que voulez-vous respirer, il n"A7"y a plus d"A7"oxygene."00
|
||||||
str4550 asc "Vous avez deux essais pour"00
|
str4550 asc "Vous avez deux essais pour"00
|
||||||
str4552 asc "Entrez le mot de passe."00
|
str4552 asc "entrer le mot de passe."00
|
||||||
str4558 asc "Exact, vous etes perspicace!"00
|
str4558 asc "Exact, vous etes perspicace!"00
|
||||||
str4559 asc "UIN LOI QRU ILD ESP ECU TAS ASU VIE RAL HOU MEA"00
|
str4559 asc "UIN LOI QRU ILD ESP ECU TAS ASU VIE RAL HOU MEA"00
|
||||||
str4560 asc "C"A7"est d"A7"accord."00
|
str4560 asc "C"A7"est d"A7"accord."00
|
||||||
|
@ -818,7 +784,7 @@ str4580 asc "Vous mourrez deshydrate."00
|
||||||
str4610 asc "Le sas se referme derriere vous, le tableau de controle s"A7"allume et l"A7"ordinateur de bord vous demande le mot de passe pour le retour ?"00
|
str4610 asc "Le sas se referme derriere vous, le tableau de controle s"A7"allume et l"A7"ordinateur de bord vous demande le mot de passe pour le retour ?"00
|
||||||
str4615 asc "Le vaisseau de secours s"A7"eloigne, au loin vous voyez Genius qui pleure derriere un hublot"00
|
str4615 asc "Le vaisseau de secours s"A7"eloigne, au loin vous voyez Genius qui pleure derriere un hublot"00
|
||||||
str4616 asc " VOUS AVEZ GAGNE"00
|
str4616 asc " VOUS AVEZ GAGNE"00
|
||||||
str4618 asc "Mais, que se passe-t-il,vous avez du vous tromper de mot de passe,votre "00
|
str4618 asc "Mais, que se passe-t-il,vous avez du vous tromper de mot de passe, votre "00
|
||||||
str4620 asc "La soucoupe a explose au decollage."00
|
str4620 asc "La soucoupe a explose au decollage."00
|
||||||
str4630 asc "Energie restante :"00
|
str4630 asc "Energie restante :"00
|
||||||
str4640 asc "Petit drole...Le chronometre est affiche en permanence"00
|
str4640 asc "Petit drole...Le chronometre est affiche en permanence"00
|
||||||
|
@ -828,7 +794,7 @@ str4656 asc "Le mot de passe pour le retour est : "00 ; MP$
|
||||||
str4660 asc "Votre trajectoire est bonne, pourquoi la corriger ?"00
|
str4660 asc "Votre trajectoire est bonne, pourquoi la corriger ?"00
|
||||||
str4670 asc "Le mur au nord coulisse, vous avancez dans cette salle."00
|
str4670 asc "Le mur au nord coulisse, vous avancez dans cette salle."00
|
||||||
str4680 asc "Quel livre ?"00
|
str4680 asc "Quel livre ?"00
|
||||||
str4690 asc "au dos du boitier est marque :"00
|
str4690 asc "Au dos du boitier est marque :"00
|
||||||
str4692 asc " "A7"PROTEGEZ MOI"A7""00
|
str4692 asc " "A7"PROTEGEZ MOI"A7""00
|
||||||
str4700 asc "Vous remarquez un boitier de radiocommande."00
|
str4700 asc "Vous remarquez un boitier de radiocommande."00
|
||||||
str4730 asc "Que regardez vous ?"00
|
str4730 asc "Que regardez vous ?"00
|
||||||
|
@ -857,7 +823,7 @@ str4920 asc "Vous etes entre dans le vaisseau par le sas a l"A7"ouest qui ne s"A
|
||||||
|
|
||||||
str5500 asc "Etes-vous sur (O/N) ?"00
|
str5500 asc "Etes-vous sur (O/N) ?"00
|
||||||
|
|
||||||
str16000 asc "vaisseau de poche fonce sur le soleil,"00
|
str16000 asc "vaisseau de poche fonce sur le soleil, "00
|
||||||
str16010 asc "Vous venez de realiser que Genius"00
|
str16010 asc "Vous venez de realiser que Genius"00
|
||||||
str16020 asc "pleurait de JOIE...!"00
|
str16020 asc "pleurait de JOIE...!"00
|
||||||
str18005 asc "Comme je le pensais , vous vous etes stupidement fait avoir, et votre cadavre (ou ce qu"A7"il en reste) reposera a jamais dans l"A7"espace..."00
|
str18005 asc "Comme je le pensais , vous vous etes stupidement fait avoir, et votre cadavre (ou ce qu"A7"il en reste) reposera a jamais dans l"A7"espace..."00
|
||||||
|
@ -865,19 +831,3 @@ str18005 asc "Comme je le pensais , vous vous etes stupidement fait avoir, et vo
|
||||||
str19050 asc " Merci d"A7"avoir essaye...!"00
|
str19050 asc " Merci d"A7"avoir essaye...!"00
|
||||||
str19060 asc " Reveillez-vous , c"A7"est fini !"00
|
str19060 asc " Reveillez-vous , c"A7"est fini !"00
|
||||||
|
|
||||||
strGAGNE
|
|
||||||
asc " D"A7"accord,"8D
|
|
||||||
asc "vous m"A7"avez battu, mais c"A7"est un coup"8D
|
|
||||||
asc "de chance, et la prochaine fois ma"8D
|
|
||||||
asc "vengeance sera terrible."8D
|
|
||||||
asc "Prenez peur, car le jour ou je serai"8D
|
|
||||||
asc "a nouveau la, ma puissance n"A7"aura plus"8D
|
|
||||||
asc "de limites, alors l"A7"heure de la souf-"8D
|
|
||||||
asc "france aura sonne..."8D
|
|
||||||
asc " Dr GENIUS."00
|
|
||||||
|
|
||||||
strINTRO
|
|
||||||
asc " LE RETOUR DU Dr GENIUS"8D
|
|
||||||
asc " Vous avez 20 minutes , et"8D
|
|
||||||
asc " str400 unites de force pour"8D
|
|
||||||
asc " remplir votre mission..."00
|
|
||||||
|
|
|
@ -204,6 +204,11 @@ REPLAY jsr initALL
|
||||||
@print #strILFAITNOIR
|
@print #strILFAITNOIR
|
||||||
jmp :500
|
jmp :500
|
||||||
|
|
||||||
|
:140 jsr HGR
|
||||||
|
jsr setMIXEDON
|
||||||
|
@print #strVOSYEUX
|
||||||
|
jmp :500
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
* 200 - description salle
|
* 200 - description salle
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
@ -313,11 +318,7 @@ REPLAY jsr initALL
|
||||||
sta N
|
sta N
|
||||||
jmp :1000
|
jmp :1000
|
||||||
|
|
||||||
:530 lda switchENERGIE+1
|
:530 @print #strCOMMANDE ; commande avec energie
|
||||||
beq :531
|
|
||||||
@print #strCMD ; commande sans energie
|
|
||||||
jmp :535
|
|
||||||
:531 @print #strCOMMANDE ; commande avec energie
|
|
||||||
|
|
||||||
:535 jsr GETLN1
|
:535 jsr GETLN1
|
||||||
jsr rewriteSTRING ; from lower to upper
|
jsr rewriteSTRING ; from lower to upper
|
||||||
|
@ -326,17 +327,7 @@ REPLAY jsr initALL
|
||||||
lda MO$1
|
lda MO$1
|
||||||
bne :900
|
bne :900
|
||||||
|
|
||||||
lda VBL ; LOGO - Use a better RND?
|
@print #strJENECOMPRENDS
|
||||||
eor VERTCNT
|
|
||||||
and #7
|
|
||||||
clc
|
|
||||||
adc #1
|
|
||||||
asl
|
|
||||||
tax
|
|
||||||
ldy tbl580,x
|
|
||||||
lda tbl580+1,x
|
|
||||||
tax
|
|
||||||
jsr printCSTRING
|
|
||||||
jmp :100
|
jmp :100
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
@ -756,17 +747,7 @@ tbl1800 da :1800,:1900
|
||||||
|
|
||||||
*-------- B
|
*-------- B
|
||||||
|
|
||||||
:1900 lda S
|
:1900 ldx N
|
||||||
cmp #nbOaP ; nombre d'objets ˆ porter
|
|
||||||
bcc :1930
|
|
||||||
|
|
||||||
@print #strEVIDENT
|
|
||||||
|
|
||||||
:1920 lda #1
|
|
||||||
sta BREAK
|
|
||||||
rts
|
|
||||||
|
|
||||||
:1930 ldx N
|
|
||||||
lda O,x
|
lda O,x
|
||||||
cmp #-1
|
cmp #-1
|
||||||
bne :1960
|
bne :1960
|
||||||
|
@ -937,15 +918,16 @@ tbl1800 da :1800,:1900
|
||||||
* 4000 - LES REPONSES
|
* 4000 - LES REPONSES
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
|
|
||||||
tbl4000 da $bdbd
|
tbl4000 da $bdbd,:4010,:4020,:4030,:4040,:4050,:4060,:4070,:4080,:4090
|
||||||
da :4010,:4020,:4030,:4040,:4050,:4060,:4070,:4080,:4090
|
|
||||||
da :4100,:4110,:4120,:4130,:4140,:4150,:4160,:4170,:4180,:4190
|
da :4100,:4110,:4120,:4130,:4140,:4150,:4160,:4170,:4180,:4190
|
||||||
da :4200,:4210,:4220,:4230,:4240,:4250,:4260,:4270,:4280,:4290
|
da :4200,:4210,:4220,:4230,:4240,:4250,:4260,:4270,:4280,:4290
|
||||||
da :4300,:4310,:4320,:4330,:4340,:4350,:4360,:4370,:4380,:4390
|
da :4300,:4310,:4320,:4330,:4340,:4350,:4360,:4370,:4380,:4390
|
||||||
da :4400,:4410,:4420,:4430,:4440,:4450,:4460,:4470,:4480,:4490
|
da :4400,:4410,:4420,:4430,:4440,:4450,:4460,:4470,:4480,:4490
|
||||||
da :4500,:4510,:4520,:4530,:4540,:4550,:4560,:4570,:4580,:4590
|
da :4500,:4510,:4520,:4530,:4540,:4550,:4560,:4570,:4580,:4590
|
||||||
da :4600,:4610,:4620,:4630,:4640,:4650,:4660,:4670,:4680,:4690
|
da :4600,:4610,:4620,:4630,:4640,:4650,:4660,:4670,:4680,:4690
|
||||||
da :4700,:4710,:4720,:4730,:4740,:4750
|
da :4700,:4710,:4720,:4730,:4740,:4750,:4760,:4770,:4780,:4790
|
||||||
|
da :4800,:4810,:4820,:4830,:4840,:4850,:4860,:4870,:4880,:4890
|
||||||
|
da :4900,:4910,:4920
|
||||||
|
|
||||||
*--------
|
*--------
|
||||||
|
|
||||||
|
@ -1043,6 +1025,7 @@ tbl4000 da $bdbd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4320 @print #str4320
|
:4320 @print #str4320
|
||||||
|
@print #str4321
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4330 @print #str4330
|
:4330 @print #str4330
|
||||||
|
@ -1094,6 +1077,7 @@ tbl4000 da $bdbd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4490 @print #str4490
|
:4490 @print #str4490
|
||||||
|
#print #str4491
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4500 @print #str4500
|
:4500 @print #str4500
|
||||||
|
@ -1112,6 +1096,8 @@ tbl4000 da $bdbd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4550 @print #str4550
|
:4550 @print #str4550
|
||||||
|
@print #str4552
|
||||||
|
@print #str4558
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4560 @print #str4560
|
:4560 @print #str4560
|
||||||
|
@ -1130,6 +1116,7 @@ tbl4000 da $bdbd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4610 @print #str4610
|
:4610 @print #str4610
|
||||||
|
#print #str4615
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4620 @print #str4620
|
:4620 @print #str4620
|
||||||
|
@ -1142,49 +1129,93 @@ tbl4000 da $bdbd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4650 @print #str4650
|
:4650 @print #str4650
|
||||||
|
@print #str4655
|
||||||
|
@print #str4656
|
||||||
rts
|
rts
|
||||||
|
|
||||||
*---
|
:4660 @print #str4660
|
||||||
|
|
||||||
:4660 lda VBL ; LOGO - Use a better RND?
|
|
||||||
eor VERTCNT
|
|
||||||
and #7
|
|
||||||
clc
|
|
||||||
adc #1
|
|
||||||
:4665 asl
|
|
||||||
tax
|
|
||||||
ldy tbl4660,x
|
|
||||||
lda tbl4660+1,x
|
|
||||||
tax
|
|
||||||
jsr printCSTRING
|
|
||||||
rts
|
rts
|
||||||
|
|
||||||
:4670 lda #1
|
:4670 @print #str4670
|
||||||
bne :4665
|
rts
|
||||||
|
|
||||||
:4680 lda #2
|
|
||||||
bne :4665
|
|
||||||
|
|
||||||
:4690 lda #3
|
|
||||||
bne :4665
|
|
||||||
|
|
||||||
:4700 lda #4
|
|
||||||
bne :4665
|
|
||||||
|
|
||||||
:4710 lda #5
|
|
||||||
bne :4665
|
|
||||||
|
|
||||||
:4720 lda #6
|
:4680 @print #str4680
|
||||||
bne :4665
|
rts
|
||||||
|
|
||||||
:4730 lda #7
|
:4690 @print #str4690
|
||||||
bne :4665
|
@print #str4692
|
||||||
|
rts
|
||||||
:4740 lda #8
|
|
||||||
bne :4665
|
:4700 @print #str4700
|
||||||
|
rts
|
||||||
:4750 lda #9
|
|
||||||
bne :4665
|
:4710 @print #str4710
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4720 @print #str4720
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4730 @print #str4730
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4740 @print #str4740
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4750 @print #str4750
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4760 @print #str4760
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4770 @print #str4770
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4780 @print #str4780
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4790 @print #str4790
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4800 @print #str4800
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4810 @print #str4810
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4820 @print #str4820
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4830 @print #str4830
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4840 @print #str4840
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4850 @print #str4850
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4860 @print #str4860
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4870 @print #str4870
|
||||||
|
@print #str4874
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4880 @print #str4880
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4890 @print #str4890
|
||||||
|
@print #str4891
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4900 @print #str4900
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4910 @print #str4910
|
||||||
|
rts
|
||||||
|
|
||||||
|
:4920 @print #str4920
|
||||||
|
rts
|
||||||
|
|
||||||
*-----------------------------------
|
*-----------------------------------
|
||||||
* 6000 - ANALYSE DU MOT
|
* 6000 - ANALYSE DU MOT
|
||||||
|
@ -2318,4 +2349,11 @@ tblD2H dfb 0,10,20,30,40,50,60,70,80,90
|
||||||
put ../common/images.s
|
put ../common/images.s
|
||||||
put ../common/musiques.s
|
put ../common/musiques.s
|
||||||
|
|
||||||
*--- It's the end
|
*--- It's the end
|
||||||
|
|
||||||
|
tblIMAGES da L423B,L786F,L7974,L4F61,L4E95,L7CC8,L6BDC,L5EFA,L7DE2,L7F38
|
||||||
|
da L62EF,L57EA,L5925,L63F6,L47C3,L5A21,L5021,L4DFF,L64EF,L4700
|
||||||
|
da L5D77,L52CA,L4E41,L6AF2,L81EA,L827B,L61DF,L497F,L4C16,L4A8D
|
||||||
|
da L4CEE,L5B40,L6FDD,L6F05,L65FF,L8088,L7A40,L774C,L7B63,L5CC6
|
||||||
|
da L5BEE,L50F6,L6D58,L6C6E,L74D2,L70F6,L487A,L71E0,L4DAB,L55C8
|
||||||
|
da L72CA,L6958,$0000,L5F6B,L60EB,L6812,L6E33,L8367
|
BIN
leretour/images/les images.xlsx
Normal file
BIN
leretour/images/les images.xlsx
Normal file
Binary file not shown.
Binary file not shown.
20409
leretour/oric/LERETOUR.S
Normal file
20409
leretour/oric/LERETOUR.S
Normal file
File diff suppressed because it is too large
Load Diff
0
leretour/oric/_FileInformation.txt
Normal file
0
leretour/oric/_FileInformation.txt
Normal file
102
leretour/oric/comprehension.txt
Normal file
102
leretour/oric/comprehension.txt
Normal file
|
@ -0,0 +1,102 @@
|
||||||
|
80 l'index du premier mot
|
||||||
|
400 0, 1, 2 - dŽfinit le cadre dessinŽ
|
||||||
|
401 pointeurs sur les 57 images du jeu
|
||||||
|
480 P - les pointeurs
|
||||||
|
4A0 C - les conditions
|
||||||
|
4C0 O - les objets
|
||||||
|
4FB 32 = 50 = "2" - les 20 minutes...
|
||||||
|
4FC 30 = 48 = "0"
|
||||||
|
4FD 64 = 100
|
||||||
|
4FE 30 = 48 = "0"
|
||||||
|
4FF 31 = 49 = "1"
|
||||||
|
9100 la musique
|
||||||
|
BFF0
|
||||||
|
BFFF SALLE
|
||||||
|
|
||||||
|
CALL
|
||||||
|
---------------------------
|
||||||
|
86F5 ; init d'entree
|
||||||
|
90F9 ; met le pointeur de tempo
|
||||||
|
9245 ; le fill des images
|
||||||
|
9292 ; affiche image
|
||||||
|
9500 ; verifie mot saisi
|
||||||
|
9533 ; recopie action A$
|
||||||
|
96C9 ; installe notre tempo
|
||||||
|
96FC ; remet le tempo standard
|
||||||
|
|
||||||
|
FIRMWARE
|
||||||
|
--------------------------- PAGE 2
|
||||||
|
MODEKEY := $0209
|
||||||
|
CAPSLOCK := $020C ; $7F = not locked, $FF = locked
|
||||||
|
PATTERN := $0213
|
||||||
|
IRQVec := $0245 ; "fast" interrupt vector
|
||||||
|
JOINFLAG := $025A ; 0 = don't joiu, $4A = join BASIC programs
|
||||||
|
VERIFYFLAG := $025B ; 0 = load, 1 = verify
|
||||||
|
CURS_Y := $0268
|
||||||
|
CURS_X := $0269
|
||||||
|
STATUS := $026A
|
||||||
|
BACKGRND := $026B
|
||||||
|
FOREGRND := $026C
|
||||||
|
TIMER3 := $0276
|
||||||
|
CFILE_NAME := $027F
|
||||||
|
CFOUND_NAME := $0293
|
||||||
|
FILESTART := $02A9
|
||||||
|
FILEEND := $02AB
|
||||||
|
AUTORUN := $02AD ; $00 = only load, $C7 = autorun
|
||||||
|
LANGFLAG := $02AE ; $00 = BASIC, $80 = machine code
|
||||||
|
LOADERR := $02B1
|
||||||
|
KEYBUF := $02DF
|
||||||
|
PARMERR := $02E0
|
||||||
|
PARAM1 := $02E1 ; & $02E2
|
||||||
|
PARAM2 := $02E3 ; & $02E4
|
||||||
|
PARAM3 := $02E5 ; & $02E6
|
||||||
|
BANGVEC := $02F5
|
||||||
|
|
||||||
|
--------------------------- PAGE 3
|
||||||
|
PRB .byte ; Port Register B
|
||||||
|
PRA .byte ; Port Register A
|
||||||
|
DDRB .byte ; Data Direction Register B
|
||||||
|
DDRA .byte ; Data Direction Register A
|
||||||
|
T1 .word ; Timer 1
|
||||||
|
T1L .word ; Timer 1 Latch
|
||||||
|
T2 .word ; Timer 2
|
||||||
|
SR .byte ; Shift Register
|
||||||
|
ACR .byte ; Auxiliary Control Register
|
||||||
|
PCR .byte ; Peripheral Control Register
|
||||||
|
IFR .byte ; Interrupt Flags Register
|
||||||
|
IER .byte ; Interrupt Enable Register
|
||||||
|
PRA2 .byte ; Port Register A without handshaking
|
||||||
|
|
||||||
|
.res $031C
|
||||||
|
DATA .byte
|
||||||
|
STATUS .byte
|
||||||
|
CMD .byte ; Command register
|
||||||
|
CTRL .byte ; Control register
|
||||||
|
|
||||||
|
--------------------------- FIRMWARE
|
||||||
|
GETLINE := $C592
|
||||||
|
TEXT := $EC21
|
||||||
|
HIRES := $EC33
|
||||||
|
CURSET := $F0C8
|
||||||
|
CURMOV := $F0FD
|
||||||
|
DRAW := $F110
|
||||||
|
CHAR := $F12D
|
||||||
|
CHAR_ALT := $F15D
|
||||||
|
POINT := $F1C8
|
||||||
|
PAPER := $F204
|
||||||
|
INK := $F210
|
||||||
|
FILL := $F268
|
||||||
|
PRINT := $F77C
|
||||||
|
|
||||||
|
PING := $FA9F
|
||||||
|
PING1 := $FA85
|
||||||
|
SHOOT := $FAB5
|
||||||
|
SHOOT1 := $FA9B
|
||||||
|
EXPLODE := $FACB
|
||||||
|
EXPLODE1 := $FAB1
|
||||||
|
ZAP := $FAE1
|
||||||
|
ZAP1 := $FAC7
|
||||||
|
TICK := $FB14
|
||||||
|
TICK1 := $FAFA
|
||||||
|
TOCK := $FB2A
|
||||||
|
TOCK1 := $FB10
|
BIN
leretour/oric/oric_advanced_user_guide_rom_disassembly.pdf
Normal file
BIN
leretour/oric/oric_advanced_user_guide_rom_disassembly.pdf
Normal file
Binary file not shown.
Loading…
Reference in New Issue
Block a user