Ca avance

cauchemardhouse/fr/_FileInformation.txt

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

cauchemarhouse/fr/_FileInformation.txt

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

cauchemarhouse/fr/cauchemarhouse.s

@@ -1530,22 +1530,25 @@ tblV	dfb	$bd
 
 *---
 
-nbO	=	1
+nbO	=	12
 
 refO	dfb	$bd
-	dfb	00,00
+	dfb	1,1,2,0,3,5
+	dfb	6,0,6,0,8,0
 
 O	dfb	$bd
-	dfb	00,00
+	dfb	1,1,2,0,3,5
+	dfb	6,0,6,0,8,0
 
 *---
 
 refO$	da	$bdbd	; see :3300
-	da	O$1,O$2
+	da	O$1,O$2,O$3,O$4,O$5,O$6
+	da	O$7,O$8,O$9,O$10,O$11,O$12
 	
 tblO$	da	$bdbd
-	da	O$1,O$2
-
+	da	O$1,O$2,O$3,O$4,O$5,O$6
+	da	O$7,O$8,O$9,O$10,O$11,O$12
 
 *---
 
@@ -1553,18 +1556,19 @@ M	=	8
 
 tblM$	da	$bdbd
 	da	M$1,M$2,M$3,M$4,M$5,M$6,M$7,M$8
-M$1	dfb	00
+	
+M$1	dfb	01,02,00
 M$2	dfb	00
-M$3	dfb	00
+M$3	dfb	02,02,00
 M$4	dfb	00
 M$5	dfb	00
-M$6	dfb	00
-M$7	dfb	00
-M$8	dfb	00
+M$6	dfb	04,05,00
+M$7	dfb	03,05,04,08,00
+M$8	dfb	03,02,00
 
 *--- On commence ˆ index 0
 
-AA	=	75
+AA	=	72
 
 tblA$	da	$bdbd
 	da	A$1,A$2,A$3,A$4,A$5,A$6,A$7,A$8,A$9,A$10
@@ -1649,7 +1653,8 @@ A$70	str	"B11.C11L."
 A$71	str	"A08E25.K07O."
 A$72	str	"E16B08.C08L."
 
-tblA	dfb	19,24
+tblA	dfb	0,0
+	dfb	19,24
 	dfb	19,23
 	dfb	41,24
 	dfb	41,23
@@ -1725,12 +1730,27 @@ tblA	dfb	19,24
 	
 *--- On commence ˆ index 0
 
-nbC	=	1
+nbC	=	15
 
 tblC$	da	$bdbd
-	da	C$1
+	da	C$1,C$2,C$3,C$4,C$5,C$6,C$7,C$8,C$9,C$10
+	da	C$11,C$12,C$13,C$14,C$15
 	
-C$1	str	"."
+C$1	str	"A02F18.E10D05."
+C$2	str	"A04E14.E17D10."
+C$3	str	"A05E12.D32."
+C$4	str	"A05F12.D33."
+C$5	str	"A07F16.D16Q."
+C$6	str	"A07B06.D14Q."
+C$7	str	"E14F20.G0404E20F21."
+C$8	str	"F14E20.E21."
+C$9	str	"G04F21.H11F14E15D27."
+C$10	str	"A02F06.D35."
+C$11	str	"A02E06.D34."
+C$12	str	"A02E09.D36."
+C$13	str	"A05E13.D36."
+C$14	str	"A08E25.D37."
+C$15	str	".N."
 
 *-----------------------------------
 

cauchemarhouse/fr/fr.s

@@ -136,7 +136,7 @@ strINSTR	asc	8D"La liste des instructions ? "00
 
 strINSTR2	asc	8D8D
 	asc	"Vous voici arrive dans"8D
-	asc	"      Cauchemard House..."8D
+	asc	"      Cauchemar House..."8D
 	asc	8D
 	asc	"Pour converser avec l"A7"ordinateur, il"8D
 	asc	"faut rentrer les ordres en 1 ou 2 mots"8D
@@ -182,11 +182,11 @@ strLEMANOIR
 	asc	" vous a enleve pour vous faire tester..."
 	asc	8D8D
 	
-	asc	"@@@ @@@ @ @ @@@ @ @ @@@ @  @ @@@ @@@ @@ "
-	asc	"@   @ @ @ @ @   @ @ @   @@@@ @ @ @ @ @ @"
-	asc	"@   @@@ @ @ @   @@@ @@  @ @@ @@@ @@  @ @"
-	asc	"@   @ @ @ @ @   @ @ @   @  @ @ @ @ @ @ @"
-	asc	"@@@ @ @ @@@ @@@ @ @ @@@ @  @ @ @ @ @ @@ "
+	asc	"@@@ @@@ @ @ @@@ @ @ @@@ @   @ @@@ @@@"8D
+	asc	"@   @ @ @ @ @   @ @ @   @@ @@ @ @ @ @"8D
+	asc	"@   @@@ @ @ @   @@@ @@  @ @ @ @@@ @@ "8D
+	asc	"@   @ @ @ @ @   @ @ @   @   @ @ @ @ @"8D
+	asc	"@@@ @ @ @@@ @@@ @ @ @@@ @   @ @ @ @ @"8D
 	asc	8D
 	asc	"            @ @ @@@ @ @ @@@ @@@"8D
 	asc	"            @ @ @ @ @ @ @   @  "8D
