La Couronne de Cuivre

Code : Tout sélectionner

BEGIN ~Barbe~

IF ~ Global("barbespeech","LOCALS",1) ~ THEN BEGIN 0
SAY ~ blabla...~
IF ~~ THEN EXTERN BKIM pirate0
END


IF ~~THEN BEGIN 1
SAY ~ blabla~
IF ~~ THEN REPLY ~ aaaa~ GOTO 2
IF ~~ THEN REPLY ~ bbbb~* GOTO 3
IF ~~ THEN REPLY ~ cccc~ GOTO 4
END


IF ~~ THEN BEGIN 2
SAY ~ blabla~
IF ~~ THEN DO ~SetGlobal("barbespeech","LOCALS",1)~ EXIT
END

IF ~~ THEN BEGIN 3
SAY ~ blabla~
IF ~~ THEN DO ~SetGlobal("barbespeech","LOCALS",2)~ EXTERN BKIM pirate1
END


IF ~~ THEN BEGIN 4
SAY ~ blabla~
IF ~~ THEN REPLY ~ aaaa ~ GOTO 2
IF ~~ THEN REPLY ~ bbbb~ GOTO 5
END

IF ~~ THEN BEGIN 5
SAY ~ blabla~
IF ~~ THEN DO ~SetGlobal("barbespeech","LOCALS",2)~ EXIT
END


APPEND BKIM

IF ~~ THEN BEGIN pirate0
SAY ~ blabla~
IF ~~ THEN EXTERN BARBE 1
END

IF ~~ THEN BEGIN pirate1
SAY ~ blabla~
IF ~~ THEN DO ~LeaveParty()
GivePartyAllEquipment()
EscapeArea()~ EXIT
END
END

Code : Tout sélectionner

IF ~~ THEN BEGIN Magasin2
SAY ~Vous ne le regretterez pas!~
IF ~~ THEN REPLY ~D'accord, allons-y!~ DO ~StartStore("lvmarch1",LastTalkedToBy())
END

Code : Tout sélectionner

IF ~~ THEN BEGIN Magasin2
SAY ~Vous ne le regretterez pas!~
IF ~~ THEN REPLY ~D'accord, allons-y!~ DO ~StartStore("lvmarch1",LastTalkedToBy())~ EXIT
END

Code : Tout sélectionner

IF ~~ THEN BEGIN Guildes
	SAY ~Je sais juste que c'est un massacre, et a moin que vous ne vouliez autre chose dégagé.~
	IF ~~ THEN REPLY ~Tres bien, au revoir.~ EXIT
	IF ~~ THEN REPLY ~En fait vous avez l'air d'être un voleur expérimenté et je voulais savoir si vous ne vouliez pas rejoindre mon groupe.~
	 (ligne 23) SAY ~Ca a l'air tentant, ok je vous suis.~ DO ~SetGlobal("GlimDansGroupe","LOCALS",1)JoinParty()~ EXIT
END

Code : Tout sélectionner

IF ~~ THEN BEGIN Guildes
SAY ~Je sais juste que c'est un massacre, et a moin que vous ne vouliez autre chose dégagé.~
IF ~~ THEN REPLY ~Tres bien, au revoir.~ EXIT
IF ~~ THEN REPLY ~En fait vous avez l'air d'être un voleur expérimenté et je voulais savoir si vous ne vouliez pas rejoindre mon groupe.~ [color=yellow]GOTO 123[/color]
END

[color=yellow]IF ~~ THEN BEGIN 123[/color]
SAY ~Ca a l'air tentant, ok je vous suis.~ 
IF ~~ THEN DO ~SetGlobal("GlimDansGroupe","LOCALS",1)JoinParty()~ EXIT
END

Code : Tout sélectionner

BEGIN GlimCouteauvif

IF ~NumTimesTalkedTo(0)~ THEN BEGIN PremiereRencontre
	SAY ~Que voulez-vous?~ D0 ~SetGlobal("GlimDansGroupe","LOCALS",1) JoinParty()~ EXIT
END

Code : Tout sélectionner

IF ~NumTimesTalkedTo(0)~ THEN BEGIN PremiereRencontre
SAY ~Que voulez-vous?~ 
[color=yellow]IF ~~ THEN[/color] DO ~SetGlobal("GlimDansGroupe","LOCALS",1) JoinParty()~ EXIT
END