|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 6197 (0x1835)
Types: TextFile
Notes: R1k Text-file segment
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦ac67b8d47⟧
└─⟦this⟧
VERBES SONT
Prendre Aller Ouvrir Sortir Informer
Tapper Editer Lire Utiliser Remplacer
Effacer Donner.
COMPLEMENTS SONT
Table Armoire Chaise Macintosh Belladone
Rational Console Telephone Clavier Ascenseur
Souris TP_IRMX Manuel_Unix Consignes
Salle_Mac Salle_LSI Salle_II Couloir
Fichier Stylo Disquette
!15
Possessions Lexique jeu Indications
Camomille
!Indices
CA MO MILLE .
!25 liste des familles
FAMILLES SONT
Acces AVEC source(CHAINE) ET destination(CHAINE) ET Etat_acces_src(CHAINE)
ET Etat_acces_dst(CHAINE).
Piece AVEC Nom(CHAINE) ET Description(CHAINE) ET Nbr_Acces(ENTIER)
ET ENSEMBLE DE Attributs
ET HERITAGE DE Acces1(Acces)
ET HERITAGE DE Acces2(Acces)
!36
ET HERITAGE DE Acces(Acces).
!45
!LIENS mot voca avec Variable
!si 1 seul mot du voca -> juste ecrire mot sans (...) ni HERTITAGE
Date AVEC Jour(ENTIER) ET Mois(CHAINE) ET annee(CHAINE).
!51
Personnage AVEC Nom(CHAINE) ET HERITAGE DE date(date) ET Nbr_vie(ENTIER)
ET HERITAGE DE Piece_Courante(piece) ET ENSEMBLE DE Possessions.
VARIABLES SONT
!60
Date_de_naissance COMME Date (26 "janvier" 1995 ).
couloir COMME piece
("couloir"
['disquette']).
Salle_LSI COMME piece
("Salle_LSI"
"la Salle LSI 1 portes : vers le couloir"
1 67 "fkjhbk" vdsmfvh DE jdvghks jdghks
[ 'Telephone' 'Belladone']
).
!74
Salle_Mac COMME piece
("salle_Mac"
"la salle Macintoshe 2 portes : une vers le couloir et une"
2
['Telephone' 'Macintosh' 'Chaise' 'Table']
).
Salle_II COMME piece
("salle_II"
"la salle II p 1 porte : vers le couloir"
1
[ 'Telephone' 'Chaise' 'Table' 'Console' 'Ascenseur' 'Souris' 'Armoire']
).
!88
LE_plateau_du_jeu COMME les_pieces (['couloir' 'salle_mac' 'salle_II' 'salle_lsi']).
Joueur COMME Personne ("moi" (0 "" 0) 10 (couloir) ['stylo']).
!94 ?????
Temps COMME ENTIER.
Fi COMME ENTIER.
INITIALISATIONS SONT
Ecrire "Debut du Jeux ".
Ecrire "je vous souhaite bonne chance".
Ecrire "pour gagner il vous suffira de trouver le mot magique".
!103
Ecrire "pour Quitter le jeu , taper: SOTRTIR JEU".
!temps DEVIENT 100.
!fin DEVIENT 0.
ECRIRE "Voulez-vous avoir des indications d'utilisation du jeu".
ECRIRE "si oui taper : donner indications ".
!113
VIE EST
Si 'Sortir' 'jeu'
ALORS SI temps>50
ALORS Ecrire "vous perspicaces".
QUITTER.
SINON Ecrire "vous aviez pourtant encore du temps pour trouver la solution".
FSI.
FSI.
!123
SI 'donner' 'indications'
ALORS
ECRIRE "si vous voulez consulter la liste des verbes et complement taper :".
ECRIRE "donner Lexique".
ECRIRE "si vous voulez consulter la liste de ce que vous possedez:".
ECRIRE "informer possessions".
FSI.
temps DEVIENT temps-1.
!134
SI 'Informer' complement1
ALORS
SI Complement1 DANS LE_plateau _du_jeu
ALORS
!SI Nom DE Piece_Courante DE Joueur = "Couloir"
!ALORS ECRIRE Description DE Couloir.
!FSI.
!SI Nom DE Piece_Courante DE Joueur = "Salle_Mac"
!ALORS ECRIRE Description DE Salle_Mac.
!FSI.
!...etc
!147
ou
.????
ECRIRE Description DE Piece_Courante DE Joueur
(+simple)
(pb de recopie de variabe: piece_courante devient couloir)
FSI.
SI Complement1='possession'
ALORS
ECRIRE Possession DE Joueur.
FSI.
!160
SI complement1 DANS possessions DE joueur
ALORS
SI Complement1='stylo'
ALORS ECRIRE "c'est un superbe stylo BIC jetable".
FSI.
!SI ...
FSI.
SI 'donner' 'lexique
ALORS
ECRIRE "les verbes sont : ".
ECRIRE "donner prendre ....."
ECRIRE "les complements sont : ".
ECRIRE "salle_lsi ...".
!175
! serait bien un symbole pour ecrire un retoura ligne
! (option pour + tard)
!179 FSI.
Si 'prendre'
ALORS
ECRIRE "que veux-tu prendre??? ton pied ".
FSI.
!187 !Si 'prendre' complement1
!ALORS
! Si complement1 dans attributs de piece_courante de joueur
ALORS
!Si NOT(complement1 dans attributs)
!ALORS
Ajouter Complement1 A possessions de joueur.
Ecrire "Vous posdez un(e)" complement1.
Si nom de piece de joueur = "cuisine"
ALORS
retirer complement1 A attribut de cuisine
FSI.
...etc
Si complement1 = 'Macintosh'
ALORS
ECRIRE "c'est un peu lourd".
Nbr_vie de joueur devient nbr_vie de joueur-1.
FSI.
Si complement1 = 'Belladone'
alors Nbr_vie de joueur devient Nbr_vie de joueur/2.
ECRIRE "un vol de matl coute cher"
Si 'Disquette' dans possession de joueur
ALORS ECRIRE "vous venez de perdre votre disquette"
sinon Nbr_vie de joueur devient Nbr_vie de joueur-2.
ecrire "vous n'avez plus que" Nbr_vie de joueur "comme nbr de vie".
FSI.
FSI.
SINON ECRIRE "vous ne pouvez pas prendre de "complement1"pour le moment".
SINON ECRIRE "il n'y apas de"complement1"ici".
FSI.
Si 'lire'
ALORS ECRIRE "Que veux-tu lire??"
FSI.
Si 'Lire' Consignes
ALORS SI nom de piece de joueur = "couloir"
ALORS ECRIRE "En cas d'incendie veuillez garder la tete froide"
ECRIRE "vous feriez bien de vous depecher un peu"
FSI.
FSI.
Si (temps=0) et (fin=0)
ALORS ECRIRE "le temps est finir"
ECRIRE "la prochaine fois, soyez plus rapide..."
FSI.
Si 'aller'
ALORS ECRIRE "ou donc?"
FSI.
Si 'aller' complement1
alors
SI (nbr_Acces<2)
alors Si complement1 dans Acest de piece de joueur
alors
si complement1 = 'cuisine'
ALORS
??? peut on faire :
?????????????? piece de joueur devient cuisine
Ecrire "vous vous trouvez maintenant dans "nom de piece de joueur
FSI.
FSI.
FSI.