FR/EN finished

This commit is contained in:
Antoine Vignau 2023-11-27 22:52:08 +01:00
parent 4a8d910389
commit fe1813b17e
18 changed files with 22921 additions and 10305 deletions

View File

@ -1,2 +0,0 @@
drgenius.system=Type(FF),AuxType(2000),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)
drgenius=Type(06),AuxType(4000),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1 @@
drgenius=Type(06),AuxType(4000),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)

Binary file not shown.

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -17,228 +17,214 @@
*-----------------------------------
strVOUSDETENEZ
asc 8D"Vous detenez : "00
asc 8D"You carry: "00
strVOUSRIEN
asc 8D"Vous ne detenez absolument rien !!!"00
asc 8D"You carry absolutely nothing!!!"00
strPOINT
asc "."00
strEVIDENT
asc 8D"Il parait evident que vous ne pouvez"8D
asc "pas porter tant de choses !!"00
asc 8D"It seems abvious that you can only"8D
asc "carry so much stuff!!"00
strVOUSLAVEZ
asc 8D"Vous l'avez deja. Voues etes etourdi"8D
asc "et dans cette maison, ce n'est pas"00
asc 8D"You already have it. You are dizzy"8D
asc "and in this house, it is not"00
strCONSEILLE
asc 8D"tres conseille"00
asc 8D"very advisable"00
strNOTOWNED
asc 8D"Comment voulez-vous poser ce que vous"8D
asc "n'avez pas ?"00
asc 8D"How do you want to drop what you"8D
asc "do not carry?"00
strDACCORD
asc 8D"D'accord"00
asc 8D"OK"00
*-----------------------------------
* 4000 - LES REPONSES
*-----------------------------------
str4000 asc "VOUS AVEZ GARDE LA LAMPE TROP LONGTEMPS"8D
asc "ALLUMEE, ELLE A EXPLOSE"00
str4000 asc "You kept the lamp on too long,"8D
asc "it exploded"00
str4010 asc "VOUS AVEZ OUBLIE DE FERMER LE ROBINET"8D
asc "VOUS MOUREZ SOUS DES TONNES D'EAU"00
str4010 asc "You forgot to close the faucet"8D
asc "You die under tons of water"00
str4020 asc "LA PORTE VIENT DE SE REFERMER DERRIERE"8D
asc "VOUS, VOUS VOILA PRISONNIER..."00
str4020 asc "The door has just closed behind you"8D
asc "You are a prisoner..."00
str4030 asc "VOUS AVEZ TREBUCHE DANS L'ESCALIER, VOUS"
asc "VOUS EMPALEZ SUR LE COUTEAU !"00
str4030 asc "You triped on the stairs,"8D
asc "you are impaled on the knife!"00
str4040 asc "VOUS RENVERSEZ L'EAU DANS L'ESCALIER,"8D
asc "CE QUI PROVOQUE UNE DECHARGE DE LA"00
str4042 asc 8D"PRISE ELECTRIQUE"00
str4040 asc "You spill the water down the stairs,"8D
asc "causing a discharge of the"00
str4042 asc 8D"electrical outlet"00
str4050 asc "VOUS ETES SAUF GRACE A LA COMBINAISON"8D
asc "QUE VOUS AVEZ ENFILEE...!"00
str4050 asc "You are safe thanks to the suit"8D
asc "you have put on...!"00
str4060 asc "VOUS MOUREZ ELECTROCUTE..."00
str4060 asc "You die of electric shot..."00
str4070 asc "LA PIECE ETAIT PLEINE DE GAZ EXPLOSIF,"8D
asc "VOUS AURIEZ DU ETEINDRE..."00
str4072 asc 8D"ON RAMASSERA VOS MORCEAUX UN AUTRE"8D
asc "JOUR...!"00
str4070 asc "The room was full of explosive gas,"8D
asc "you should have extinguished..."00
str4072 asc 8D"We will pick up your pieces"8D
asc "another day...!"00
str4080 asc "VOUS MOUREZ EMPALE SUR DES LANCES"8D
asc "SORTIES DU MUR... !"00
str4080 asc "You die impalted on spears of the"8D
asc "wall...!"00
str4090 asc "LA PORTE NE S'OUVRE PAS DE CETTE PIECE"00
str4090 asc "The door does not open from this room"00
str4100 asc "LA LAMPE ET LE BRIQUET REFUSENT DE"8D
asc "MARCHER DANS CETTE PIECE"00
str4100 asc "The lamp and the lighter refuse to"8D
asc "work in this room"00
str4110 asc "VOUS TOMBEZ DANS UNE TRAPPE, VOUS VOUS"8D
asc "DISLOQUEZ EN ARRIVANT AU SOL..."00
str4110 asc "You fall into a trap, you dislocate"8D
asc "arriving on the ground..."00
str4120 asc "VOUS AVEZ RAISON DE PASSER, CAR CE"8D
asc "MONSTRE N'ETAIT QU'UNE PROJECTION"00
str4124 asc 8D"EN 3 DIMENSIONS SUR UN ECRAN DE FUMEE"00
str4120 asc "You are right to pass, because this"8D
asc "monster was only a 3D projection"00
str4124 asc 8D"on a smoken screen"00
str4130 asc "VOUS AVEZ RAISON, LA CURIOSITE EST UN"8D
asc "VILAIN DEFAUT"00
str4133 asc 8D" AU REVOIR"00
str4130 asc "You are right, curiosity killed the cat"00
str4133 asc 8D" Bye"00
str4140 asc "VOUS AVEZ RAISON D'ATTENDRE, MAIS CELA"
asc "NE POURRA PAS DURER ETERNELLEMENT..."00
str4140 asc "You are right to wait, but this"
asc "cannot last forever..."00
str4150 asc "VOUS AVEZ DE LA CHANCE CAR CE COFFRE"8D
asc "ETAIT OUVERT."00
str4152 asc 8D"UN MESSAGE A L'INTERIEUR DIT : NE"8D
asc "RESPECTEZ PAS LES COULEURS DU CODE DE LA"8D
asc "ROUTE...?"00
str4156 asc 8D"TIENS LE COFFRE SE REFERME"00
str4150 asc "You are lucky because this chest was open"00
str4152 asc 8D"A message inside says: do not"8D
asc "respect the colors of the Highway code?"00
str4156 asc 8D"Hold on, the chest closes"00
str4160 asc "MAINTENANT, VOUS AVEZ UNE LAMPE PLEINE"8D
asc "DE PETROLE"00
str4160 asc "Now you have a lamp full of oil"00
str4170 asc "VOUS N'AVEZ RIEN POUR TRANSPORTER LE"8D
asc "PETROLE"00
str4170 asc "You have nothing to carry the oil"00
str4180 asc "LE BRIQUET QUE VOUS AVIEZ LAISSE ALLUME"8D
asc "VIENT D'EXPLOSER"00
str4185 asc 8D"CA TUE L'ETOURDIE..."00
str4180 asc "The lighter you left lit exploded"00
str4185 asc 8D"It kills thoughtlessness..."00
str4190 asc "A FORCE DE MARCHER EN LONG ET EN LARGE"8D
asc "dans CETTE MAISON,"00
str4195 asc 8D"VOUS SOMBREZ DANS UN COMA DES PLUS"8D
asc "MORTELS..."00
str4190 asc "Walking long and large in this house"00
str4195 asc 8D"you fall into a deadly coma"00
str4200 asc "L'EAU COULE..."00
str4200 asc "Water flows..."00
str4210 asc "VOUS AVEZ LES PIEDS TREMPES ET CELA VOUS"
asc "REND TRES MALADE..."00
str4215 asc 8D"VOUS MOUREZ D'UNE TRIPLE PNEUMONIE...!"00
str4210 asc "Your feet are soaked and it makes you"8D
asc "very sick..."00
str4215 asc 8D"You die of triple pneumonia...!"00
str4220 asc "LE TITRE EST : "00
str4225 asc 8D"LA MORT A LA PREMIERE PAGE."00
str4220 asc "The title is: "00
str4225 asc 8D"Death on the first page."00
str4230 asc "LE LIVRE A EXPLOSE LORSQUE VOUS L'AVEZ"8D
asc "OUVERT..."00
str4230 asc "The book exploded when you opened it..."00
str4240 asc "LE PAPIER INDIQUE : CHERCHEZ LA CLEF."00
str4240 asc "The paper says: search the key."00
str4250 asc "LA CLEF VOUS PERMETTRA DE TROUVER LE"8D
asc "CODE DE LA PORTE D'ENTREE."00
str4250 asc "The key will allow you to find the"8D
asc "entrance door code."00
str4260 asc "IL Y A, A COTE DE LA PORTE, UN CLAVIER"8D
asc "NUMERIQUE PERMETTANT D'ENTRER UN CODE"00
str4260 asc "There is, next to the door, a numerical"8D
asc "keypad for entering a code"00
str4270 asc "POUR FAIRE QUOI...?"00
str4270 asc "To do what...?"00
str4280 asc 8D"IL Y A UNE ODEUR DE GAZ."00
str4280 asc 8D"There is a smell of gas."00
str4290 asc "APPAREMMENT, IL N'Y A AUCUNE ODEUR"8D
asc "MAIS..."00
str4290 asc "Apparently, there is no smell but..."00
str4300 asc "C'EST DEJA FAIT, ESPECE DE RIGOLO"00
str4300 asc "It is already done, you funny fool"00
str4310 asc "IL FAUDRAIT PEUT-ETRE DU FEU"00
str4310 asc "Maybe you need a fire"00
str4320 asc "LA LAMPE NE CONTIENT PAS DE PETROLE"00
str4320 asc "The lamp does not contain oil"00
str4330 asc "VOUS NE L'AVEZ PAS"00
str4330 asc "You do not have it"00
str4340 asc "LE BRIQUET EST ENCORE ALLUME ET IL"8D
asc "ECLAIRE LA PIECE."00
str4340 asc "The lighter is still lit and"8D
asc "it lights up the room."00
str4350 asc "LA TORCHE ETAIT PIEGEE, ELLE VOUS"8D
asc "EXPLOSE DANS LES MAINS..."00
str4350 asc "The torch was trapped, it"8D
asc "exploded in your hands..."00
str4360 asc "LA LAMPE EST ENCORE ALLUMEE ET ELLE VOUS"
asc "ECLAIRE"00
str4360 asc "The lamp is still lit and it"8D
asc "enlightened"00
str4370 asc "UN NAIN VIENT DE VOUS LANCER UN POIGNARD"
asc "EN PLEIN COEUR..."00
str4370 asc "A dwarf just throwed a stab at you"8D
asc "in the heart..."00
str4380 asc "UN NAIN VIENT DE SE PRECIPITER SUR VOUS,"
asc "IL S'EMPALE SUR VOTRE CISEAU"00
str4380 asc "A dwarf just rushed at you, it impales"8D
asc "on your scissor"00
str4390 asc "UN NAIN VIENT DE SE PRECIPITER SUR VOUS,"
asc "IL S'EMPALE SUR VOTRE COUTEAU"00
str4390 asc "A dwarf just rushed at you, it impales"8D
asc "on your knife"00
str4400 asc "VOUS VENEZ DE RENVERSER LE POT"00
str4400 asc "You just spilled the pot"00
str4410 asc "LA FOUDRE VIENT DE TOMBER SUR LA MAISON"8D
str4412 asc 8D"LA MAISON N'EXISTE PLUS, VOUS NON PLUS"00
str4410 asc "The lighting just fell on the house"00
str4412 asc 8D"The house no longer exists, neither you"00
str4420 asc "A FORCE DE MARCHER DANS LE NOIR, VOUS"8D
asc "AVEZ TREBUCHE"00
str4425 asc 8D"VOUS MOUREZ D'UNE FRACTURE DU CRANE"00
str4420 asc "Walking in the dark, you tripped"00
str4425 asc 8D"you die of a skull fracture"00
str4430 asc "VOUS NE POUVEZ PAS TRAVAILLER DANS LE"8D
asc "NOIR..."00
str4430 asc "You cannot work in the dark"00
str4440 asc "LA LUMIERE DU BRIQUE NE SUFFIT PAS"8D
asc "POUR TRAVAILLER..."00
str4440 asc "The light of the lighter is not enough"8D
asc "to work..."00
str4450 asc "IMPOSSIBLE !"8D00
str4450 asc "Impossible!"8D00
str4460 asc "VOUS N'AVEZ AUCUN OUTIL..."
str4460 asc "You have no tools..."
str4470 asc "LE TELEPORTEUR EST EN PANNE, LES BOUTONS"
asc "NE FONCTIONNENT PAS."00
str4470 asc "The teleporter is broken, the buttons"8D
asc "do not work."00
str4480 asc "LE TELEPORTEUR VIENT D'EXPLOSER, VOUS"8D
asc "ETES DECOMPOSEE... !"00
str4480 asc "The teleporter just exploded, you"8D
asc "are decomposed...!"00
str4490 asc "LE TELEPORTEUR SE MET EN MARCHE, VOUS"8D
asc "DISPARAISSEZ"00
str4490 asc "The teleporter stars, you disappear"00
str4500 asc "VOUS PRENEZ DU 30000 VOLTS DANS LES"8D
asc "DOIGTS"00
str4500 asc "You take 30,0000 Volts in your fingers"00
str4510 asc "LE PLACARD EST FERME A CLEF"00
str4510 asc "The closet is locked"00
str4520 asc "L'HORRIBLE MONSTRE SORTI DU PLACARD"8D
asc "VIENT DE VOUS DEVORER"00
str4520 asc "The horrible monster out of the closet"8D
asc "just devoured you"00
str4530 asc "IL NE FALLAIT PAS FUIR"00
str4530 asc "You should not flee"00
str4540 asc "VOUS AVEZ RAISON D'UTILISER LE CISEAU,"8D
asc "LE MONSTRE EST MORT"00
str4540 asc "You are right to use the scissors,"8D
asc "the monster is dead"00
str4550 asc "A L'INTERIEUR DU PLACARD, LE NO "00
str4552 asc 8D" EST INSCRIT"00
str4555 asc 8D"LE PLACARD SE REFERME."00
str4550 asc "Inside the closet, number "00
str4552 asc 8D" is registered"00
str4555 asc 8D"The closet closes."00
str4560 asc "LE PISTOLET A EXPLOSE"00
str4560 asc "The gun exploded"00
str4570 asc "LE CLAVIER NUMERIQUE A EXPLOSE"00
str4570 asc "The numeric keyboard exploded"00
str4580 asc "LE CLAVIER NUMERIQUE PREND FEU,"8D
asc "HEUREUSEMENT, VOUS AVIEZ "00
str4582 asc "UN POT PLEIN"00
str4585 asc 8D"D'EAU QUI VOUS PERMET D'ETEINDRE LE FEU"00
str4580 asc "The numeric keyboard caught fire,"8D
asc "Luckily, you had "00
str4582 asc "a pot full of ware"00
str4585 asc 8D"that allows you extinguish the fire"00
str4590 asc 8D"NO DE CODE? "00
str4590 asc 8D"Code number? "00
strCODEEXACT
asc "LE CODE EST EXACT... LA PORTE S'OUVRE..."00
asc "The code is exact... The door opens......"00
strENDEHORS
asc 8D"VOUS VOILA EN DEHORS DE LA MAISON..."
asc 8D"You are now outside the house..."
str4610 asc "A L'INTERIEUR DU PLACARD, IL Y A UN MOT"8D
asc "PARLE D'UN TELEPORTEUR"00
str4615 asc 8D"TIENS LE PLACARD SE FERME TOUT SEUL..."00
str4610 asc "Inside the closet, there is a word"8D
asc "talking about a teleporter"00
str4615 asc 8D"Hold on, the closed closes by itself..."00
str4620 asc "AVANT DE LA POSER A TERRE, IL FAUDRAIT"8D
asc "PEUT-ETRE L'ENLEVER"00
str4620 asc "Before putting it on the ground, you"8D
asc "may need to remove it"00
str4630 asc "IL Y A UN HORRIBLE MONSTRE DEVANT VOUS"8D
asc "QUI EST SORTI DU PLACARD."00
str4630 asc "Thee is a horrible monster in front of you"8D
asc "that came out of the closet."00
str4640 asc "LE PLACARD ETAIT PIEGE, VOUS N'AURIEZ"8D
asc "PAS DU L'OUVRIR"00
str4640 asc "The closet was trapped, you should not"8D
asc "have opened it"00
*-----------------------------------
* LIEUX
@ -267,7 +253,7 @@ str7130 asc ""00 ; nada
str7140 asc "in a small room"00
str7150 asc "in the laboratory of"00 ; + :7001
str7160 asc "in a small empty room"00
str7170 asc "! You actually do not know"8D"
str7170 asc "! You actually do not know"8D
asc "where you are"00
str7180 asc "at the top of the stairs"00
str7190 asc "in the bathroom"00
@ -319,7 +305,7 @@ strDISCLAIMER
asc "The use of this program is not"8D8D
asc "recommended to sensitive people,"8D8D
asc "young children, as well as"8D8D
asc "anyone like to have heart diseases."8D8D
asc "anyone who have heart diseases."8D8D
asc 8D8D
asc "We cannot be held responsible for any"8D8D
asc "physical or mental disorder caused"8D8D
@ -402,7 +388,7 @@ V$36 str "SCRE" ; TOURNEVIE
V$37 str "LAMP" ; LAMPE
V$38 str "CODE" ; CODE
V$39 str "STAI" ; ESCALIER
V$40 str "PIST" ; PISTOLET
V$40 str "GUN" ; PISTOLET
V$41 str "CLOS" ; PLACARD
V$42 str "TORC" ; TORCHE
V$43 str "TELE" ; TELEPORTEUR

View File

@ -0,0 +1 @@
drgenius=Type(06),AuxType(4000),VersionCreate(70),MinVersion(BE),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)

View File

@ -28,6 +28,9 @@ chrRET2 = $8d
chrSPC2 = $a0
TEXTBUFFER = $200
chrOUI = "O"
chrNON = "N"
PRODOS = $bf00
KBD = $c000
@ -1944,9 +1947,9 @@ initALL
jsr setTEXTFULL
]lp @print #strREPLAY
jsr translateKEY
cmp #"N"
cmp #chrNON
beq :20001
cmp #"O"
cmp #chrOUI
bne ]lp
jmp REPLAY
@ -2032,9 +2035,9 @@ sauveCYA ds 1
jsr setTEXTFULL
]lp @print #strINSTR
jsr translateKEY
cmp #"N"
cmp #chrNON
beq :40001
cmp #"O"
cmp #chrOUI
bne ]lp
@print #strINSTR2
@ -2888,7 +2891,7 @@ tblD2H dfb 0,10,20,30,40,50,60,70,80,90
*-----------------------------------
put fr.s
put images.s
put musiques.s
put ../common/images.s
put ../common/musiques.s
*--- It's the end

File diff suppressed because it is too large Load Diff

View File

@ -27,7 +27,7 @@ strEVIDENT
asc 8D"Il parait evident que vous ne pouvez"8D
asc "pas porter tant de choses !!"00
strVOUSLAVEZ
asc 8D"Vous l"A7"avez deja. Voues etes etourdi"8D
asc 8D"Vous l"A7"avez deja. Vous etes etourdi"8D
asc "et dans cette maison, ce n"A7"est pas"00
strCONSEILLE
asc 8D"tres conseille"00
@ -185,7 +185,7 @@ str4450 asc "Impossible !"8D00
str4460 asc "Vous n"A7"avez aucun outil..."
str4470 asc "Le teleporteur est en panne, les boutons"
str4470 asc "Le teleporteur est en panne, les boutons"8D
asc "ne fonctionnent pas."00
str4480 asc "Le teleporteur vient d"A7"exploser, vous"8D