@@ -260,16 +260,18 @@ V$75	str	"CASSE"	; Apple II
 * OBJETS
 *-----------------------------------
 
-O$1	asc	""00
-O$2	asc	""00
-O$3	asc	""00
-O$4	asc	""00
-O$5	asc	""00
-O$6	asc	""00
-O$7	asc	""00
-O$8	asc	""00
-O$9	asc	""00
-O$10	asc	""00
+O$1	asc	"pistolet laser"00
+O$2	asc	"outils"00
+O$3	asc	"combinaison"00
+O$4	asc	"combinaison mise"00
+O$5	asc	"flacon d"A7"acide"00
+O$6	asc	"boite noire"00
+O$7	asc	"gourde"00
+O$8	asc	"gourde vide"00
+O$9	asc	"cassette"00
+O$10	asc	"cassette effacee"00
+O$11	asc	"lampe"00
+O$12	asc	"lampe allumee"00
 
 *-----------------------------------
 * STRINGS

cauchemarhouse/zx81/Variables.txt

@@ -0,0 +1,235 @@
+Variables Resident in Memory : 
+
+Q : For-Next
+           Q = 27
+DIM Q(12)  
+Q(1) =      1
+Q(2) =      1
+Q(3) =      2
+Q(5) =      3
+Q(6) =      5
+Q(7) =      6
+Q(9) =      6
+Q(11) =     8
+
+DIM O$(12,16)
+           
+O$(1) =    "PISTOLET LASER"
+O$(2) =    "OUTILS"
+O$(3) =    "COMBINAISON"
+O$(4) =    "COMBINAISON MISE"
+O$(5) =    "FLACON D"ACIDE"
+O$(6) =    "BOITE NOIRE"
+O$(7) =    "GOURDE"
+O$(8) =    "GOURDE VIDE"
+O$(9) =    "CASSETTE"
+O$(10) =   "CASSETTE EFFACEE"
+O$(11) =   "LAMPE"
+O$(12) =   "LAMPE ALLUMEE"
+X : For-Next
+           X =-1
+V =         47
+DIM V$(47,6)
+           
+V$(1) =    "01NORD"
+V$(2) =    "02OUES"
+V$(3) =    "03EST"
+V$(4) =    "04SUD"
+V$(5) =    "05VAIS"
+V$(6) =    "061"
+V$(7) =    "072"
+V$(8) =    "083"
+V$(9) =    "09TIRE"
+V$(10) =   "10BRAN"
+V$(11) =   "11PRIS"
+V$(12) =   "12APPU"
+V$(13) =   "13BOUT"
+V$(14) =   "14INTR"
+V$(15) =   "15CASS"
+V$(16) =   "16RIEN"
+V$(17) =   "18VOIE"
+V$(18) =   "17DESC"
+V$(19) =   "19PREN"
+V$(20) =   "20FLAC"
+V$(21) =   "21GOUR"
+V$(22) =   "22COMB"
+V$(23) =   "23PIST"
+V$(24) =   "24OUTI"
+V$(25) =   "25KKKK"
+V$(26) =   "26ALLU"
+V$(27) =   "27LAMP"
+V$(28) =   "29MANE"
+V$(29) =   "30LEVI"
+V$(30) =   "31BOIT"
+V$(31) =   "32ECLA"
+V$(32) =   "33OEIL"
+V$(33) =   "34TAPE"
+V$(34) =   "35FORM"
+V$(35) =   "36REPA"
+V$(36) =   "37MOTE"
+V$(37) =   "38ORQU"
+V$(38) =   "39DECR"
+V$(39) =   "40INVE"
+V$(40) =   "41POSE"
+V$(41) =   "42LANC"
+V$(42) =   "43ENFI"
+V$(43) =   "44ETEI"
+V$(44) =   "45BOIS"
+V$(45) =   "46POUS"
+V$(46) =   "47AMEN"
+V$(47) =   "48CODE"
+R =         8
+DIM M$(8,32)
+           
+M$(1) =    "010200"
+M$(2) =    "00"
+M$(3) =    "020200"
+M$(4) =    "00"
+M$(5) =    "00"
+M$(6) =    "040500"
+M$(7) =    "0305040800"
+M$(8) =    "030200"
+C =         15
+DIM C$(15,21)
+           
+C$(1) =    "A02F18.E10D05."
+C$(2) =    "A04E14.E17D10."
+C$(3) =    "A05E12.D32."
+C$(4) =    "A05F12.D33."
+C$(5) =    "A07F16.D16Q."
+C$(6) =    "A07B06.D14Q."
+C$(7) =    "E14F20.G0404E20F21."
+C$(8) =    "F14E20.E21."
+C$(9) =    "G04F21.H11F14E15D27."
+C$(10) =   "A02F06.D35."
+C$(11) =   "A02E06.D34."
+C$(12) =   "A02E09.D36."
+C$(13) =   "A05E13.D36."
+C$(14) =   "A08E25.D37."
+C$(15) =   ".N."
+A =         75
+DIM A$(75,31)
+           
+A$(1) =    "1924B02.B02L."
+A$(2) =    "1923B01.B01L."
+A$(3) =    "4124B02.C02L."
+A$(4) =    "4123B01.C01L."
+A$(5) =    "1011A02F06.E06D31N."
+A$(6) =    "1415A02B09.C09E07L."
+A$(7) =    "1207A02E07F08.E09D19N."
+A$(8) =    "1206A02E07.E08D26N."
+A$(9) =    "0938A02E10.D03Q."
+A$(10) =   "1213A02E10.D04F10E18N."
+A$(11) =   "1213A02F10.L."
+A$(12) =   "4224A02B02.C02L."
+A$(13) =   "1922B03.B03L."
+A$(14) =   "0100E10A02.D02Q."
+A$(15) =   "0300E10A02.D02Q."
+A$(16) =   "0400E10A02.D02Q."
+A$(17) =   "0201E10A02.D12Q."
+A$(18) =   "0200A02E09.K08O."
+A$(19) =   "0400F10A02.K01O."
+A$(20) =   "0300F10A02.K03O."
+A$(21) =   "0100F10A02.K05O."
+A$(22) =   "1920B05.D18Q."
+A$(23) =   "4322D03.H03E11L."
+A$(24) =   "4122B03F11.C03L."
+A$(25) =   "4122E11B04.H03C03L."
+A$(26) =   "0508A03.D06Q."
+A$(27) =   "0506A03.D07Q."
+A$(28) =   "0507A03.D08K04O."
+A$(29) =   "0508A03.D06Q."
+A$(30) =   "1700A04.D09Q."
+A$(31) =   "0508A04.D06Q."
+A$(32) =   "1600A04.E12D38K05O."
+A$(33) =   "3637B02.D11Q."
+A$(34) =   "3637C02.D28N."
+A$(35) =   "4000.A00."
+A$(36) =   "3900.O00."
+A$(37) =   "1931B06.B06L."
+A$(38) =   "4131B06.C06L."
+A$(39) =   "0100E12A05F11.D13Q."
+A$(40) =   "0400E12A05F11.D13Q."
+A$(41) =   "2627A08F14F15.D25Q."
+A$(42) =   "0200E12A05F11.D13Q."
+A$(43) =   "0100F12A05.K06O."
+A$(44) =   "0400F12A05.F12K02O."
+A$(45) =   "0200F12A05E13.K07O."
+A$(46) =   "0100E11A05.F12K06O."
+A$(47) =   "0400E11A05.F12K02O."
+A$(48) =   "0200E11A05E13.K07O."
+A$(49) =   "3233E14A05.D19E13N."
+A$(50) =   "2627B11F15F14.H11E14L."
+A$(51) =   "4427E14B12.FX4H11L."
+A$(52) =   "1921B07.B07L."
+A$(53) =   "1915B09.B09L."
+A$(54) =   "4121B07.C07K."
+A$(55) =   "4115B09.C09L."
+A$(56) =   "4521B07.H07E16L."
+A$(57) =   "0200A06.D01Q."
+A$(58) =   "0300A06.D12Q."
+A$(59) =   "0930A06.D21Q."
+A$(60) =   "4630A06.D21Q."
+A$(61) =   "1700A06.D20Q."
+A$(62) =   "4629A07.D17Q."
+A$(63) =   "0929A07.D15Q."
+A$(64) =   "4630A07.D30Q."
+A$(65) =   "1213A07.D30Q."
+A$(66) =   "1927B11.B11L."
+A$(67) =   "4127B11.C11L."
+A$(68) =   "1448A08E17.D19D37E25N."
+A$(69) =   "1448A08F17.D29N."
+A$(70) =   "4127B11.C11L."
+A$(71) =   "0100A08E25.K07O."
+A$(72) =   "4121E16B08.C08L."
+SALLE =     4
+U : For-Next
+           U = 22
+F : For-Next
+           F = 0
+T =         1
+CP =        7
+E =         16
+TYPE =      5
+N =         20
+OK =        1
+CORRESP =   1
+BREAK =     0
+Y =         10
+W : For-Next
+           W = 2
+FIN =       1
+Q : For-Next
+           Q = 1
+Z =         1
+Q$=        ""
+O =         12
+DIM S(25)  
+S(1) =      2
+S(11) =     1
+S(14) =     1
+S(17) =     1
+S(18) =     1
+S(20) =     1
+DIM C(5)   
+C(4) =      4
+DIM P$(2,2)
+P$(1) =    "26"
+P$(2) =    "27"
+DIM O(12)  
+O(1) =      1
+O(2) =      1
+O(4) =     -1
+O(5) =      3
+O(6) =      5
+O(7) =      6
+O(9) =      6
+O(12) =    -1
+DIM W$(4)  
+W$(1) =    "L" (49)
+W$(2) =    "A" (38)
+W$(3) =    "M" (50)
+W$(4) =    "P" (53)
+T$=        "00"
+Y$=        "27"
+E$=        "E14F20.G0404E20F2X."