mirror of
https://github.com/antoinevignau/source.git
synced 2024-11-16 04:05:15 +00:00
87 lines
2.6 KiB
ArmAsm
87 lines
2.6 KiB
ArmAsm
*
|
||
* Tout a disparu
|
||
*
|
||
* (c) 1992, Fran<EFBFBD>ois Coulon
|
||
* (c) 2022, Antoine Vignau & Olivier Zardini
|
||
*
|
||
|
||
mx %00
|
||
|
||
*-----------------------
|
||
* LES VARIABLES
|
||
*-----------------------
|
||
|
||
DEBUT_DATA = * ; C'est vachement pratique pour tout effacer !
|
||
|
||
*--- Variables Apple IIgs
|
||
|
||
tblTEXTES ds 4*NB_TEXTES
|
||
|
||
*--- Variables Atari ST
|
||
|
||
nbTEXTES ds 2
|
||
i ds 2 ; un index
|
||
nb_lignes ds 2 ; nombre de lignes de texte (c'est pour centrer)
|
||
localOFFSET ds 2 ; offset de chaque rangŽe
|
||
localPOINT ds 2 ; index du mot
|
||
len_max ds 2 ; longueur de ligne_max
|
||
longueur_texte ds 2 ; nombre de caracteres du texte d'origine
|
||
return ds 2 ; premier RC dans une ligne
|
||
rvb1 ds 2 ; index 1/5/9/D
|
||
rvb2 ds 2 ; index 2/6/A/E
|
||
index_mot ds 2 ; un autre index qui pointe
|
||
nb_mots ds 2 ; nombre de mots dans la scene
|
||
numero_mot ds 2 ; index du mot cliquŽ apr<70>s condition
|
||
valeur_condition ds 2 ; valeur condition 2B xx ou 2D yy
|
||
aventure ds 2
|
||
nombre_scenes ds 2
|
||
scene_actuelle ds 2
|
||
scene_ancienne ds 2
|
||
deplacement ds 2 ; BOOL - TRUE (new scene) or FALSE (same scene)
|
||
image_chargee ds 2 ; WORD - TRUE or FALSE
|
||
escape ds 2 ; BOOL - TRUE or FALSE
|
||
fgSUITEFORCEE ds 2 ; BOOL - TRUE or FALSE
|
||
|
||
mot ds 128 ; le mot ˆ chercher (jusqu'au caract<63>re espace)
|
||
mot_upper ds 128 ; le m<>me mot mais en IIgs majusculanisŽ
|
||
option_mot ds 128 ; la copie du premier mot cherchŽ
|
||
ligne_commentaire ; la phrase de commentaire "mot" : explication
|
||
ds 128
|
||
|
||
* Le texte ˆ afficher
|
||
|
||
ligne_max ds max_colonnes ; une ligne du texte
|
||
texte ds max_colonnes*max_lignes ; the text from the .TXT file
|
||
texte_color ds max_colonnes*max_lignes ; FALSE: not a link, TRUE est un mot cliquable
|
||
texte_final ds max_colonnes*max_lignes ; the final text - known as b$ in Atari ST
|
||
ds 2
|
||
|
||
* Toujours en dŽcalŽ : index 1 dŽmarre ˆ 0 (NB_TEXTES est toujours > au nombre de sc<EFBFBD>nes)
|
||
|
||
SUITE_DATA = * ; C'est vachement pratique pour tout effacer (encore) !
|
||
|
||
fonction_mots ds NB_TEXTES*NB_MOTS*2 ; PNTR - mots qui vont "rŽagir"
|
||
aiguillage ds NB_TEXTES*NB_MOTS ; BYTE - scene correspondant au mot
|
||
condition ds NB_TEXTES*NB_MOTS*2 ; WORD - scene devant avoir ete vue (ou non si nŽgatif)
|
||
pointeur_mots ds NB_TEXTES ; BYTE - nombre de mots pour chaque scene
|
||
scene_visitee ds NB_TEXTES ; BOOL - le joueur est-il passŽ par cette sc<73>ne ?
|
||
phrase ds NB_TEXTES*NB_MOTS*2 ; PNTR - phrases explicatives de chaque mot
|
||
image_a_charger ds NB_TEXTES*2 ; PNTR - nom des fichiers image ˆ charger ˆ chaque sc<73>ne
|
||
rouge1 ds NB_TEXTES ; les composants RVB pour le fond
|
||
vert1 ds NB_TEXTES
|
||
bleu1 ds NB_TEXTES
|
||
rouge2 ds NB_TEXTES
|
||
vert2 ds NB_TEXTES
|
||
bleu2 ds NB_TEXTES
|
||
|
||
FIN_DATA = * ; Ben, ouais !
|
||
|
||
ds 2 ; padding, we never know :-)
|
||
|
||
* DonnŽes des fichiers de sauvegarde
|
||
|
||
fiAVENTURE ds 2
|
||
fiSCENEACTUELLE ds 2
|
||
fiSCENEVISITEE ds NB_TEXTES
|
||
|