[83] HERSSAHE v4.0 rpg

Page 1 sur 3 1, 2, 3  Suivant

Voir le sujet précédent Voir le sujet suivant Aller en bas

[83] HERSSAHE v4.0 rpg

Message par persalteas le Jeu 2 Sep - 6:49

Edit Alexis: Double post voir plus autorisé sur ce topic.

VERSION 4.0 TERMINEE!
vous vous souvenez surement de HERSSAHE version 3, mon rpg graphique d'avant.
j'ai l'honneur de vous présenter la version 4.0, a coté de laquelle la 3.0 est vachement nulle.

le jeu est bien plus fluide.
j'ai rajouté 3 nouvelles attaques, les attaques ne se débloquent plus tout les 100 mais tout les 50 d'xp.
j'ai rajouté 1 mission, une lettre de facture, des herbes qui poussent dans le paysage (et qui ont temporairement empêché les arbres de pousser mais c'est réglé xD)

le joueur débutant n'a plus 100 de vie, 50 d'attaque et 50 de défense mais 500 de vie, 50 d'attaque et 100 de défense, ça permet que le jeu si=oit moins difficile au début.

lien de téléchargement:
[Vous devez être inscrit et connecté pour voir ce lien]
AMUSEZ VOUS BIEN!!

ah, oui, il fait 19400 octets de programmes, mais quand vous saurez y jouer vous n'aurez plus besoin de ZREGLES, les regles du jeu, et ça vous libérera 2000 oct.
comptez ensuite 908 oct. par monde créé et 285 oct. par joueur créé.
le programme a besoin de 3000 de ram libre pour pouvoir tourner minimum.

programme compatible avec Ti 82 stats, Ti 82 stats.fr , Ti 83 , Ti 83+ , Ti 83+ SE pour les 86,89 et Nspire je sais pas, mais 86 y'a très peu de chance que ça marche.ça ne fonctionne pas sur 84+ ou 84+SE.

bien sur vous excusez mon imagination de merde pour les noms d'attaques et de sorts absolument pourris.

pour les suicidaires: voilà les codes qui vont arriver petit a petit:


prgmHERSSAHE

Spoiler:

Code:

