⟦4349a4c93⟧

TextFile

message erreur "Non, non et non !!!!"
//-------------------------------------------------------------------------------------
enumere fermeture : ouvert , ferme 
enumere interieur : rempli , vide
enumere luminosite : sombre , eclairee

structure BOUTEILLE est entite avec
    en interieur : capacite

structure COFFRE est entite avec  
    en verrou : serrure = ferme
    en interieur : capacite

structure SALLE est piece avec  
    en etat_salle : etat = eclairee 

structure PERSO est entite avec
    en entier : sante = 100
    en entier : force = 20 
// ***** ligne 20 ******************************    
cree PERSO : joueur

cree PERSO : garde avec
    description  = "Un GROS balaise ..."
    sante = 200
    force = 50

cree SALLE : cachot avec                                        
    description = " "
    luminosite = eclairee   
    issues = 1

cree SALLE : couloir avec
    description = " "
    issues = 4

cree SALLE : geole avec
    description = "Un squelette git sur le sol."
    issues = 1
// ***** ligne 40 ******************************
cree SALLE : entrepot avec
    description = " "
    issues = 2

cree SALLE : armurerie avec
    description = "C' est une piece avec une grande forge .Vous voyez :Une enclume"
    & ", divers outils et un grand coffre ."
    issues = 1

cree SALLE : poste_de_garde  avec
    description = " "
    issues = 2

cree SALLE : colline  avec
    issues =1

cree entite : bois avec
    description  = "Quelques bouts de planches cassees."

// ***** ligne 60 ******************************
cree entite : paille avec
    description  = "Ben quoi, de la paille ..."

cree entite : lit avec
    description  = "C'est un ensemble de planches suspendues a des chaines. "
    & "En guise de matelas il y a un peu de paille."

cree entite : cle_en_bronze avec
    description  = "Oui, c'est bien une cle !"
// sous paille

cree entite : resine avec
    description  = "Beurk, ca colle aux doigts !"                   
// Il faut d'abord regarder racines dans cachot

cree entite : torche_eteinte avec
    description = " "

cree entite : torche_eteinte avec
// ***** ligne 80 ******************************
    description = " "
            
cree COFFRE : coffre  avec
    nom = "Coffre en acier"
    description = "Tout en acier. Imposible d'ouvrir un tel truc sans cli"

cree entite : epee avec
    description  = "Bonne lame !"

cree entite : armure avec
    description  = "C'est une cotte de mailles."

cree BOUTEILLE : flasque avec
    description  = "C'est une flasque d'huile. "

cree entite : pain avec
    description  = "C'est du pain blanc, slurp !"

                                                
// ***** ligne 100 ******************************
cree BOUTEILLE : fiole_bleue avec
    description  = "Oh, la jolie bleue !"

cree BOUTEILLE : fiole_verte avec
    description  = "On dirait que c'est un concentre d'algues."

cree entite : cle_en_acier avec
    description  = "Une cle minuscule"
// sous le squelette de geole
//-------------------------------------------------------------------------------------
mots            ouest , nord , sud , haut , bas
//-------------------------------------------------------------------------------------
lien visible : ferme , ouvert , verrouille , coince
lien invisible : cache
//-------------------------------------------------------------------------------------
lie cachot nord a couloir sud par porte verrouille
lie couloir ouest a entrepot ouest par porte
lie couloir nord a geole sud par porte coince
lie couloir haut a poste_de_garde bas par escalier ouvert
// ***** ligne 120 ******************************
lie poste_de_garde ouest a colline ouest par porte
lie entrepot sud a armurerie nord par porte cache
//-------------------------------------------------------------------------------------
groupe direction : nord , sud , ouest , haut , bas
groupe objet : bois , paille , resine , cle_en_bronze , cle_en_acier , flasque ,armure , 
           epee , pain 
groupe fiole : fiole_bleue , fiole_verte
groupe imprenable : lit , coffre , squelette , racines , flambeau
groupe piece : cachot , couloir , entrepot , armurerie , geole , poste_de_garde
//--------------------------------------------------------------------------------------
verbes  boire ou  avaler
    aller ou courir, marcher  
    frapper ou attaquer
    prendre ou ramasser
    regarder ou voir , examiner , fouiller
    poser  pousser faire ouvrir
    inventaire 
    sante
introduction
// ***** ligne 140 ******************************
place joueur, paille, lit dans cachot
place garde dans poste_de_garde
place epee, armure dans coffre
place pain, flasque, fiole_verte, fiole_bleue dans entrepot

Affiche " Vous vous reveillez dans une piece obscure, de la lumiere filtre par des barreaux... "
            & "des BARREAUX ! Le sang vous monte aux tempes et vous manquez de vous "
            & "evanouir a  nouveau. Les souvenirs vous reviennent : on vous a arrete par erreur et" 
            & " condamne a la PENDAISON ... "
Affiche  " Malgre votre faiblesse vous vous relevez. Il faut faire vite et sortir de ce trou a rats !"
Affiche nom de joueur
Affiche issues
Affiche " barreaux flambeau racines"

scenario
quand ordre est
- regarder  :               
        Affiche contenu de lieu
        Affiche "a" & "b"
// ***** ligne 160 ******************************
        Affiche Issues
    dans cachot
        change couleur de piece en rouge
        Affiche " barreaux flambeau racines"
    ailleurs        
        si luminosite de Piece = eclairee ou torche dans joueur
        alors affiche contenu de piece
        fin si
    
- regarder racines      :       
    dans cachot
        Affiche " Ce doit etre les racines d'un conifere. De la resine "
                    & "en degouline."
        si resine existe pas
        alors Place resine dans Piece
        fin si

- regarder squelette :
    dans geole      
// ***** ligne 180 ******************************
        Affiche " Votre predecesseur ..."
        si cle existe pas 
        alors Affiche " 
        fin si

- regarder objet        :               
        Affiche description de objet

- regarder fiole        :       
        Affiche description de objet
        Affiche " Elle est " & contenu de fiole

- prendre objet :       
        si objet pas dans joueur
        alors
            Affiche " Ok"
            Place objet dans joueur
        fin si

- prendre fiole :       
        Affiche " Ok"
        Place objet dans joueur

- poser objet           :       
        Affiche " Ok"
        Place objet dans Piece

- poser fiole           :       
        Affiche " Ok"
        Place objet dans Piece

- casser fiole          :       
        Affiche "Cling ! dommage ...elle donnait 100 pts de vie "
        Retire fiole

- casser lit            :       
    dans cachot
        si lit existe
        alors 
            Affiche " SCRAAASH ! Dommage, Xavier ne pourra plus pioncer."
            Place bois dans Piece
        fin si

- aller issue           :       
        si issue de Piece est ouvert
        alors Va Vers issue
        fin si

- faire torche          :       
        si bois dans joueur et resine dans joueur 
        alors
            Place torche_eteinte dans joueur
            Retire bois
            Retire resine
        fin si
fin quan
DataMuseum.dk

Rational R1000/400

⟦4349a4c93⟧ TextFile

Derivation

TextFile
