Qui aime faire des quêtes ?

// Espaces ignorés sauf entre crochets
// # : Nombre entier, signe optionnel et chiffres uniquement
// % : Mot commencant par une lettre (majuscule ou minuscule), suivi par des lettres et/ou chiffres
// <BR> : saut de ligne
// <TAB> : tabulation

Fichier => VIDE | PNJ Fichier | <BR> Fichier
PNJ => Coords <TAB> Nom <TAB> Type <TAB> Skin <TAB> Programmes | - Programme
// Le second serait un programme de routine lié à aucun pnj
Nom => % // Nom du pnj
Type => % // Type du pnj
Skin => # // ID du skin du pnj
Programmes => VIDE | Programme | Programme <BR> Programme
// VIDE = cas des mobs normaux par exemple, rien de particulier ne se passe
// 1er programme = sur action simple
// 2nd programme = routine (fonctionne tout le temps, donc ne pas faire d'actions tels que des boosts) lié au pnj
Programme => { ListeOperation }
ListeOperation => VIDE | Operation <BR> ListeOperation
Operation => VIDE | Affectation | Fonction
Affectation => Var = Terme
Coords => #, #, #, # // x, y, z, orientation (0 à 65535)
Terme => Var | Constante | Fonction
Var => VarTmp | VarPersist | VarGlobale
VarTmp => %
VarPersist => @%
VarGlobale => $%
Constante => # | "%"
Fonction => %(ListeTermes)
ListeTermes => Terme ListeTermes2 | VIDE
ListeTermes2 => , Terme ListeTermes2 | VIDE

File => Info <TAB> File | <TAB> File | EMPTY
Info => NPC | Event | FunctionDef

NPC => Coords <TAB> Nom <TAB> Type <TAB> Skin <TAB> Programme

Event => "OnPCBirth" <TAB> Program | "OnPCDeath" <TAB> Program | "OnNPCBirth" <TAB> Program | "OnNPCDeath" <TAB> Program | "Warp" <TAB> Point3D, Point3D <TAB> Program

DefFonction => "fonction" <TAB> Name <TAB> Program

Coords => Point3D, Number
Point3D => Number, Number, Number
Nom => String | String "#" String
Type => "monster" | "pnj" | "guard" // Determine the hostility of the pnj
Skin => Number

Program => Operation | "{" OperationList "}"
OperationList => Operation OperationList | EMPTY

Operation => Affectation ";" | FunctionCall ";" | Conditionnal | Iteration | Switch | EMPTY

Affectation => Variable "=" Value
Value => Variable | Constante | FunctionCall
FunctionCall => Name "(" Args ")"
Args => Value NextArgs | EMPTY
NextArgs => "," Value | EMPTY

Conditionnal => "if (" Condition ")" Program NextConditionnal
NextConditionnal => "else" Program

Iteration => "for (" Variable "in" Value ")" Program | "while (" Condition ")" Program | "do" Program "while (" Condition ")"

Switch => "switch (" Value ") {" CaseList "}"
CaseList => "case " Constante ":" OperationList CaseList | "default:" OperationList CaseList

Condition => Value Comparator Value | Value
Comparator => "==" "!=" "<" "<=" ">" ">="

Variable => Portee Nom
Portee => EMPTY | "@" | "$"

Constante => Number | "\"" String "\""

//Mob qui s'appelle "Un mob" qui ressemble au mob/npc ayant l'ID 12304 et étant aux coordonnées 1023, 1204, 123, 0 (0 étant l'orientation entre 0 et 65535)
1023, 1204, 123, 0  Un mob  monster    12304
// Un npc qui s'appelle "Un marchand" qui ressemble au mob/npc ayant l'ID 34085 et étant aux coordonées 11243, 2139, -123, 593
11243, 2139, -123, 593    Un marchand    npc    34085  {
say("Salut, tu veux m'acheter une de mes pommes ?"); //On prépare le texte paramétré pour l'affichage
choice("Oui"); //On prépare un élément de choix
choice("Non"); //Second élément de choix
choix = afficher(); //On affiche et le choix retenu par le joueur est renvoyé dans la variable choix.
if (choix == 1) //Si on dit "oui"
{ takeItem(57, 100);
giveItem (13485, 1); //donner une pomme (j'invente l'ID hein ;) )
say ("Voila pour vous monsieur !");
} else {
say ("Dommage");
}
say ("Revenez nous voir ! Au plaisir !");
afficher();
}

Npcs = {
Id : ["Name", "Class", Level, Heading, X, Y, Z],
Id : ["Name", "Class", Level, Heading, X, Y, Z]
}

1023, 1204, 123, 0  Un mob  monster    12304

X, Y, Z, Heading <TAB> Nom <TAB> Type <TAB> Skin/Template

11243, 2139, -123, 593, Un marchand, npc, 34085 {
    say("Salut, tu veux acheter une de mes pommes ?");
    choice("Oui");
    choice("Non");
    choix = afficher();
    if (choix == 1) {
        takeItem(57, 100);
        giveItem (13485, 1);
        say ("Voila pour vous monsieur !");
    } else {
        say ("Dommage");
    }
    say ("Revenez nous voir ! Au plaisir !");
    afficher();
}

2360, 560, 4587, 78, Dr House : Docteur, npc, 2365145 {
    dire ("bonjour à toi, je suis le dr House et je peux te soigner");
    choisir ("HP + 100 % pour 200 adena");
    choisir ("HP + 50 % pour 100 adena");
    choix = afficher ();
    if (choix == 1) {
          prendreObjet(57, 200);
          healPourcent(100);
    } else {
          prendreObjet(57, 100);
          healPourcent(50);
    }
}