:If Q=555:Goto 00
:If Q=7614:prgmZ1FOIS
:If Q=8998 or Q=124421:prgmZTERSACR
:If Q=123321 or Q=1221:prgmZSAUVER
:AxesOff
:FnOff
:Horiz
:Full
:Normal
:Float
:0→Xmin
:0→Ymin
:5→Xmax
:4→Ymax
:1→Xscl
:1→Yscl
:GridOn
:Line(0,0,5,0,0
:StorePic 1
:GridOff
:94→Xmax
:62→Ymax
:Disp persalteas GAMES","","    Herssahe","","  Virtua1 ROLE","PLAYING GAME 4.0
:For(K,1,200:End
:ClrHome
:Circle(47,30,29
:If getKey:Goto GH
:Circle(47,30,23
:If getKey:Goto GH
:Line(25,26,40,26
:Line(42,28,44,38
:Line(45,39,47,40
:Line(48,40,50,39
:Line(51,38,54,28
:Line(54,27,56,25
:Line(56,25,69,25
:Pt-On(41,27
:Circle(47,19,4
:Text(16,32,"HERSSAHE
:Text(0,0,"BUISNESS
:Text(0,62,"ET BASTON
:Text(57,60,"LOADING...
:If getKey:Goto GH
:Shade(0,7
:Lbl GH
:Menu("PARTIE","EN COURS",BX,"CREER ELEMENT",A,"INSTRUCTIONS",GJ,"QUITTER",B2
:Lbl GJ
:prgmZREGLES
:Goto GH
:Lbl A
:Menu("NOUVEAU","MONDE",C,"PERSONNAGE",D
:Lbl C
:1→K:prgmZTERSACR
:Goto GH
:Lbl D
:2→K:prgmZTERSACR
:Goto GH
:Lbl BX
:DelVar L5DelVar L6
:ClrHome
:Disp "TAPEZ [2NDE]+","[stats] PUIS","SELECTIONNEZ LE","JOUEUR SOUHAITE
:Output(7,1,"RETOUR:  TAPEZ  {0,0}
:Input L6
:If L6(1)=0:Goto GH
:ClrHome
:{1,1→dim([J]
:Disp "TAPEZ [MATRICE]","ET SELECTIONNEZ","LE MONDE CHOISI:
:Output(7,1,"RETOUR:  TAPEZ  [[0]]
:Input [J]
:If [J](1,1)=0:Goto GH
:ClrHome
:L6(15→V
:L6(16→W
:L6(17→Z
:L6(18→Θ
:Lbl 00
:prgmZTERSAFC
:16Θ+9→R:18Z-7→S
:Repeat 0
:
:getKey→K
:If K=24 and (V≠1 or Z>1):Then
:Text(62-R,S,"    "
:Z-1→Z
:End
:If K=25 and (W≠10 or Θ<3):Then
:Text(62-R,S,"    "
:Θ+1→Θ
:If Z=4 and Θ=2 and A=1:91→A
:End
:If K=26 and (V≠10 or Z<5):Then
:Text(62-R,S,"    "
:Z+1→Z
:End
:If K=34 and (W≠1 or Θ>1):Then
:Text(62-R,S,"    "
:Θ-1→Θ
:End
:16Θ+9→R
:18Z-7→S
:If K=45:Then
:Menu("SAUVEGARDER?","OUI",B1,"NON",B2
:Lbl B1
:1→K
:prgmZSAUVER
:Lbl B2
:2→K
:prgmZSAUVER
:End
:If Z<1:Then
:5→Z:99→K
:V-1→V
:End
:If Θ>3:Then
:1→Θ:99→K
:W+1→W
:End
:If Θ<1:Then
:3→Θ:99→K
:W-1→W
:End
:If Z>5:Then
:1→Z:99→K
:V+1→V
:End
:If K=99:Then
:0→A:16Θ+9→R
:0→B:18Z-7→S
:prgmZTERSAFC
:End
:Text(62-R,S,"X
:Text(57,0,"LONGITUDE=",V,"   
:Text(57,50,"LATITUDE=",W,"   
:If V=10 and W=10 and Z=4 and Θ=2:Then
:If L6(23:prgmZ1FOIS
:If L6(23:Goto 42
:If L6(4)=9:10→L6(4
:If L6(4)=10:prgmZ1FOIS
:Menu("GO NEXT LEVEL?","YES",41,"NO",42)
:Lbl 41
:L6(4)+1→L6(4
:15→L:0→F
:prgmZFENETRE
:Text(20,35,"LEVEL ",L6(4
:Pause
:prgmZFENETRE
:Lbl 42
:prgmZTERSAFC
:3→Z
:End
:If A=2 and Z=C and Θ=D:prgmZPETITFC
:If A=91:prgmZMAISON
:If B=3 and Z=C and Θ=D:prgmZCOMBATS
:If K=44 and L6(12)>0:prgmZPETITFC
:2→K
:fPart(.01L6(24→K
:If L6(24) and (K=.5 or not(K:prgmZ1FOIS
:If Z=4 and Θ=2 and V=1 and W=1:prgmZPETITFC
:End

prgmZ1FOIS

Spoiler:

:If Q=7614:Goto 5
:If L6(24)=50
:"CHOCKED→Str1
:If L6(24)=100
:"DESTROY→Str1
:If L6(24)=150
:"SISMIK→Str1
:If 200=L6(24
:"REVERSE→Str1
:If 250=L6(24
:"DESTRUKT→Str1
:If 300=L6(24
:"KONFUZ→Str1
:2→F
:fPart(.01L6(24→F
:If L6(24) and (F=.5 or not(F:Then
:L6(24)+1→L6(24
:0→F
:20→L
:prgmZFENETRE
:Text(15,20,"ATTAQUE ",Str1
:Text(22,15,"----DEBLOQUEE----
:For(K,0,1500:End
:DelVar Str1
:prgmZFENETRE
:End
:If V=10 and W=10 and Z=4 and Θ=2 and L6(23:Then
:30→L:0→F
:prgmZFENETRE
:Text(10,14,"VOUS NE POUVEZ PAS!
:Text(17,12,"VOUS AVEZ ENCORE UNE
:Text(24,18,"MISSION EN COURS!!
:Pause
:prgmZFENETRE
:prgmZTERSAFC
:End
:If L6(4)=10:Then
:For(K,1,100
:Pt-On(randInt(0,94),randInt(0,62)
:End
:38→L:0→F
:prgmZFENETRE
:Text(10,10,"JEU TERMINE
:Text(20,6,"BRAVO ET FELICITATIONS
:Text(27,6,"VOTRE AVATAR EST LE PLUS
:Text(34,10,"PUISSANT D'HERSSAHE!
:For(K,1,3000:End
:0→J
:If Q=7614:5→J
:7614→Q
:If J=5:0→Q
:"ECRIVEZ LE NOM DE VOTRE AVATARICI:
:DelVar ᴸ
:"EFFACEZ LE NOMET COMMENCEZ UNENOUVELLE PARTIE!
:
:End

alexis, si j'ai pris le droit de faire un double post, c'est que le message commence à être long pour quand je chercherai des erreurs...
j'ai pas mis la balise code c'est fait exprès pour activer le html.

mais bon...
si tu insistes...

prgmZCOMBATS , le plus long:
Spoiler:

:For(R,0,7
:Line(0,R,94,R,0
:End
:30→dim(L5
:randInt(1,1000L6(4→L5(1
:randInt(1,200L6(4→L5(2
:randInt(1,200L6(4→L5(3
:randInt(1,100→L5(19
:randInt(1,80L6(4→L5(24
:L5(1→L5(18
:"Θ→Str1
:"X→Str2
:L6→L3
:L5→L6
:L3→L5
:Z→N:Θ→O:2→F:1→G
:Text(57,0,"ENGAGEZ LE COMBAT!
:Lbl T
:F→K
:If M=118008:prgmZTERSAFC
:K→F
:Str1→Str3
:Str2→Str1
:Str3→Str2
:N→J:O→K
:Z→N:Θ→O
:J→Z:K→Θ
:L6→L3
:L5→L6
:L3→L5
:0→R:0→K
:0→M
:‾G→G
:F+G→F
:53-16Θ→I
:18Z-7→J
:53-16O→D
:18N-7→E
:Lbl 1
:If F=1:Then
:getKey→K
:If 3-R:Then
:If (K≥24 and K≤26) or K=34:Then
:Text(I,J-2,"
:Text(I-5,J-2,"
:R+1→R
:End
:Z+(K=26 and Z<5)-(K=24 and Z>1→Z
:Θ+(K=25 and Θ<3)-(K=34 and Θ>1→Θ
:End
:Else
:If not(R:randInt(0,6→R
:For(C,0,R
:randInt(1,4→K
:Text(I,J-2,"
:Text(I-5,J-2,"
:Z+(K=1 and Z<5)-(K=2 and Z>1→Z
:Θ+(K=3 and Θ<3)-(K=4 and Θ>1→Θ
:53-16Θ→I
:18Z-7→J
:Text(I,J,"Θ
:Text(I-5,J-2,L6(1
:Text(D,E,"X
:Text(D-5,E-2,L5(1
:For(P,1,300:End
:End
:Lbl 1A
:randInt(1,9→K
:If (K=4 and L6(24)<50) or K=5 or (K=6 and L6(24)<150) or (K=7 and L6(24)<200) or K=8 or (K=9 and L6(24)<300:Goto 1A
:If K>3 and K<7:K+78→K
:If K>6 and K<10:K+65→K
:If K<4:K+91→K
:End
:62-(16Θ+9→I
:18Z-7→J
:62-(16O+9→D
:18N-7→E
:If Z=N and Θ=O
:Text(I,J-2,Str1
:Text(I,J,Str1
:Text(D,E,Str2
:If F=1:Text(57,70,"PM: ",3-R
:Text(I-5,J-2,L6(1
:Text(D-5,E-5,L5(1
:If (K=82 and L6(24)<50) or (K=84 and L6(24)<150) or (K=83 and L6(24)<100) or (K=72 and L6(24)<200) or (K=73 and L6(24)<250) or (K=74 and L6(24)<300:Goto 1
:If (K=65 and not(L6(27))) or (K=75 and not(L6(13))) or (K=85 and not(L6(26))) or (K=95 and not(L6(28))) or (K=105 and not(L6(30:Goto 1
:If K=12:Then
:Output(1,1,"v/i/exp:
:Output(2,1,"att:
:Output(3,1,"dfsexp:
:Output(4,1,"prexpc/i/s:
:Output(5,1,"expXp:
:Output(1,8,L6(1:Output(2,8,L6(2:Output(3,8,L6(3:Output(4,8,L6(19
:Output(5,8,L6(24
:For(K,1,1500:End
:ClrHome
:End
:If K=13:Then
:Output(2,1,"att:
:Output(3,1,"dfsexp:
:Output(1,1,"v/i/exp:
:Output(4,1,"prexpc/i/s:
:Output(5,1,"expXp:
:Output(1,8,L5(1:Output(2,8,L5(2:Output(3,8,L5(3:Output(4,8,L5(19
:Output(5,8,L5(24
:For(K,1,1500:End
:ClrHome
:End
:If K<65:Goto 1
:L6(19)-9(abs(Θ-O)+abs(Z-N))/2→P
:If P<0:0→P
:""→Str3
:If K=92:"BOURRIN→Str3
:If K=93:"PRECISE→Str3
:If K=94:"ENERGIQUE→Str3
:If K=82:"CHOCKED→Str3
:If K=83:"DESTROY→Str3
:If K=84:"SISMIK→Str3
:If K=72:"REVERSE→Str3
:If K=73:"DESTRUKT→Str3
:If K=74:"KONFUZ→Str3
:If fPart(K.1)≠.5 and not(length(Str3:Goto 1
:0→M
:If not(length(Str3:prgmZSORTS
:If M:Goto 3
:Text(57,0,"ATTAQUE ",Str3," !!
:For(R,1,P
:Text(I,J,"°
:randInt(1,100→Q
:If K=74:randInt(1,140→Q
:If K=93:randInt(1,70→Q
:If K=94:randInt(1,125→Q
:Text(I+2,J,"°
:69!
:If Q=51:P+1→R
:End
:If Q=51:Then
:Text(57,0,"TOUCHE!
:L5(1→C
:If K=92:L5(1)-L6(2)(L6(7)+1)+L5(3)(L5(Cool+1→L5(1
:If K=93:iPart(L5(1)-L6(2)-P+L5(3)/(P+1)+L5(19→L5(1
:If K=94:L5(1)-L6(1)-L6(2)+L5(3→L5(1
:If K=82:L5(1)-L6(2)-L6(24)+L5(3)+L5(24→L5(1
:If K=83:Then
:0→J
:For(K,1,100:End
:Output(8,1,"‾
:Output(1,1,"A CHAQUE FOIS QUE VOUS APPUYEZSUR [a1pHa], VOTRE ADVERSAIREPERD 70 POINTS DE VIE.
:For(K,0,800
:If getKey=31:J+70→J
:Output(8,2,J
:End
:L5(1)-J→L5(1
:ClrHome
:End
:If K=84:L5(1)-L6(1)-L6(24)-L6(3)+L5(24)+L5(3→L5(1
:If K=72:Then
:Output(7,1,"1/3 DES DOMMAGESSERA POUR VOUS!
:Input "DOMMAGES ?",P
:L5(1)-P→L5(1
:iPart(L6(1)-P/3→L6(1
:End
:If K=73:iPart(L5(1)-5L6(2)/(1+L5(3)L5(8→L5(1
:If K=74:iPart(L5(1)-.1L5(24)(L5(2)+L5(3→L5(1
:If L5(1)>C:C→L5(1
:If K=92 or K=94 or K=73:Line(J+1,16Θ+9,E+1,16O+9
:If K=94 or K=74:Circle(E,62-D,6
:If K=93 or K=74:Then
:65-D→D
:E-4→E:
:Line(E,D,E+3,D-4
:Line(E-7,D-4,E+3,D-4
:Line(E+4,D-6,E+3,D-11
:Line(E+6,D-6,E+3,D-11
:Line(E+6,D-6,E+11,D-9
:Line(E+8,D-4,E+11,D-9
:Line(E+8,D-4,E+17,D-2
:Line(E+1,D-1,E+17,D-2
:Line(E+1,D-1,E+1,D+5
:Line(E+6,D-1,E+1,D+5
:Line(E+6,D-1,E,D
:End
:If K=82:Then
:For(J,1,10
:Pt-On(E+1,16O+6,3
:Pt-Off(E+1,16O+6
:For(K,1,50:End
:Text(D,E-1,"
:For(K,1,50:End
:End
:End
:If K=84:Then
:StorePic 0
:For(K,1,10
:ClrDraw
:RecallPic 0
:For(J,1,20:End
:End
:DelVar Pic0
:End
:If K=72:Then
:64-D→D
:For(P,1,5
:randInt(1,8→I
:randInt(1,8→J
:Pt-On(E+I,D-J,3
:Pt-On(E-I,D+I,3
:Pt-On(E+J,D+I,3
:Pt-On(E-J,D-I,3
:End
:For(I,1,400:End
:End
:If K=73:Then
:Text(D,E-3,"(
:Text(D,E+5,")
:For(P,1,30
:Text(D,E,Str2
:69!
:Text(D,E-1,"
:69!
:End
:End
:118008→M
:Else
:Text(57,0,"LOUPE!
:For(R,1,200:End
:118008→M
:End
:If F=1 and 0≥L5(1:Then
:20→L:0→F
:prgmZFENETRE
:Text(20,40,"GAGNE!
:For(A,1,200:End
:prgmZFENETRE
:‾1→[J](11-W,V
:randInt(0,5L6(4→D
:randInt(0,5L6(4→E
:randInt(0,200L6(4→G
:E+L6(5→L6(5
:E+L6(7→L6(7
:D+L6(8→L6(8
:D+L6(6→L6(6
:G+L6(11→L6(11
:G+L6(14→L6(14
:30→L:0→F:prgmZFENETRE
:Text(8,8,"EN DEPOUILLANT VOTRE
:Text(14,8,"ENNEMI, VOUS TROUVEZ:
:Text(21,10,E," ARMES ATT.
:Text(30,10,D,"ARMES DEF.
:Text(21,55,G," DEKES
:Pause
:prgmZFENETRE
:L6(24→E
:1+iPart(.01L5(18→F
:If E<50 and E+F>50:50-F→E
:If E<100 and E+F>100:100-F→E
:If E<150 and E+F>150:150-F→E
:If E<200 and E+F>200:200-F→E
:If E<250 and E+F>250:250-F→E
:If E<300 and E+F>300:300-F→E
:E+F→L6(24
:0→F
:7777→M:0→B:0→A
:End
:If F=2 and 0≥L5(1:Then
:30→L:0→F:prgmZFENETRE
:Text(15,40,"PERDU!
:Text(22,10,"VOUS ETES DEPOUILLE.
:Pause
:prgmZFENETRE
:L5→L6
:L6(5)-L6(7→L6(5
:L6(6)-L6(8→L6(6
:L6(11)-L6(14→L6(11
:L6(9)-L6(12→L6(9
:L6(10)-L6(13→L6(10
:0→L6(7
:0→L6(8
:0→L6(14
:0→L6(12
:0→L6(13
:7777→M:0→A:0→B
:1→L6(1
:End
:Lbl 3
:For(R,0,7
:Line(0,R,94,R,0
:End
:0→R
:If M=118008:Goto T
:If M=7777:Goto 2
:Goto 1
:Lbl 2
:DelVar Str1DelVar Str2DelVar Str3DelVar L5
:ClrDraw
:prgmZTERSAFC


prgmZFENETRE , le plus court:
Spoiler:

Code:

:If F:Then
:ClrDraw
:RecallPic 0
:0→F
:DelVar Pic0
:Else
:StorePic 0
:.5(78-L→K
:Line(5,K-1,90,K-1
:For(J,K,L+K
:Line(5,J,90,J,0
:End
:Line(5,K+L+1,90,K+L+1
:Line(5,K-1,5,K+L+1
:Line(90,K-1,90,K+L+1
:1→F:End

et prgmZMAISON:

Spoiler:

:If not(randInt(0,3:L6(25)+1→L6(25
:Lbl 0
:ClrDraw
:Line(0,62,20,54
:Line(94,62,74,54
:Line(20,54,74,54
:Line(20,8,0,0
:Line(20,8,20,54
:Line(20,8,74,8:Line(74,8,79,5
:Line(74,8,74,54
:Line(15,5,15,22
:Line(3,25,15,22
:Line(3,25,3,2
:Line(40,23,50,23
:Line(50,14,50,23
:Line(50,14,40,14
:Line(40,23,40,14
:Line(42,21,48,21
:Line(45,14,45,6
:Text(28,3,"SHOP
:Text(23,26,"BOITE AUX
:Text(31,41,"LETTRES
:Text(41,43,L6(25
:Line(42,21,48,21
:Line(80,2,80,26
:Line(93,23,80,26
:Line(93,23,93,0
:Line(80,2,93,0
:Line(87,24,86,1
:Line(80,26,86,28
:Line(94,27,86,28
:Pt-On(94,24
:Pt-On(88,29
:Pt-On(84,15
:Pt-On(90,14
:Text(18,66,"ARMOIRE
:Lbl 1
:getKey→K
:If K=34 or (K≥24 and K≤26):ClrDraw
:If K=34:Goto 2
:If K=24:Goto 3
:If K=25:Goto 4
:If K=26:Goto 5
:Goto 1
:Lbl 3
:prgmZSHOP
:Goto 0
:Lbl 4
:Line(5,57,37,57
:Line(37,39,37,57
:Line(37,39,5,39
:Line(5,57,5,39
:Line(5,57,20,48
:Line(37,57,20,48
:Text(31,0,"VOUS AVEZ ",L6(25)," LETTRES
:If 0
:getKey→K
:If K=34:Goto 0
:If K=26 and L6(25:Then
:ClrDraw
:Repeat L≠L6(23
:randInt(1,4→L
:End
:L→L6(23
:If L=1:Then
:L6(24→L6(29
:Text(0,15,"CHER MONSIEUR:
:Text(6,0,"EN TANT QUE PRESIDENT DES
:Text(12,0,"MONDES HERSSAHE ET EN
:Text(18,0,"ECHANGE DE L'UTILISATION
:Text(24,0,"QUE VOUS FAITES DE MES SHOP
:Text(30,0,"PRIVES:JE VOUS DONNE POUR
:Text(36,0,"MISSION DE TUER 50 BANDITS
:Text(42,0,"QUI EUX NE LES UTILISENT
:Text(48,0,"PAS. FORTE RECOMPENSE.
:Text(54,29,"LE PRESIDENT
:End
:
:If L=4:Then
:Text(0,35,"FACTURE
:Text(8,0,"DU COUT DE LA VIE"
:Text(18,0,"CE MOIS-CI, VOUS AVEZ
:randInt(1,L6(14→J
:Text(24,0,"DEPENSE ",J," D. EN
:Text(30,0,"NOURRITURE, ENTRETIEN DE
:Text(36,0,"L'EQUIPEMENT ET LOGEMENT.
:Text(50,20,"FACTURE.....",J," DEKES
:L6(14)-J→L6(14
:L6(11)-J→L6(11
:End
:If L=1 or L=4:Then
:Circle(85,6,7
:Circle(85,6,5
:Circle(85,4,1
:Line(87,6,89,6
:Line(81,6,83,6
:Line(84,8,86,8
:Pt-On(86,7
:Pt-On(84,7
:Pt-On(85,9
:Pause
:L6(25)-1→L6(25:ClrDraw
:End
:
:If L=2:Then
:Text(0,15,"CHER MONSIEUR
:Text(6,0,"EN TANT QUE PROPRIETAIRE
:Text(12,0,"DES MONDES HERSSAHE:JE"
:Text(18,0,"PENSE QUE VOUS ETES LE SEUL
:Text(24,0,"ETRE SENSE DE CE MONDE ET JE
:Text(30,0,"VOUS DONNE POUR MISSION DE
:Text(36,0,"VIDER LA CARTE DE TOUS LES
:Text(42,0,"IGNORANTS QUI Y PULLULENT.
:Text(48,0,"MERCI ET FORTE RECOMPENSE.
:Text(56,29,"LE PRESIDENT
:Pause
:L6(25)-1→L6(25:ClrDraw
:End
:
:If L=3:Then
:Text(0,20,"CHER MONSIEUR,
:Text(9,0,"EN TANT QU'HOMME HAUT PLACE
:Text(15,0,"J'AI BESOIN D'UNE GARDE
:Text(21,0,"D'ELITE. JE VOUDRAIS VOUS
:Text(27,0,"RECRUTER. VOTRE MISSION
:Text(33,0,"SERA DE VOUS ENTRAINER.
:Text(39,0,"GAGNEZ 100 D'XP.
:Text(45,0,"TRES BON SALAIRE.(50000 D.)
:Text(51,12,"AMITIES,
:Text(57,8,"LE PRESIDENT D'HERSSAHE
:L6(24→L6(29
:Pause
:L6(25)-1→L6(25
:ClrDraw
:End
:End
:Goto 4
:Lbl 5
:ClrDraw
:Horizontal 0
:Horizontal 62
:Horizontal 20
:Horizontal 40
:Horizontal 3
:Horizontal 59
:Vertical 3
:Vertical 91
:Vertical 0
:Vertical 94
:Line(9,28,17,28
:Line(12,28,12,36
:Line(14,28,14,36
:Line(13,28,13,24
:Pt-On(13,37
:Pt-On(13,27,2
:Line(10,48,7,46
:Line(7,43,7,46
:Line(9,41,7,43
:Line(10,48,15,47
:Line(16,44,15,47
:Line(16,44,14,41
:Line(10,48,9,51
:Line(16,50,9,51
:Line(16,50,13,48
:Pt-On(19,42,2
:Pt-On(22,46,2
:Pt-On(26,43,2
:Text(5,25,"- ",L6(11)-L6(14)," DEKES/",L6(11
:Text(30,25,"- ",L6(5)-L6(7)," ARMES OFF. / ",L6(5
:Text(23,25,"- ",L6(6)-L6(Cool," ARMES DEF. / ",L6(6
:Text(15,41,"T.: ",L6(9)-L6(12
:Text(15,60,"K.: ",L6(10)-L6(13
:Text(45,14,"POUR PUISER DEDANS
:Text(52,4,"TAPEZ[+], POUR DEPOSER[-]
:
:
:Repeat K=85 or K=95 or K=24
:getKey→K
:End
:If K=24:Goto 0
:If K=85:Then
:0→Q:1→E
:Menu("DEPOSER","ARMES ATTAQUE",51,"ARMES DEFENSE",52,"TELEPORTEUR",53,"KILLER",54,"ARGENT",55
:End
:If K=95:Then
:0→Q:0→E
:Menu("PRENDRE","ARMES ATTAQUE",51,"ARMES DEFENSE",52,"TELEPORTEUR",53,"KILLER",54,"ARGENT",55
:End
:Lbl 55
:Q+1→Q
:Lbl 54
:Q+1→Q
:Lbl 53
:Q+4→Q
:Lbl 52
:Q+1→Q
:Lbl 51
:Q+7→Q
:20→L:0→F
:prgmZFENETRE
:If E:Then
:Text(17,27,"VOUS EN AVEZ
:Text(24,29,L6(Q)," SUR VOUS
:Else
:Text(17,10,"IL Y EN A ACTUELLEMENT
:If Q<10:Text(24,10,L6(Q-2)-L6(Q),"DANS CE PLACARD
:If Q>10:Text(24,10,L6(Q-3)-L6(Q),"DANS CE PLACARD
:End
:For(J,1,400:End
:prgmZFENETRE
:If E:Then
:Repeat K≤L6(Q
:ClrHome
:Input "COMBIEN ? ",K
:End
:L6(Q)-K→L6(Q)
:Else
:Lbl 5G
:ClrHome
:Input "COMBIEN ? ",K
:If (K>L6(Q-2) and Q<10) or (Q>L6(Q-3) and Q>10):Goto 5G
:K+L6(Q→L6(Q
:End
:
:Goto 5
:Lbl 2
:prgmZTERSAFC
:1→A:1→Θ

prgmZPETITFC

Spoiler:

:If Z=C and Θ=D:Then
:randInt(1,100→C
:C+L6(11→L6(11
:C+L6(14→L6(14
:0→F:25→L
:prgmZFENETRE
:Text(15,10,"OH, LA! PAR TERRE! VOUS
:Text(22,16,"TROUVEZ ",C," DEKES!
:For(C,0,1200:End
:prgmZFENETRE
:0→A
:‾10→[J](11-W,V
:prgmZTERSAFC
:End
:
:If K=44:Then
:ClrHome
:Disp "TELEPORTATION:","
:Input "LONGITUDE? ",V
:Input "LATITUDE? ",W
:Text(62-R,S,"
:10fPart(V→Z
:10fPart(W→Θ
:iPart(V→V
:iPart(W→W
:0→A
:prgmZTERSAFC
:End
:
:If V=1 and W=1 and Z=4 and Θ=2:Then
:ClrDraw
:Horizontal 47
:Text(0,9,"OFFICE DE CONTROLE DE
:Text(7,6,"L'EXECUTION DES MISSIONS
:If not(L6(23:Then
:Text(40,0,"VOUS N'AVEZ PAS DE MISSION
:Text(47,30," EN COURS
:For(K,1,500:End
:End
:
:If L6(23):Then
:Text(40,10,"CONTROLE EN COURS...
:If L6(23)=1 and L6(24)-L6(29)≥50:66→J
:If L6(23)=3 and (L6(24)-L6(29)≥100:66→J
:If L6(23)=2
:Then
:66→J
:For(K,1,10)
:For(I,1,10)
:If [J](K,I)>2
:0→J
:End
:End
:End
:
:If J=66:Then
:40→L:0→F
:prgmZFENETRE
:Text(8,41,"°°°
:Text(17,15,"MISSION ACCOMPLIE!!
:Text(30,15,"PRIME: 50000 DEKES"
:50000+L6(14)→L6(14)
:50000+L6(11)→L6(11)
:0→L6(23)
:Pause
:prgmZFENETRE
:
:Else
:Text(47,10,"MISSION NON ACHEVEE
:Pause
:End
:End
:1→Θ
:prgmZTERSAFC
:End


prgmZREGLES vous pouvez le supprimmer quand vous saurez jouer pour gagner 2000 de mémoire.

attention aux espaces!

Spoiler:
Code:

:Lbl 0
:ClrHome
:Menu("REGLESD'HERSSAHE","COMMENCER",A,"COMMENT JOUER",B,"PROGRESSER",C,"QUESTIONS",D,"RETOUR",E
:Lbl D
:Pause "POUR TOUTE QUESTION ECRIVEZ MOI PAR MAIL, MEME DANS 50 ANS!: LOUISBECQUEYaHOTMAIL.FR EN MINUSCULES.
:Goto 0
:Lbl A
:Pause "VOUS COMMENCEZ VOTRE 1° PARTIE:CREEZ D'ABORD UN MONDE ET UN PERSONNAGE. LES MESSAGES D'ERREUR SONT NORMAUX,
 SUIVEZ LES INSTRUCTIONS PUIS TAPEZ [2nde][MODE][enter].
 UNE FOIS LES DEUX CHOSES FAITES VOUS POUVEZ JOUER. VOUS POURREZ CREER ENSUITE JUSQU'A 9 MONDES, ET UNE INFINITE DE PERSONNAGES.
:Goto 0
:Lbl B
:Pause "LORSQUE VOUS COMMENCEZ, VOUS ETES UN X QUI SE DEPLACE SUR L'ECRAN A L'AIDE DES FLECHES, SUR UNE CARTE CARREE DE 10 MAPS
 DE COTE. SUR LES MAPS ON PEUT TROUVER DES BATIMENTS, OU DES ENNEMIS,LES Θ. CERTAINES MAPS SONT PIEGEES ET VOUS TELEPORTENT ALEATOIREMENT.
 LE BATIMENT EN BAS A GAUCHE DE LA CARTE EST CELUI OU VOUS VALIDEZ LES MISSIONS QUE VOUS RECEVREZ PEUT-ETRE PAR COURRIER. POUR PASSER AU LEVEL
 SUIVANT, C'EST EN HAUT A DROITE. CHANGER DE LEVEL NE CHANGE PAS LA CARTE. SE DEPLACER SUR UN ENNEMI ENGAGE UN COMBAT AVEC LUI. QUITTEZ LE JEU
 EN FAISANT [ANNUL].
:Goto 0
:Lbl C
:Pause "VOUS AMELIOREZ VOTRE EQUIPEMENT EN ACHETANT DANS LES BATIMENTS OU EN DETROUSSANT LES ADVERSAIRES VAINCUS. LE DEKES EST LA MONNAIE. EN
 VENDANT DES OBJETS, VOUS AUGMENTEZ VOS STATS. L'EXPERIENCE SE GAGNE EN TUANT DES Θ, EN UTILISANT LES ATTAQUES OU LES SORTS.
:ClrHome
:Disp "ATTAQUE:","BOURRIN  [1]","PRECISE  [2]","ENERGIQUE [3]","CHOCKED  [4]","DESTROY  [5]","SISMIK    [6]
:Pause
:ClrHome
:Disp "REVERSE  [7]","DESTRUKT  [8]","KONFUZ    [9]
:Pause
:ClrHome
:Disp "SORT:","KILLER      [*]","LIBERATION  [-]","RED.PRECISI. [/]","RED.ATTAQUE  [+]","DESERTER [ENTER]
:Pause
:ClrHome
:Pause "LES 6 DERNIERES ATT. SE DEBLOQUENT AVEC L'EXPERIENCE. LES SORTS S'ACHETENT. UTILISER UN 'GO' POUR DESERTER. UTILISEZ LES PLACARDS POUR NE
 PAS VOUS FAIRE DETROUSSER SI VOUS PERDEZ UN COMBAT. POUR VOIR VOS STATS, EN COMBAT FAITES [FENETRE], POUR CELLES DE L'ADVERSAIRE FAITES [ZOOM].
:Goto 0
:Lbl E

prgmZSAUVER

n'enlevez pas le stop à la fin!! ni les lignes ou il y a juste deux points.
il faut mettre 4 espaces après le petit l sans nom, même si le site n'en affiche qu'un.

Spoiler:

:If K=2:Goto 2
:If Q=1221:Then
:Menu("PARTIE","REPRENDRE",A,"QUITTER",2
:Lbl A
:555→Q
:prgmHERSSAHE
:End
:If Q=123321:Goto 1
:V→L6(15
:W→L6(16
:Z→L6(17
:Θ→L6(18
:ClrHome
:Output(1,1,"TAPEZ 'VOIR' A L'ERREUR
:For(K,1,500:End
:123321→Q
:ClrHome
:Lbl 1
:::::::::::::::"ECRIRE LE NOM DUJOUEUR/MONDE QUE VOUS UTILISIEZ CETTE PARTIE, PUIS REDEMMARER LE PROGRAMME"
:L6→ᴸ :[J]→
:
:
:1221→Q
:EFFACEZ LES NOMS POUR EVITER UNBUG ET LA SAUVEGARDE SE FERA. REDEMAREZ ENCORELE PROGRAMME.
:Lbl 2
:ClrHome
:DelVar QDelVar [J]DelVar L6DelVar L5DelVar Pic1DelVar Pic0DelVar KDelVar ADelVar BDelVar RDelVar SDelVar JDelVar VDelVar WDelVar XDelVar YDelVar ZDelVar ΘDelVar FDelVar L
:FnOn
:ZStandard
:AxesOn
:Output(1,1,"
:Stop

prgmZSORTS

Spoiler:

:If K=75 and L6(13:Then
:Text(57,0,"KILLER LANCE!!!
:For(R,1,50
:Text(I,J,"°
:69!
:Text(I+2,J,"°
:69!
:End
:Text(57,0,"TUE!!
:L5(1)-8L6(2)→L5(1
:.5L5(2→L5(2
:L6(13)-1→L6(13
:Line(J,16Θ+6,E+1,16O+6
:For(K,1,300:End
:118008→M
:End
:If K=85 and L6(26:Then
:Text(57,0,"LIBERATION!!!
:For(R,1,50
:Text(I,J,"°
:69!
:Text(I+2,J,"°
:69!
:End
:Text(57,0,"LIBERES!!!
:3→Θ:1→Z:1→O:5→N
:ClrDraw
:RecallPic 1
:ClrDraw
:RecallPic 1
:F→K
:prgmZTERSAFC
:K→F
:Text(5,11,"X
:Text(35,83,"Θ
:L6(26)-1→L6(26
:118008→M
:End
:If K=65 and L6(27:Then
:Text(57,0,"PRECISIOREDUCTOR!
:For(R,1,50
:Text(I,J,"°
:69!
:Text(I+2,J,"°
:69!
:End
:Text(57,0,"REDUIT!
:iPart(.5L5(19→L5(19
:Circle(J,62-I,6
:Circle(E,62-D,6
:L6(27)-1→L6(27
:118008→M
:End
:If K=95 and L6(28:Then
:Text(57,0,"PUISSANCIOREDUCTOR!
:For(R,1,50
:Text(I,J,"°
:69!
:Text(I+2,J,"°
:69!
:End
:Text(57,0,"REDUIT!
:iPart(2L5(2)/3→L5(2
:Circle(J,62-I,6
:Circle(E,62-D,6
:L6(28)-1→L6(28
:118008→M
:End
:If K=105 and L6(30:Then
:Text(57,0,"DESERTEUR!!
:For(K,1,300:End
:L6(30)-1→L6(30
:7777→M:0→A:0→B
:End

prgmZSHOP

Spoiler:

:Lbl 0
:ClrDraw
:Text(0,0,"EN VENTE ICI:
:Horizontal 54
:Text(20,0,"EPEES, HACHES, ARCS
:Text(27,0,"BOUCLIERS, ARMURERIE
:Text(34,0,"SORTILEGES
:Text(41,0,"TELEPORTEURS
:Text(48,0,"VENDRE...
:41→C
:Pt-On(90,13,2
:Pt-On(90,20,2
:Pt-On(90,27,2
:Pt-On(90,34,2
:Pt-On(90,41,2
:Repeat K=26 or K=105
:getKey→K
:If K=34 or K=25:C→D
:C-7(K=34)+7(K=25)→C
:If C<13:41→C
:If C>41:13→C
:Pt-Off(90,D
:Pt-On(90,C
:End
:If K=26:Goto 2
:If C=13:Then
:ClrDraw
:Horizontal 30
:Text(33,0,"ANCIENNES TRANSACTIONS:
:If randInt(0,1 and L6(22:Then
:For(C,1,10
:For(D,1,30:End
:Text(47,5,"
:For(D,1,20:End
:Text(47,5,"□ VENDU!
:End
:Else
:If L6(22:Then
:Text(50,15,"PAS ENCORE VENDU"
:Else
:Text(50,15,"AUCUNE TRANSACTION
:End
:End
:""→Str1
:""→Str2
:If not(L6(22:Then
:"ARMES OFF.→Str1:5→L6(20
:"ARGENT→Str2:11→L6(21
:End
:Lbl 89
:4→J
:555→Q
:Text(0,5,"□ VENDRE... ...",Str1
:Text(6,5,"□ ETRE PAYE... ...",Str2
:Text(12,5,"□ OK
:Repeat K=105 or K=45
:getKey→K
:J→D
:J-6(K=25)+6(K=34)→J
:If J=22:51→J
:If J=‾2:51→J
:If J=45 or (J=51 and K=25 and C≠11:16→J
:If J=57 or (J=51 and K=34 and C≠11:4→J
:Pt-Off(6,62-D
:Pt-On(6,62-J
:End
:If K=45:Then
:DelVar Str1
:DelVar Str2
:Goto 0
:End
:prgmZVENDRE
:If C=4617:Then
:DelVar Str1
:DelVar Str2
:Goto 0:End
:Goto 89
:End
:If C=41:Then
:"HACHE,SABRE,MASSUE,ARC→Str1
:300→B
:End
:If C=34:Then
:"BOUCLIER,CASQUE,ARMURE"→Str1
:525→B
:End
:If C=20:Then
:"TELEPORTEUR MONDIAL→Str1
:1617→B
:End
:If C=27:Then
:ClrDraw
:Pt-On(90,13,2
:Pt-On(90,20,2
:Pt-On(90,27,2
:Pt-On(90,34,2
:Pt-On(90,41,2
:Text(20,0,"GO
:Text(26,0,"ECARTELEUR
:Text(33,0,"KILLER
:Text(40,0,"PUISSANCIO-REDUCTOR
:Text(47,0,"PRECISIO-REDUCTOR
:41→C
:Repeat K=105 or K=45
:getKey→K
:If K=34 or K=25:C→D
:C+7(K=25)-7(K=34)→C
:If C<13:41→C
:If C>41:13→C
:Pt-Off(90,D
:Pt-On(90,C
:End
:If K=45:Goto 0
:If C=13:Then
:"PRECISIO-REDUCTOR→Str1
:400→B
:End
:If C=41:Then
:"GO→Str1
:900→B
:End
:If C=34:Then
:"ECARTELEUR→Str1
:200→B
:End
:If C=27:Then
:"BOOST KILLER→Str1
:5000→B
:End
:If C=20:Then
:"PUISSANCIO-REDUCTOR→Str1
:450→B
:End
:End
:40→L:0→F
:prgmZFENETRE
:Text(5,8,"- ARME, SORT OU OBJET:
:Text(14,7,Str1
:Text(23,8,"- PRIX:
:Text(32,7,B," DEKES
:DelVar Str1
:Pause
:prgmZFENETRE
:Menu("ACHETER?","OUI",A,"NON",0
:Lbl A
:ClrHome
:Output(1,1," EN COMBIEN D'EXEMPLAIRES LE DESIREZ VOUS?
:Input D
:If BD>L6(14
:Then
:25→L:0→F:prgmZFENETRE
:Text(16,9,"ENRICHISSEZ VOUS, LA
:Text(22,7,"MAISON VOUS LE RESERVE!
:For(D,1,1000
:End
:prgmZFENETRE
:ClrHome
:Goto 0
:End
:L6(14)-BD→L6(14
:L6(11)-BD→L6(11:ClrHome
:Output(2,1,"SHOP
:Output(2,6,V
:Output(2,9,W
:Output(4,1,D
:Output(4,3,"ARTICLES
:Output(5,1,"TVA: 19,6I%
:Output(5,10,"
:Output(7,1,"TOTAL TTC:
:Output(7,12,BD
:For(L,1,2000:End
:If B=300:Then
:D+L6(7→L6(7
:D+L6(5→L6(5
:End
:If B=900
:D+L6(30→L6(30
:If B=525:Then
:D+L6(8→L6(8
:D+L6(6→L6(6
:End
:If B=5ᴱ3:Then
:D+L6(10→L6(10
:D+L6(13→L6(13
:End
:If B=200
:D+L6(26→L6(26
:If B=400
:D+L6(27→L6(27
:If B=450
:D+L6(28→L6(28
:If B=1617:Then
:D+L6(9→L6(9
:D+L6(12→L6(12
:25→L:0→F:prgmZFENETRE
:Text(10,7,"- MODE D'EMPLOI:
:Text(17,7,"POUR VOUS TELEPORTER,
:Text(24,7,"APPUYEZ SUR 'VAR'
:For(D,1,1500
:End
:prgmZFENETRE
:End
:Goto 0
:Lbl 2

ouhhh le lonnng message!

prgmZTERSACR

Spoiler:

:If Q=8998:Goto Y
:If Q=124421:Goto O1
:If K=2:Goto N
:ClrHome
:Output(4,3,"CHARGEMENT...
:randM(10,10→[J]
:‾10→[J](10,1
:8998→Q
:
:FAIS[MATRICE]ET SELECTIONNE LE NOM DE TON MONDEAPRES LA FLECHE.ENSUITE,REDEMARELE PROGRAMME ET TAPE VOIR A L'ERREUR..."
:Lbl Y:[J]→
:0→Q
:
:
:
:EFFACEZ LE NOM
:Return
:
:
:
:Lbl N
:ClrHome
:Output(1,1," APRES CHAQUE MESSAGE D'ERREUR TAPEZ 'VOIR'."
:{500,50,100,1,1,1,1,1,0,0,500,0,0,500,6,6,4,3,50,0,0,0,0,0,0,0,0,0,0,0}→L6
:For(Q,1,900)
:End
:124421→Q
:ClrHome
:Lbl O1
:
:
:
:
:
:"ECRIRE LE NOM APRES LE PETIT LET REDEMARER LE PROGRAMME(NOM ENQUATRE LETTRES)"
:L6→ᴸ
:

prgmZTERSAFC

Spoiler:

:0→A
:ClrDraw
:RecallPic 1
:Text(22,0,"<
:If V=1
:Text(22,0,"
:Text(22,91,">
:If V=10
:Text(22,91,"
:Text(47,46,"V
:If W=1
:Text(47,46,"
:Text(0,46,"^
:If W=10
:Text(0,46,"
:[J](11-W,V→F
:If fPart(F/2
:Then
:1→J
:If F>0:2→J
:For(C,1,J
:round(W/5,0→E
:round(V/2,0→D
:If not(E:2→E
:If C=2:E+1→E
:If C=2:D+1→D
:62-(16E+9→Y
:18D-7→X
:Line(X,Y,X,Y+11
:Line(X+3,Y,X+3,Y+10
:Line(X+5,Y+10,X+2,Y+10)
:Line(X+2,Y+10,X-1,Y+13
:Line(X-1,Y+13,X-5,Y+14
:Line(X-5,Y+14,X-6,Y+18
:Line(X-2,Y+22,X-6,Y+18
:Line(X-2,Y+22,X+3,Y+23
:Line(X+8,Y+22,X+3,Y+23
:Line(X+8,Y+22,X+11,Y+15
:Line(X+5,Y+10,X+11,Y+15
:Line(X+7,Y+11,X+11,Y+8
:Line(X+16,Y+14,X+11,Y+8
:Line(X+16,Y+14,X+13,Y+21
:Line(X+9,Y+20,X+13,Y+21
:Line(X+9,Y+9,X+9,Y+1
:Line(X+11,Y+1,X+11,Y+8
:Line(X+15,Y,X+6,Y+1
:Line(X-3,Y-1,X+6,Y+1
:End
:End
:If F≠1 and not(V=10 and W=10) and not(V=1 and W=1:Then
:Repeat randInt(0,1
:randInt(1,3→D
:randInt(1,5→C
:62-(16D+9→Y
:18C-7→X
:Line(X,Y,X-4,Y+6
:Line(X+1,Y+3,X-4,Y+6
:Line(X+1,Y+2,X+2,Y+8
:Line(X+3,Y,X+2,Y+8
:Line(X+3,Y+4,X+8,Y+7
:Line(X+5,Y+2,X+8,Y+7
:End
:End
:If W=10 and V=10:Then
:Line(70,25,70,40
:Line(75,25,75,40
:Line(67,41,78,41
:End
:If not(F:Then
:Circle(18Z-6,16Θ+7,2)
:randInt(1,10→V
:randInt(1,10→W
:Text(62-(16Θ+9),18Z-8," "
:Text(62-(16Θ+9),18Z-7,"X"
:End
:If F=1 or (V=1 and W=1):Then
:If not(V=1 and W=1):1→A
:Line(79,47,64,56
:Line(47,47,64,56
:Line(47,47,79,47
:Line(52,46,52,27
:Line(74,27,52,27
:Line(74,27,74,47
:Line(70,27,70,34
:Line(63,34,70,34
:Line(63,34,63,27
:End
:If F=‾1:Then
:2→A
:randInt(1,5→C
:randInt(1,3→D
:End
:If F>2 and B≠3:Then
:3→B
:randInt(1,5→C
:randInt(1,3→D
:Text(62-(16D+9),18C-7,"Θ
:End

prgmZVENDRE

Spoiler:

:If J=4
:Menu("VENDRE","ARMES OFF.",A,"ARMES DEF.",B,"KILLER",C,"TELEPORTEUR",D
:If J=10
:Menu("ETRE PAYE EN","ARGENT",E,"PTS DE VIE",F,"PTS D'ATTAQUE",G,"PTS DE DEF.",H,"PRECISION",I
:If J=16:Then
:Lbl 55
:ClrHome
:Output(7,1," COMBIEN VOULEZ VOUS EN VENDRE?"
:Input D
:D→L6(22
:If L6(22)>L6(L6(20:Then
:25→L:0→F:prgmZFENETRE
:Text(20,7,"VOUS N'EN AVEZ PAS ASSEZ
:Pause
:prgmZFENETRE
:End
:If L6(22)>L6(L6(20:Goto 55
:ClrHome
:End
:If C=11:Goto 3
:Goto 0
:Lbl A
:5→L6(20
:"ARMES ATT. →Str1
:Goto 0
:Lbl B
:6→L6(20
:"ARMES DEF. →Str1
:Goto 0
:Lbl C
:10→L6(20
:"KILLERS →Str1
:Goto 0
:Lbl D
:9→L6(20
:"TELEPORTEUR→Str1
:Goto 0
:Lbl E
:11→L6(21
:"ARGENT →Str1
:Goto 0
:Lbl F
:1→L6(21
:"PTS VIE →Str2
:Goto 0
:Lbl G
:2→L6(21
:"PTS ATT. →Str2
:Goto 0
:Lbl H
:3→L6(21
:"PTS DEF. →Str2
:Goto 0
:Lbl I
:If 100=L6(19):Then
:30→L:0→F:prgmZFENETRE
:Text(15,15,"VOUS NE POUVEZ PLUS
:Text(21,18,"AUGMENTER VOTRE
:Text(27,25,"PRECISION.
:For(L,1,900:End
:prgmZFENETRE
:End
:If 100=L6(19:Goto 0
:19→L6(21
:"PRECISION→Str2
:Goto 0
:Lbl 3
:Text(40,0,"PROPOSITION D'ACHAT:
:Text(47,0,"VOTRE MISE POUR
:If 11=L6(21:Then
:randInt(50,500)L6(22→D
:Text(47,54,D," DEKES
:End
:If 3=L6(21) or 2=L6(21:Then
:randInt(1,10)L6(22→D
:Text(47,54,D," POINTS"
:End
:If 1=L6(21:Then
:randInt(10,80)L6(22→D
:Text(47,54,D," POINTS"
:End
:If 19=L6(21:Then
:randInt(1,20).1L6(22→D
:Text(47,54,D,"I%
:Text(47,54,D,"
:End
:Text(57,0,"OK: [2ndexp] NON: [annu1]
:0→K
:Repeat K=45 or K=21
:getKey→K
:End
:4617→C
:If K=45:Goto 0
:L6(L6(20))-L6(22)→L6(L6(20
:D+L6(L6(21→L6(L6(21
:If 1006(19)>100:100→L6(19
:If L6(20)=5 and L6(7)>L6(5:L6(5→L6(7
:If L6(20)=6 and L6(Cool>L6(6:L6(6→L6(8
:If L6(20)=9 and L6(12)>L6(9:L6(9→L6(12
:If L6(20)=10 and L6(13)>L6(10:L6(10→L6(13
:10→L:0→F:prgmZFENETRE
:Text(20,7,"TRANSACTION EFFECTUEE"
:For(C,1,600:End
:prgmZFENETRE
:4617→C
:0→L6(20
:0→L6(21
:0→L6(22
:Lbl 0

bon les suicidaires du recopiage sont ils toujours vivants?

je poste bientôt les règles du jeu.

edit: voici les règles: (presque les mêmes que la version 3.0 mais petits changements)

alors d'abord, si vous obtenez une erreur de syntaxe en jouant, c'est sûrement fait exprès.
Cela peut arriver dans le cas d'une création de personnage, monde, ou d'une sauvegarde.
Vous tapez [2] et vous suivez les instructions dans le code programme.On vous demande le plus souvent d'entrer un nom.Puis vous quittez le programme, et vous redémarrez HERSSAHE.Nouvelle erreur, tapez [2], on vous demande d'effacer le nom que vous avez rentré,vous l'effacez (avec [suppr], pas avec [annul]!!!).Vous quittez à nouveau le programme. Si vous le redémarrez, il recommencera normalement, comme au début.Votre sauvegarde ou création aura été enregistrée.
Si il n'y a pas d'instructions dans le programme, c'était une vraie erreur.


HERSSAHE est un RPG où l'on peut créer autan de personnages que l'on veut, et jusqu'à 9 mondes. (tant que la mémoire le permet)

Pensez bien a en créer l'un et l'autre avant votre première partie, sinon, ça beugue.
Lorsque vous jouez, vous vous retrouvez sur la carte en forme de X.
Vous vous déplacez avec les flèches. Sur la carte, vous pouvez trouver des batiments, des arbres, et d'autres bonhommes, symbolisés par un thêta.
Vous pouvez entrer dans les batiments(par la porte, si vous essayez par le toit c'est normal que ça passe pas), tabasser les bonhommes. le reste c'est des éléments de décor.

je signale au passage que les "choses" (comme on me l'a dit plusieurs fois) en bas, gauche, droite ou haut de la map sont des flèches qui vous informes que vous pouvez passer à la map du d'à coté. si elles n'y sont pas c'est que vous êtes au bord de la carte, quoi.

Pour quitter le jeu, appuyez sur [annul]. Ne faites pas [ON].On vous demande si vous voulez sauvegarder, vous choisissez.


Ils peut vous arriver de trouver de l'argent par terre, que vous filerez dépenser au magasin pour compléter votre équipement et acheter des sorts.

Pour entrer en combat avec un bonhomme, il faut lui venir dessus (comme aux échecs).
Vous pouvez ensuite vous déplacer de quelques pas, 3 ou 4 (plus vous êtes près, moins vous avez de chances de rater votre attaque),puis vous lancez une attaque.
On lance une attaque en appuyant sur [1],[2], ou [3], puis quand vous aurez avancé dans le jeu [4],[5],[6],[7],[8] ou [9].Chaque bouton correspond à une attaque.


Vous pouvez réussir vottre attaque, ce qui causera des dommages à votre adversaire, ou la rater.
il est également possible que votre attaque soit tellement minable pour l'ennemi qu'elle ne lui cause aucun dommage.

Puis c'est votre adversaire qui peut se déplacer et vous attaquer, et ainsi de suite jusqu'à ce qu'un des deux meure.
Les points de vie des combattants sont affichés au dessus de leur tête (au dessus du X et du thêta).
Mais si vous voulez connaitre toutes les caractéristiques de votre adversaire, appuyez sur [zoom].
Si vous voulez voir les votres, appuyez sur [fenêtre].
Ces deux boutons ne fonctionnent qu'en combat.

Si vous gagnez, vous dépouillez votre adversaire de ses objets et de son argent.
Si vous perdez, c'est lui qui vous prend les votres.(d'où l'intéret de laisser ses objets/argent inutilisés dans un placard, dans un batiment.Ils y seront en sûreté).
Vous pouvez également vous servir de sorts en combat.
Ils se commandent par les touches [+],[-],[*],[/],[enter]: (excusez les noms de merde j'ai pas d'imagination)

[/] précisio réductor: réduit la précision de l'autre, il a donc moins de chance de vous toucher.

[*] boost killer : vous donne une telle puissance que vous êtes quasi sur de tuer l'adversaire. ce sort est très cher.

[-] libérateur: vous éloigne le plus possible de l'ennemi, ses attaques auront donc moins d'effet. les votres aussi.

[+] puissancio réductor: réduit la fureur agressive de votre ennemi

[enter]déserteur/go : vous désertez le combat (le sort s'appelle "go")

vous ne pouvez utiliser ces sorts que si vous les avez achetés.sinon ça marche pas.



Voici la liste des attaques et leurs intérets:

[1] attaque bourrin: enlève des points à l'adversaire, beaucoup si vous possédez beaucoup d'armes offensives.

]2] attaque précise: rate rarement sa cible, enlève moins de points que la bourrin.Attention, si votre adversaire est beaucoup plus puissant que vous question précision, il peut gagner des points au lieu d'en perdre.

[3] attaque énergique: enlève énormément de points mais vous avez pas mal de chances de la rater.

puis aussi

[4] attaque chocked: idéale quand on l'a débloquée (à partir de 50pts d'expérience).Perso j'aime bien le graphisme.

[5] attaque destroy: enlève autant de points que vous savez tapez vite sur [alpha].Pratique car les ennemis ne peuvent pas l'utiliser vu qu'ils sont virtuels.Se débloque à 100pts d'expérience.

[6] attaque sismik: ben, une balèze, vu qu'elle se débloque qu'a 150 pts d'expérience.

[7] attaque reverse tu choisis les dommages que ton adversaire reçoit, mais tu te prends toi aussi un tiers de ces dommages.(200 pts d'xp)

[8] attaque destrukt une très balèze, qui mise surtout sur les points d'attaque défense.(250 pts d'xp)

[9] attaque konfuz elle attaque l'ennemi avec ses propres armes. (très salaud comme coup, mais elle se rate très souvent). (300pts d'xp)


Vous pouvez aussi recevoir des lettres de mission: il vous faut alors l'éxécuter, il y a souvent une forte récompense à la clé. Quand vous avez fini une mission, rendez vous en bas à gauche de la carte, le batiment qui s'y trouve quelque soit votre monde s'appelle "l'office de contrôle des missions".
Vous ne pouvez pas passer au level suivant si vous avez une mission en cours.

Pour passer au level suivant, allez tout en haut à droite de la carte, il y a une porte.
Vous pouvez la passer à n'importe quel moment.Mais attention: vous restez sur le même monde, votre personnage ne change pas, ce sont les ennemis seuls qui deviennent plus puissants (et donc vous gagnez plus quand vous les trucidez).

Ne passez donc pas au level suivant si vous n'êtes pas encore assez fort!
Si vous êtes level 9 et que vous passez encore la porte, vous avez fini le jeu.

Pour pouvoir augmenter vos stats afin de passer les levels, vous devez vous rendre dans les magasins et vendre des parties de votre équipement (je vous assure c'est très utile et c'est tout ce que j'ai trouvé pour débarrasser un bonhomme ayant 82 armes sur lui).

Vous choisissez ensuite en quoi vous voulez être payé (points de vie, d'attaque, de défense, ou simplement en argent).La monnaie n'est pas l'euro mais le dekes.
Vous ressortez du magasin et vous venez vérifier de temps en temps si un client vous a fait une proposition.
Si oui, vous pouvez l'accepter (vous perdez alors ce que vous avez vendu et gagnez ce que ce client vous propose), ou la refuser en attendant mieux en quittant le magasin ( [annul] ).
Si vous faites une vente alors que votre précédente n'a pas été achetée, cette précédente s'annule, vous ne perdez rien et ne gagnez rien, mais vous pouvez vendre autre chose.

Bon, bravo pour avoir tout lu,voici maintenant la liste des programmes nécéssaires:

HERSSAHE gère les liens entres les autres programmes, les déplacements sur la carte, c'est celui la qu'il faut lancer quand vous voulez jouer.

Z1FOIS gère le débloquage de nouvelles attaques, les compliments en fin de jeu, et la supression de votre personnage qui a fini le jeu.

ZCOMBATS (le plus gros) gère les combats, les attaques, leurs graphismes.

ZFENETRE (le plus petit) sert a afficher une fenêtre, un peu comme sur un ordi, pour afficher un message.

ZMAISON gère ce qui se passe dans les batiments.

ZPETITFC gère toutes les petites fonctions (trouver de l'argent par terre, se téléporter aléatoirement quand on arrive sur une map (retenez bien la place de ces maps, c'est vraiment énervant de se retrouver à l'autre bout de la carte justre parce qu'on a oublié que c'était une map piégée)...

ZSAUVER gère les sauvegardes

ZSHOP gère le magasin

ZSORTS gère les sorts en combat

ZTERSACR gère la création d'un nouveau personnage/monde

ZTERSAFC gère votre situation géographique, votre environnement, et la déco

ZVENDRE gère vos ventes et les propositions des clients

ZREGLES ben c'est le programme mode d'emploi (vous pouvez le supprimmer si vous connaissez le jeu , ça bouzillera moins de mémoire.)

voilà. pour toute question n'hésitez pas.

alexis, tu pourrais remplacer la version 3.0 par la 4.0 sur le site? merci.


Dernière édition par persalteas le Dim 25 Sep - 16:40, édité 2 fois

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

HERSSAHE v4.0 [rpg]

Message par AlexRider38 le Jeu 2 Sep - 9:40

cool le rpg


Dernière édition par Alex le Jeu 2 Sep - 11:57, édité 1 fois

AlexRider38
Or 4
Or 4

Sexe : Masculin
Age : 19
Messages : 579
Date d'inscription : 11/07/2010
Etudes : Lycéen
Points Forum : -10
Points Concours : 0
Langages :
  • - TI-Basic Z80
  • - Axe Parser
  • - TI-Basic Nspire
  • - Lua Nspire
  • - Ndless Nspire
Calculatrices :
  • - TI-Collège
  • - TI-80
  • - TI-82
  • - TI-82 Stats.fr
  • - TI-84 Pocket.fr
  • - TI-Nspire CAS
  • - TI-Nspire CX

TI-84 Pocket.fr


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par harven le Jeu 2 Sep - 10:29

J'ai hate d'avoir ma ti83+ SE , pour l'avoir Content

Ps: persalteas: ce lien est pour celui buger ou le debuger ?
Autre Ps: pourait tu m'envoyer le tous premier herssahe (genre 1.0) enfin un ameliorer quand meme Content ?

Harven.

harven
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 28
Date d'inscription : 28/08/2010
Points Forum : 0
Points Concours : 0
TI-82


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Jeu 2 Sep - 10:56

ce lien mène a un programme qui marche enfin!

euh... harven je suis désolé la version 1.0 n'existe plus (et était franchement pas intéressante), la 2.5 existe encore mais sur la calto de quelqu'un que je vois rarement alors pour le croiser avec sa calto...
donc quasi impossible de récupérer une version antérieure à la 3.0


mais je vais essayer de faire une version compatible avec la 82, après tout, ma soeur va en avoir une. :D

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par harven le Jeu 2 Sep - 10:59

Je vais avoir une 83+SE (si j'ai de la chance)ou alors une 83+ normale Content .

harven
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 28
Date d'inscription : 28/08/2010
Points Forum : 0
Points Concours : 0
TI-82


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par Alexis le Jeu 2 Sep - 11:23

J'autorise les doubles-post de la part de persalteas sur ce topic. Je mettrais à jour la version du site ce soir.

PS: Alex pourquoi cites-tu le message précédent qui est extrèmement long ?

_________________
L'administrateur du forum.

Salut Invité, tu as posté 11 messages sur le forum.

Mes projets:
[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]

Alexis
Platinum 2
Platinum 2

Sexe : Masculin
Age : 23
Messages : 2320
Date d'inscription : 28/06/2010
Etudes : DUT Informatique
Points Forum : 40
Points Concours : 3
Langages :
  • - TI-Basic Z80
  • - ASM TI-82 Stats / TI-83
  • - Axe Parser
Calculatrices :
  • - TI-Collège
  • - TI-82 Stats.fr
  • - TI-84+

TI-84+


http://espace-ti.e-monsite.com

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par AlexRider38 le Jeu 2 Sep - 11:58

une erreur

AlexRider38
Or 4
Or 4

Sexe : Masculin
Age : 19
Messages : 579
Date d'inscription : 11/07/2010
Etudes : Lycéen
Points Forum : -10
Points Concours : 0
Langages :
  • - TI-Basic Z80
  • - Axe Parser
  • - TI-Basic Nspire
  • - Lua Nspire
  • - Ndless Nspire
Calculatrices :
  • - TI-Collège
  • - TI-80
  • - TI-82
  • - TI-82 Stats.fr
  • - TI-84 Pocket.fr
  • - TI-Nspire CAS
  • - TI-Nspire CX

TI-84 Pocket.fr


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par Alexis le Jeu 2 Sep - 12:01

Ok, merci d'avoir corrigé. Clin Oeil

C'est bon j'ai ajouté la version 4.0 au site.

_________________
L'administrateur du forum.

Salut Invité, tu as posté 11 messages sur le forum.

Mes projets:
[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]

Alexis
Platinum 2
Platinum 2

Sexe : Masculin
Age : 23
Messages : 2320
Date d'inscription : 28/06/2010
Etudes : DUT Informatique
Points Forum : 40
Points Concours : 3
Langages :
  • - TI-Basic Z80
  • - ASM TI-82 Stats / TI-83
  • - Axe Parser
Calculatrices :
  • - TI-Collège
  • - TI-82 Stats.fr
  • - TI-84+

TI-84+


http://espace-ti.e-monsite.com

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Lun 27 Déc - 18:32

euh, Alexis, si je supprimme les spoilers, est-ce que la page le supporte ?
Il y a un programmeur qui n'arrive pas à ouvrir les spoilers.

et j'ai la flemme de recopier tout.

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Ven 31 Déc - 10:40

:up2:

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par Metallica le Ven 31 Déc - 18:04

Sinon le programmeur le télécharge et ouvre les programmes avec TI Editor

_________________
[Vous devez être inscrit et connecté pour voir cette image]
[Vous devez être inscrit et connecté pour voir cette image]

Commencer Dropbox avec 500mo offert en étant parrainé !

Metallica
Or 4
Or 4

Sexe : Masculin
Age : 20
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :
  • - TI-Basic Z80
  • - Axe Parser
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83+ SE

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Sam 1 Jan - 8:15

good idea! bravo pour l'idée. je lui propose.

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 15:09

persalteas: sur ZTERSAFC, il y a un probleme: sur la ligne
:[J](11-W,V→F
ma calculette me met "err: dim invalide"
c'est normal?

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Dim 25 Sep - 16:25

Aha...

Celui de la version 4.0 ?

alors ça peut arriver, donne moi les valeurs de V et W stp.

Va falloir que je me replonge dans le code pour chercher l'erreur, mais je serai fier de la débusquer ^^

(si tu ne sais pas comment trouver la valeur d'une lettre: sur l'écran normal, écris la lettre et appuies sur [enter]. ça t'affiche un nombre, la valeur de la lettre.)

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:33

oui, la 4.0

V=6 et W=0

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Dim 25 Sep - 16:42

Le W=0 n'est pas normal...

Dans le prog HERSSAHE, un peu avant le milieu, tu as un L6(16→W

Pas d'erreur à cette ligne ?

EDIT: sans blague, tu as recopié tous les programmes ? Tu es le premier qui y a réussi...

J'ai mis a jour le lien de téléchargement et je te le conseille vraiment si tu as un cable Ti-PC, c'est suicidaire le recopiage.


Dernière édition par persalteas le Dim 25 Sep - 16:44, édité 1 fois

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:43

euh... non
merci

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:44

en fait ssi je suis pas assez descendu

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:45

je n'ai pas le cable
et oui j'ai tout fait

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Dim 25 Sep - 16:46

Dans ce cas, dans ZTERSACR, pas de faute ici :

{500,50,100,1,1,1,1,1,0,0,500,0,0,500,6,6,4,3,50,0,0,0,0,0,0,0,0,0,0,0}→L6

Ben alors félicitations !!
j'espère qu'il va marcher correctement parce que vu le nombre de lignes...

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Dim 25 Sep - 16:48

Alors, ça marche ?

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:50

J'avais un zero en trop
et tu vois je suis pas mort (ca m'a pris 1 apres-midi et une soirée)

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:52

sa marche toujours pas
desole mais c'est pas ça

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par persalteas le Dim 25 Sep - 16:55

Ach. c'est toujours la même erreur au même endroit, W vaut toujours 0 ?

Tu n'a aucune faute aux deux endroits que j'ai dit ?

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par atab le Dim 25 Sep - 16:56

aucune faute et w=0

atab
Argent 2
Argent 2

Sexe : Masculin
Age : 20
Messages : 24
Date d'inscription : 21/09/2011
Etudes : lyceen en 1ere S
Points Forum : 1
Points Concours : 0
Calculatrices :
  • - TI-82 Stats.fr

TI-83+ SE


Revenir en haut Aller en bas

Re: [83] HERSSAHE v4.0 rpg

Message par Contenu sponsorisé Aujourd'hui à 4:56


Contenu sponsorisé


Revenir en haut Aller en bas

Page 1 sur 3 1, 2, 3  Suivant

Voir le sujet précédent Voir le sujet suivant Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum