v+1

kikekankoi/apple2/fr/kikekankoi.s

@@ -161,17 +161,17 @@ REPLAY	jsr	initALL
 	cmp	#54
 	beq	:100_OK
 	cmp	#15
-	bne	:105
+	bne	:103
 
-:100_OK	ldx	#2
+:100_OK	lda	#1
-	lda	#1
 	sta	P,x
 
-:105	ldx	#10
+:103	ldx	#10
 	lda	O,x
 	cmp	SALLE
 	beq	:200
-	cmp	#1	; LOGO - was -1
+*	cmp	#1	; LOGO - was -1
+	cmp	#-1
 	beq	:200
 
 	jsr	:2850
@@ -182,10 +182,10 @@ REPLAY	jsr	initALL
 
 	ldx	#3
 	lda	C,x
-	cmp	#0
+	cmp	#1
 	bcs	:200
 	lda	P,x
-	cmp	#1
+	cmp	#2
 	bcs	:200
 	
 *:115	ldx	#9
@@ -205,7 +205,7 @@ REPLAY	jsr	initALL
 
 :2850	ldx	#10
 ]lp	lda	C,x
-	bmi	:2860
+*	bmi	:2860
 	beq	:2860
 	dec	C,x
 :2860	dex
@@ -277,51 +277,10 @@ REPLAY	jsr	initALL
 * 500 - ACCEPTATION COMMANDE
 *-----------------------------------
 
-:500	jmp	:510	; LOGO
+:500	lda	#1
-
-	ldx	#1
-	lda	C,x
-	cmp	#2
-	bcc	:501
-	dec	C,x
-
-:501	ldx	#2
-	lda	C,x
-	cmp	#2
-	bcc	:502
-	dec	C,x
-
-:502	ldx	#4
-	lda	C,x
-	cmp	#2
-	bcc	:503
-	dec	C,x
-
-:503	ldx	#6
-	lda	C,x
-	cmp	#2
-	bcc	:504
-	dec	C,x
-
-:504	ldx	#10
-	lda	O,x
-	cmp	SALLE
-	beq	:505
-	cmp	#-1
-	bne	:510
-
-:505	ldx	#3
-	lda	C,x
-	cmp	#2
-	bcc	:510
-	dec	C,x
-
-*---
-
-:510	lda	#1
 	sta	T
-	lda	#0
+*	lda	#0
-	sta	N
+*	sta	N
 	jmp	:1000
 
 :550	jsr	:2850
@@ -569,12 +528,11 @@ tbl1500	da	:1500,:1510,:1520,:1530,:1540
 
 :1520	ldx	N
 	lda	O,x
-	bpl	:1525
+	cmp	SALLE
-*	cmp	SALLE
+	bne	:1525
-*	bne	:1525
 	rts
-:1525	cmp	SALLE	; #-1
+:1525	lda	O,x	; #-1
-	bne	:1527
+	bpl	:1527
 	rts
 :1527	lda	#1
 	sta	OK
@@ -595,8 +553,6 @@ tbl1500	da	:1500,:1510,:1520,:1530,:1540
 
 :1540	ldx	N
 	lda	P,x
-*	cmp	#1
-*	bne	:1545
 	beq	:1545
 	lda	#1
 	sta	OK
@@ -2181,9 +2137,9 @@ Z	ds	1
 lenSTRING	ds	1
 TEMPS	ds	2	; le temps = 5000
 
-C	ds	21+1
+C	ds	41+1
 E$	ds	32	; the longest string
-P	ds	21+1
+P	ds	41+1
 X$1	ds	4+1	; premier mot saisi
 X$2	ds	4+1	; second mot saisi
 

kikekankoi/apple2/fr/solution tilt.txt

@@ -0,0 +1,67 @@
+E
+E
+E
+PRENDRE SEAU
+O
+O
+O
+D
+O
+PRENDRE SABLE
+E
+PRENDRE BARQUE
+PRENDRE BOUTEILLE
+RAME
+POSER BARQUE
+E
+E
+N
+N
+PRENDRE DELTA
+S
+S
+O
+O
+O
+LANCER SABLE
+O
+N
+N
+ENTRER TRAITEUR
+VENDRE DELTA
+SORS
+O (PRENDRE MAILLET ?)
+S
+ENTRER MEDECIN
+PRENDRE ASPIRINE
+AVALER ASPIRINE
+PRENDRE MASQUE
+METS MASQUE
+CASSER BOUTEILLE
+PRENDRE DEBRIS
+SORS
+ENTRER CHAUSSEUR
+ACHETER ESPADRILLES
+SORS CHAUSSEUR
+E
+S
+ENTRER TAILLEUR
+ACHETER ROBE
+SORS TAILLEUR
+E
+E
+PRENDRE BROCHE
+POSER ESPADRILLES
+ENTRER TEMPLE
+O
+PRENDRE BOMBE
+E
+O
+DELIVRER FILLE
+DONNER VETEMENTS
+S
+E
+E
+S
+CREUSER MUR
+>> FIN