View File

@ -1,107 +0,0 @@
------+----------------------+-------------+----+---------+------+-----------------------+-------------------------------------------------------------------
Line | # File Line | Line Type | MX | Reloc | Size | Address Object Code | Source Code
------+----------------------+-------------+----+---------+------+-----------------------+-------------------------------------------------------------------
1 | 1 lemanoir.s 1 | Comment | 11 | | 0 | 00/8000 | *
2 | 1 lemanoir.s 2 | Comment | 11 | | 0 | 00/8000 | * Le manoir du Dr Genius
3 | 1 lemanoir.s 3 | Comment | 11 | | 0 | 00/8000 | *
4 | 1 lemanoir.s 4 | Comment | 11 | | 0 | 00/8000 | * (c) 1983, Loriciels (Oric)
5 | 1 lemanoir.s 5 | Comment | 11 | | 0 | 00/8000 | * (c) 2023, Brutal Deluxe Software (Apple II)
6 | 1 lemanoir.s 6 | Comment | 11 | | 0 | 00/8000 | *
7 | 1 lemanoir.s 7 | Empty | 11 | | 0 | 00/8000 |
8 | 1 lemanoir.s 8 | Directive | 11 | | 0 | 00/8000 | mx %11
9 | 1 lemanoir.s 9 | Directive | 11 | | 0 | 00/8000 | org $2000
10 | 1 lemanoir.s 10 | Directive | 11 | | 0 | 00/2000 | lst off
11 | 1 lemanoir.s 11 | Empty | 11 | | 0 | 00/2000 |
12 | 1 lemanoir.s 12 | Comment | 11 | | 0 | 00/2000 | *-----------------------------------
13 | 1 lemanoir.s 13 | Comment | 11 | | 0 | 00/2000 | * SOFTSWITCHES AND FRIENDS
14 | 1 lemanoir.s 14 | Comment | 11 | | 0 | 00/2000 | *-----------------------------------
15 | 1 lemanoir.s 15 | Empty | 11 | | 0 | 00/2000 |
16 | 1 lemanoir.s 16 | Equivalence | 11 | | 0 | 00/2000 | leJEU = $4000
17 | 1 lemanoir.s 17 | Empty | 11 | | 0 | 00/2000 |
18 | 1 lemanoir.s 18 | Equivalence | 11 | | 0 | 00/2000 | ptrPREFIX = $280
19 | 1 lemanoir.s 19 | Equivalence | 11 | | 0 | 00/2000 | proBUFFER = $b800
20 | 1 lemanoir.s 20 | Equivalence | 11 | | 0 | 00/2000 | PRODOS = $bf00
21 | 1 lemanoir.s 21 | Empty | 11 | | 0 | 00/2000 |
22 | 1 lemanoir.s 22 | Comment | 11 | | 0 | 00/2000 | *-----------------------------------
23 | 1 lemanoir.s 23 | Comment | 11 | | 0 | 00/2000 | * LOAD THE GAME
24 | 1 lemanoir.s 24 | Comment | 11 | | 0 | 00/2000 | *-----------------------------------
25 | 1 lemanoir.s 25 | Empty | 11 | | 0 | 00/2000 |
26 | 1 lemanoir.s 26 | Code | 11 | | 3 | 00/2000 : 20 00 BF | jsr {$bf00} ; get the prefix
27 | 1 lemanoir.s 27 | Data | 11 | | 1 | 00/2003 : C7 | dfb $c7
28 | 1 lemanoir.s 28 | Data | 11 | | 2 | 00/2004 : 56 20 | da proGETPFX
29 | 1 lemanoir.s 29 | Empty | 11 | | 0 | 00/2006 |
30 | 1 lemanoir.s 30 | Code | 11 | | 3 | 00/2006 : 20 00 BF | jsr {$bf00} ; set it
31 | 1 lemanoir.s 31 | Data | 11 | | 1 | 00/2009 : C6 | dfb $c6
32 | 1 lemanoir.s 32 | Data | 11 | | 2 | 00/200A : 56 20 | da proGETPFX
33 | 1 lemanoir.s 33 | Empty | 11 | | 0 | 00/200C |
34 | 1 lemanoir.s 34 | Code | 11 | | 3 | 00/200C : 20 00 BF | jsr {$bf00}
35 | 1 lemanoir.s 35 | Data | 11 | | 1 | 00/200F : C8 | dfb $c8
36 | 1 lemanoir.s 36 | Data | 11 | | 2 | 00/2010 : 59 20 | da proOPEN
37 | 1 lemanoir.s 37 | Code | 11 | | 2 | 00/2012 : B0 33 | bcs quitME
38 | 1 lemanoir.s 38 | Empty | 11 | | 0 | 00/2014 |
39 | 1 lemanoir.s 39 | Code | 11 | | 3 | 00/2014 : AD 5E 20 | lda proOPEN+5 ; zou, on prend l'ID
40 | 1 lemanoir.s 40 | Code | 11 | | 3 | 00/2017 : 8D 6A 20 | sta proGETEOF+1
41 | 1 lemanoir.s 41 | Code | 11 | | 3 | 00/201A : 8D 60 20 | sta proREAD+1
42 | 1 lemanoir.s 42 | Code | 11 | | 3 | 00/201D : 8D 68 20 | sta proCLOSE+1
43 | 1 lemanoir.s 43 | Empty | 11 | | 0 | 00/2020 |
44 | 1 lemanoir.s 44 | Code | 11 | | 3 | 00/2020 : 20 00 BF | jsr {$bf00} ; longueur du fichier
45 | 1 lemanoir.s 45 | Data | 11 | | 1 | 00/2023 : D1 | dfb $d1
46 | 1 lemanoir.s 46 | Data | 11 | | 2 | 00/2024 : 69 20 | da proGETEOF
47 | 1 lemanoir.s 47 | Code | 11 | | 2 | 00/2026 : B0 1F | bcs quitME
48 | 1 lemanoir.s 48 | Empty | 11 | | 0 | 00/2028 |
49 | 1 lemanoir.s 49 | Code | 11 | | 3 | 00/2028 : AD 6B 20 | lda proGETEOF+2
50 | 1 lemanoir.s 50 | Code | 11 | | 3 | 00/202B : 8D 63 20 | sta proREAD+4
51 | 1 lemanoir.s 51 | Code | 11 | | 3 | 00/202E : AD 6C 20 | lda proGETEOF+3
52 | 1 lemanoir.s 52 | Code | 11 | | 3 | 00/2031 : 8D 64 20 | sta proREAD+5
53 | 1 lemanoir.s 53 | Empty | 11 | | 0 | 00/2034 |
54 | 1 lemanoir.s 54 | Code | 11 | | 3 | 00/2034 : 20 00 BF | jsr {$bf00} ; lecture du fichier
55 | 1 lemanoir.s 55 | Data | 11 | | 1 | 00/2037 : CA | dfb $ca
56 | 1 lemanoir.s 56 | Data | 11 | | 2 | 00/2038 : 5F 20 | da proREAD
57 | 1 lemanoir.s 57 | Code | 11 | | 2 | 00/203A : B0 0B | bcs quitME
58 | 1 lemanoir.s 58 | Empty | 11 | | 0 | 00/203C |
59 | 1 lemanoir.s 59 | Code | 11 | | 3 | 00/203C : 20 00 BF | jsr {$bf00} ; fermeture du fichier
60 | 1 lemanoir.s 60 | Data | 11 | | 1 | 00/203F : CC | dfb $cc
61 | 1 lemanoir.s 61 | Data | 11 | | 2 | 00/2040 : 67 20 | da proCLOSE
62 | 1 lemanoir.s 62 | Code | 11 | | 2 | 00/2042 : B0 03 | bcs quitME
63 | 1 lemanoir.s 63 | Empty | 11 | | 0 | 00/2044 |
64 | 1 lemanoir.s 64 | Code | 11 | | 3 | 00/2044 : 4C 00 40 | jmp {$4000}
65 | 1 lemanoir.s 65 | Empty | 11 | | 0 | 00/2047 |
66 | 1 lemanoir.s 66 | Code | 11 | | 3 | 00/2047 : 20 00 BF | quitME jsr {$bf00} ; exit
67 | 1 lemanoir.s 67 | Data | 11 | | 1 | 00/204A : 65 | dfb $65
68 | 1 lemanoir.s 68 | Data | 11 | | 2 | 00/204B : 4F 20 | da proQUIT
69 | 1 lemanoir.s 69 | Code | 11 | | 2 | 00/204D : 00 BD | brk $bd ; on ne se refait pas ;-)
70 | 1 lemanoir.s 70 | Empty | 11 | | 0 | 00/204F |
71 | 1 lemanoir.s 71 | Comment | 11 | | 0 | 00/204F | *--- Data
72 | 1 lemanoir.s 72 | Empty | 11 | | 0 | 00/204F |
73 | 1 lemanoir.s 73 | Data | 11 | | 1 | 00/204F : 04 | proQUIT dfb $4
74 | 1 lemanoir.s 74 | Data | 11 | | 1 | 00/2050 : 00 | ds 1
75 | 1 lemanoir.s 75 | Data | 11 | | 2 | 00/2051 : 00 00 | ds 2
76 | 1 lemanoir.s 76 | Data | 11 | | 1 | 00/2053 : 00 | ds 1
77 | 1 lemanoir.s 77 | Data | 11 | | 2 | 00/2054 : 00 00 | ds 2
78 | 1 lemanoir.s 78 | Empty | 11 | | 0 | 00/2056 |
79 | 1 lemanoir.s 79 | Data | 11 | | 1 | 00/2056 : 01 | proGETPFX dfb $1
80 | 1 lemanoir.s 80 | Data | 11 | | 2 | 00/2057 : 80 02 | da {$280}
81 | 1 lemanoir.s 81 | Empty | 11 | | 0 | 00/2059 |
82 | 1 lemanoir.s 82 | Data | 11 | | 1 | 00/2059 : 03 | proOPEN dfb $3
83 | 1 lemanoir.s 83 | Data | 11 | | 2 | 00/205A : 6E 20 | da pLEJEU ; pathname (par dŽfaut, le moteur)
84 | 1 lemanoir.s 84 | Data | 11 | | 2 | 00/205C : 00 B8 | da {$b800} ; io_buffer
85 | 1 lemanoir.s 85 | Data | 11 | | 1 | 00/205E : 00 | ds 1 ; ref_num
86 | 1 lemanoir.s 86 | Empty | 11 | | 0 | 00/205F |
87 | 1 lemanoir.s 87 | Data | 11 | | 1 | 00/205F : 04 | proREAD dfb $4
88 | 1 lemanoir.s 88 | Data | 11 | | 1 | 00/2060 : 00 | ds 1 ; ref_num
89 | 1 lemanoir.s 89 | Data | 11 | | 2 | 00/2061 : 00 40 | da {$4000} ; data_buffer
90 | 1 lemanoir.s 90 | Data | 11 | | 2 | 00/2063 : 00 00 | ds 2 ; request_count
91 | 1 lemanoir.s 91 | Data | 11 | | 2 | 00/2065 : 00 00 | ds 2 ; transfer_count
92 | 1 lemanoir.s 92 | Empty | 11 | | 0 | 00/2067 |
93 | 1 lemanoir.s 93 | Data | 11 | | 1 | 00/2067 : 01 | proCLOSE dfb $1
94 | 1 lemanoir.s 94 | Data | 11 | | 1 | 00/2068 : 00 | ds 1 ; ref_num
95 | 1 lemanoir.s 95 | Empty | 11 | | 0 | 00/2069 |
96 | 1 lemanoir.s 96 | Data | 11 | | 1 | 00/2069 : 02 | proGETEOF dfb $2
97 | 1 lemanoir.s 97 | Data | 11 | | 1 | 00/206A : 00 | ds 1 ; ref_num
98 | 1 lemanoir.s 98 | Data | 11 | | 3 | 00/206B : 00 00 00 | ds 3 ; eof
99 | 1 lemanoir.s 99 | Empty | 11 | | 0 | 00/206E |
100 | 1 lemanoir.s 100 | Data | 11 | | 9 | 00/206E : 08 44 72 47 | pLEJEU str 'DrGenius'
| | | | | | 65 6E 69 75 |
| | | | | | 73 |
101 | 1 lemanoir.s 101 | Empty | 11 | | 0 | 00/2077 |
------+----------------------+-------------+----+---------+------+-----------------------+-------------------------------------------------------------------