DataMuseum.dk

top - download

    Length: 5431 (0x1537)
    Types: TextFile
    Notes: R1k Text-file segment

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

TextFile

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



DefinitionPreposition
    au
    

definitionvariable
    Personnage est Mouche
        description:"je suis un elephant et je mens"
        Position : Couloir
        Etat : Vole, Petit  
        possession:cle,vetements
    FinPersonnage

    Personnage sera MadMax
        Position : jardin
        Etat : Grand, Nu 
        possession: miroir,refrigerateur
    FinPersonnage

    Personnage sera Ali
        Position : Toilettes
        Etat : arabe
    FinPersonnage

    personnage sera momo
        position:cuisine
    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


    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_Couloir
        Sens1 Cuisine vers Couloir
            Etat : Ouverte
        Sens2 Couloir vers Cuisine
            Description : " 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 Nord Porte_Couloir
        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
        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 Sud Porte_Couloir
        FinCommunication
    FinLieu

    Compteur est A
    FinCompteur

    Compteur est B
    FinCompteur
    
    Compteur est C
    FinCompteur
    
    Compteur est D
    FinCompteur
    
    Compteur est E
    FinCompteur

scenario

initiales
   joueur est mouche
   decrire mouche
   decrire joueur 
    c=10
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 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

    SI Heure = 2 ALORS
        ModifierDescription Montre " Quoi il est deja 19h30! "
        decrire montre
    FINSI

    SI Heure = 3 ALORS
        Afficher " Merde il est 20h ... Moumoune est de retour et je n'est rien fait ! ... Perdu ! "
        FinDuJeu
    FINSI


     decrire ali
     si  non(momo etat malade) alors afficher "ok" finsi
     
     si mouche existe alors afficher "mouche existe" finsi
     si mouche etat vole alors afficher "mouche vole" finsi
     si a>2 alors afficher "a>2" finsi
     c=2*(4-2*5)+8
     afficher c
     a=(3*5-2)modulo 3 +2
     afficher a
     si a>4 ou c<11 et  mouche existe  alors informer joueur
     finsi
     d=a+c
     afficher d
     si d>20 alors findujeu finsi
locales
  dans couloir
  decrire couloir
  deplacer joueur vers cuisine
  
   

  dans cuisine
  decrire cuisine
  deplacer joueur vers jardin
 
  dans jardin
  decrire jardin
  informer joueur
  
  finje