kikekankoi/xavsnap/KKKK_a2_final.bas

@@ -1,8 +1,8 @@
 0  GOTO 8900
 1  REM
 10  HOME 
-19  DIM S(21): REM POINTEURS
+19  DIM P(21): REM POINTEURS
-REM S(1)=ITEM INVENTAIRE (5 MAX)
+REM P(1)=ITEM INVENTAIRE (5 MAX)
 20  DIM C(21): REM COMPTEURS
 30 SALLE = 1
 40  DIM P$(2)
@@ -11,12 +11,12 @@ REM S(1)=ITEM INVENTAIRE (5 MAX)
 70 PO(X) = Q(X)
 80  NEXT X
 100 REM ********* (Affichage Salle 1) **********
-101 S(2)=0
+101 P(2)=0
-102 IF SALLE=10 OR SALLE=22 OR SALLE=54 OR SALLE=15 THEN S(2)=1
+102 IF SALLE=10 OR SALLE=22 OR SALLE=54 OR SALLE=15 THEN P(2)=1
 103 IF O(10)=SALLE OR O(10)=1 THEN 200
 105 GOSUB 2850 : REM 110  IF C(2) THEN C(2) = C(2) - 1
-110  IF S(2) = 0 THEN 200
+110  IF P(2) = 0 THEN 200
-120  IF C(3) > 0 OR S(3)>1 THEN 200
+120  IF C(3) > 0 OR P(3)>1 THEN 200
 130 PRINT "Il fait trop sombre pour voir quelque "
 135 PRINT "chose...":PRINT "peut etre faudrait-il allumer"
 150  GOTO 1000
@@ -127,11 +127,11 @@ REM ACTIVE SI OBJET NN INVENTAIRE (4) "D"
 2935  RETURN 
 
 REM ACTIVE SI POINTEUR NN >0 (5) "E"
-2940 OK = (S(N) <  > 0)
+2940 OK = (P(N) <  > 0)
 2945  RETURN 
 
 REM ACTIVE SI POINTEUR NN =0 (6) "F"
-2950 OK = (S(N) = 0)
+2950 OK = (P(N) = 0)
 2955  RETURN 
 
 REM ACTIVE SI COMPTEUR NN =1 (7) "G"
@@ -188,13 +188,13 @@ REM INVENTAIRE (1) "A"
 
 REM PREND (2) "B"
 4100 OK=0
-4110 IF S(1) < 5 THEN 4140 
+4110 IF P(1) < 5 THEN 4140 
 4120 PRINT "Vous ne pouvez porter plus."
 4130 OK=1
 4135  RETURN 
 4140  IF PO(N) =  - 1 THEN 4180
 4150 PO(N) =  - 1
-4160 S(1) = S(1) + 1
+4160 P(1) = P(1) + 1
 4170  RETURN
 4180  PRINT "Vous l'avez deja."
 4190  GOTO 4130
@@ -204,7 +204,7 @@ REM POSE (3) "C"
 4210 PRINT "Vous n'avez pas ";O$(N)
 4220 GOTO 5110 
 4240 PO(N) = SALLE
-4250 S(1) = S(1) - 1
+4250 P(1) = P(1) - 1
 4260 PRINT "D'acccord."
 4270 RETURN 
 
@@ -229,11 +229,11 @@ REM MESSAGE (4) "D"
 4320 RETURN 
 
 REM ACTIVE LE POINTEUR N (5) "E"
-4400 S(N) = 1
+4400 P(N) = 1
 4410  RETURN 
 
 REM DESACTIVE LE POINTEUR N (6) "F"
-4500 S(N) = 0
+4500 P(N) = 0
 4510  RETURN 
 
 REM  FIXE LE COMPTEUR (-) NN A MM (7) "G"
@@ -253,7 +253,7 @@ REM  POSE OBJET NN DANS LA SALLE EN COURS (9) "I"
 4810  RETURN 
 
 REM MET LE NO DE SALLE CONTENANT L OBJET NN A 0 (10) "J"
-4900  IF PO(N) < 0 THEN S(1) = S(1) - 1
+4900  IF PO(N) < 0 THEN P(1) = P(1) - 1
 4910 PO(N) = 0
 4920  RETURN