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

⟦f6e4e0e8a⟧ TextFile

    Length: 10508 (0x290c)
    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« 
        └─⟦1c00600e2⟧ 
            └─⟦this⟧ 

TextFile

DefinitionVerbe
    aller 
    regarder = observer
    prendre
    ouvrir
    fermer
    poser = mettre, deposer
    franchir   
    info
     inf
     changer

DefinitionPreposition
    au            
    a 
    avec


DefinitionVariable  

    Personnage est Mouche 
        Position : Couloir         
        Etat : Vole, Petit
    FinPersonnage

    Personnage est MadMax
        description:"tu as vu le mec...."
        Position : Toilettes
        Etat : Grand, Nu  
        possession: montre,cle
    FinPersonnage

    Personnage sera Ali
        Position : Toilettes
        Etat : arabe
        possession:cle,montre
    FinPersonnage
    
    personnage sera momo
        position:cuisine
    finpersonnage 
    
    personnage est titi
        position:jardin
        etat:jaune,petit
    finpersonnage 
    
    personnage est yang
        position:cuisine
        etat:jaune,petit 
        possession:vetements,cle
    finpersonnage

 Objet est Cle
        Description : " Ce doit etre la cle du salon. "
        Position : Couloir
        Etat : prenable
    FinObjet
    
   objet  est Vetements          
        Description : " Mais ce sont les miens ! "
        Position : Jardin
        Etat : prenable, beau        
    FinObjet

    Objet est Refrigerateur
        Description : " Il y a un billet accroche dessus. "
        Position : Cuisine
        Etat : Ferme
        Contenu : Jambon
    FinObjet

    Objet est Billet
        Description : " Il y a quelque chose de grifonne dessus : Cheri, ne fais pas de betise, bisous a ce soir 20h. PS : pense a mettre le jambon sur
        la table du salon."
        Position : Cuisine
    FinObjet

    Objet sera Jambon                 
        Description : " Miam Miam. "
        Position : Refrigerateur
        Etat : prenable
    FinObjet

    Objet est Porte_Cle
        Description : " Il n'y a qu'une seule cle accrochee. "
        Position : Couloir
    FinObjet


    Objet est Miroir
        Position : Couloir
    FinObjet

    Objet est Table
        Description : " Tout est pret, il ne manque plus que la nourriture. "
        Position : Salon
    FinObjet

    Objet est Television
        Description : " Oh Chouette c'est Casimir. "
        Position : Salon
    FinObjet

    Objet est Montre
        Description : " Quoi, il est deja 19h !!!. "
        Position : Cuisine
    FinObjet

    Communication est Porte_Jardin
        Sens1 Cuisine vers Jardin
            Description : " C'est une porte vitree "
            Etat : Fermee , Vitree
         Sens2 Jardin vers  Cuisine                      
            Description : " C'est une porte vitree "
            Etat : Fermee,Vitree
    FinCommunication

    Communication est Fenetre
        Sens1 Cuisine vers Jardin
            Description : " Elle est entre-ouverte "
            Etat : Entre_Ouverte, Vitree
        Sens2 Jardin vers Cuisine
            Description : " Elle est entre-ouverte "
            Etat : Entre_Ouverte,Vitree, Haute
    FinCommunication   
    
    Communication est Porte_Salon
        Sens1 Cuisine vers Salon
            Description : " C'est une porte en bois "
            Etat : Fermee_a_cle
        Sens2 Salon vers Cuisine
            Description : " C'est une porte en bois "
            Etat : Fermee_a_cle
    FinCommunication

    Communication est Porte_Chambre
        Sens1 Salon vers Chambre
            Description : " C'est une porte en bois mais elle semble condamnee "
            Etat : Fermee
    FinCommunication

    Communication est Porte_Entree
        Sens1 Couloir vers Exterieur
            Description : " Zut, elle est fermee. "
            Etat : Fermee
    FinCommunication

    Communication est Porte_Couloir
        Sens1 Cuisine vers Couloir  
            description:"la porte est ouverte"
            Etat : Ouverte
        Sens2 Couloir vers Cuisine                   
            Description : " Elle est ouverte. "
            Etat : Ouverte,fissuree
    FinCommunication

    Communication est Porte_Toilettes
        Sens1 Toilettes vers Jardin
            Description : " Elle est Ouverte. "
            Etat : Ouverte
        Sens2 Jardin vers Toilettes
            Description : " Une porte de toilettes en metal !!!  Quoiqu'il en soit elle est ouverte."
            Etat : Ouverte
    FinCommunication


    Lieu est Cuisine
        Description : " La Cuisine est bien rangee mais deserte les seuls bruits sont le ronronnement du refrigerateur et le tic tac de la montre murale.
        Il y a une Porte_Vitree et une fenetre donnant sur le jardin."
        DebutCommunication
            Direction est_ Porte_Jardin       
            Direction Nord_Est Fenetre
            Direction Ouest Porte_Salon
            Direction Nord Porte_Couloir
        FinCommunication
    FinLieu

    Lieu est Salon
        Description : " Le Salon. La table est prete et la television est allumee. "
        DebutCommunication
            Direction est_ Porte_Salon
            Direction Nord Porte_Chambre
        FinCommunication
    FinLieu

    Lieu est Jardin
        Description : " Il y a des sortes de toilettes au fond du jardin et des vetements a cote. "
        DebutCommunication
            Direction Ouest Porte_Jardin
            Direction Nord_ouest Fenetre
            Direction Fond Porte_Toilettes
        FinCommunication
    FinLieu

    Lieu est Toilettes
        Description : " Bizarre, ca ne ressemble en rien a des toilettes. "
        DebutCommunication
            Direction Ouest Porte_Toilettes
        FinCommunication
    FinLieu

    Lieu est Couloir
        Description : " Vous etes dans un couloir long et mal eclaire. Il y a une porte au Sud et une autre au Nord. Un miroir ainsi qu'un porte_cle 
        sont accroches au mur."
        DebutCommunication
            Direction Nord Porte_Entree                 
            Direction Sud Porte_Couloir
        FinCommunication
    FinLieu

    Lieu est Chambre
    FinLieu

    Lieu est Exterieur
    FinLieu                                          

    Compteur est VieMouche
        Valeur : 50
    FinCompteur

    Compteur est Heure
    FinCompteur
                    

