DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦cc8d12194⟧ TextFile

    Length: 1464 (0x5b8)
    Types: TextFile
    Notes: R1k Text-file segment

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦20a72fe94⟧ 
            └─⟦this⟧

TextFile

DefinitionVerbe
    prendre
    regarder = observer
    poser
    utiliser
    
DefinitionVariable

    Personnage est MadMax
        description:"tu as vu le mec...."
        Position : Salon  
    FinPersonnage

    Objet est Traducteur
        Description : "Pas mal comme systeme."
        Position : Salon
        Etat : prenable
    FinObjet
    
    Objet est Table
        Description : "Il y a un billet dessus"
        Position : Salon
    FinObjet

    Objet est Billet
        Description : "-- . -- . -- .--- .."
        Position : Salon
    FinObjet

    Lieu est Salon
        Description : "Le salon est une grande piece avec une table au centre."
    FinLieu
    


Scenario

Initiales
    Joueur Est Madmax
    Decrire Salon
    
Generales           

    SI regarder objet ALORS
      decrire objet
    FINSI
    
    SI prendre objet ALORS
      SI objet etat prenable ALORS
        Ajouter Objet possession Joueur 
        Afficher "ok, je le prends"
      SINON
        Afficher "Non,je ne veux pas"
      FINSI
    FINSI

Locales

DANS Salon
   
    SI poser traducteur ET joueur possession traducteur ALORS
      Afficher "Ce ne doit pas etre tres judicieux."
    FINSI                                  
    
    SI utiliser Traducteur ALORS
      SI joueur possession Traducteur ALORS
         Afficher "le message est : Bravo!"
         FinduJeu
      SINON
         Afficher "je ne le possede pas"
      FINSI
    FINSI


    
    
Finje