Scenario              
               
Initiales           
    Joueur Est Mouche     
    Decrire  Couloir         
    
Generales       
 
    SI prendre Objet ET Non(Joueur Etat vole) ET Objet  Etat prenable ET Objet Position = Joueur Position   ALORS    
        Ajouter Joueur Possession Objet            
        SI Joueur Possession Vetements ALORS 
            Supprimer Joueur Etat nu    
            Ajouter Joueur Etat habille
            Detruire Vetements
        FINSI    
    FINSI
    
    SI prendre Objet ET Joueur Etat vole ET Objet Etat prenable ET Objet Position = Joueur Position     ALORS    
        Afficher  " Il y a comme un problhme. "       
    FINSI
     
    SI regarder objet  ET Objet  Position = Positioncourante  ALORS       
        Decrire Objet        
    FINSI
    
    SI regarder objet  ET Non(Objet  Position = Positioncourante)  ALORS
        Afficher "Il doit etre dans une autre piece"
    FINSI

    \\SI ouvrir Communication ET Communication est dans positioncourante  ET Communication Etat fermee        ALORS
        Supprimer Communication  Etat fermee        
        Ajouter Communication  Etat ouverte
    FINSI
   \\

    SI aller Lieu ET Lieu reliea positioncourante  ALORS
        Deplacer Joueur vers Lieu
    FINSI

\\    SI aller direction ET Positioncourante sortie vers direction ALORS
        Deplacer Joueur vers sortie
    FINSI

    SI franchir Communication ET Communication est dans Positioncourante ET Communication Etat ouverte ALORS
        Deplacer Joueur vers sortie
    FINSI   
\\ 
    Heure = Heure + 1
    Afficher " Il est :"
    Afficher Heure 
    si heure <2  alors afficher "heure" sinon afficher "heures"  finsi
     
   
    SI Heure = 100 ALORS                                          
        ModifierDescription Montre " Quoi il est deja 19h30! "    
   FINSI                                                          

    SI Heure = 200 ALORS
        Afficher " Merde il est 20h ... Moumoune est de retour et je n'est rien fait ! ... Perdu ! "
        FinDuJeu
    FINSI
   
    SI positioncourante=couloir alors
      afficher "je suis ds le couloir"
    FINSI
    
    SI inf objet alors
      informer objet
    FINSI
    
    si poser objet et joueur possession objet alors
      afficher "je poses l'objet"
      decrire objet
      supprimer joueur possession objet
      inventaire joueur
    finsi
    
    si ouvrir refrigerateur alors
       si refrigerateur etat ferme alors
           supprimer refrigerateur etat ferme
           informer refrigerateur
       sinon
           afficher "deja ouvert"
       finsi
   finsi
   

   si changer alors
     joueur est madmax
     decrire joueur
   finsi
   


Locales
  
            
DANS Couloir           
    si info alors decrire couloir finsi
    SI regarder miroir  ET Joueur Etat vole ALORS
        Afficher " Mais je suis une mouche !!!"
    FINSI 

    SI regarder miroir ET Non (Joueur Etat vole)  ALORS
        Afficher " Schwrazy c'est rien a cote de moi ! "
    FINSI       

    SI prendre objet alors
        ajouter joueur possession objet
        inventaire joueur
    FINSI                
    
    
    

DANS  Toilettes     
    si info alors decrire toilettes finsi

    SI Joueur Etat vole ALORS
        Afficher " La porte vient de se refermer, une etrange sensation m'envahit ... "
        Joueur Est  MadMax 
   
    FINSI

DANS Cuisine 
    si info alors decrire cuisine finsi

    SI ouvrir Refrigerateur ET Refrigerateur Etat ferme ALORS
        Supprimer Refrigerateur Etat ferme
        Ajouter Refrigerateur Etat ouvert
        ModifierDescription Refrigerateur " Il contient diverses choses dont un gros jambon. "
        SI Refrigerateur Contenu Jambon ALORS
            Creer Jambon
        FINSI
    FINSI
    SI fermer Refrigerateur ET Refrigerateur Etat ferme ALORS
        Supprimer Refrigerateur Etat ouvert
        Ajouter Refrigerateur Etat ferme
        ModifierDescription Refrigerateur " Il y a un billet accroche dessus. "
        SI Refrigerateur Contenu Jambon ALORS
            Detruire Jambon
        FINSI
    FINSI

DANS Salon         
    si info alors decrire salon finsi

    SI poser Jambon ET Joueur Possession jambon ALORS
        Afficher " Et voila, tout est fini a temps ! ... Gagne ! "
        FinDuJeu
    FINSI 
  

FinJe