antoine-source/toutadisparu/sources/data.s

84 lines
2.5 KiB
ArmAsm
Raw Normal View History

2023-08-11 15:59:57 +00:00
*
* 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
*--- Pour la sauvegarde
C1 ds 1
P ds 1
*--- Variables Atari ST
2023-08-20 14:04:48 +00:00
nbTEXTES ds 2
nbTEXTES2 ds 2 ; nombre de textes indiqu<71> dans le fichier .TEX
i ds 2 ; un index
localOFFSET ds 2 ; offset de chaque rang<6E>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
rvb5 ds 2
rvbA ds 2
index_mot ds 2 ; un autre index qui pointe
nb_mots ds 2 ; nombre de mots dans la scene
2023-08-20 18:03:38 +00:00
mot_clique ds 2 ; index du mot cliqu<71>
mot_ancien ds 2 ; index du mot pr<70>c<EFBFBD>demment cliqu<71>
valeur_condition ds 2 ; valeur condition 2B xx ou 2D yy
2023-08-11 15:59:57 +00:00
aventure ds 2
nombre_scenes ds 2
scene_actuelle ds 2
2023-08-21 12:43:25 +00:00
scene_ancienne ds 2
2023-08-14 16:47:29 +00:00
deplacement ds 2 ; BOOL - TRUE (new scene) or FALSE (same scene)
2023-08-11 15:59:57 +00:00
image_chargee ds 2 ; WORD - TRUE or FALSE
2023-08-14 13:30:29 +00:00
escape ds 2 ; BOOL - TRUE or FALSE
fgSUITEFORCEE ds 2 ; BOOL - TRUE or FALSE
2023-08-11 15:59:57 +00:00
2023-08-20 14:04:48 +00:00
mot ds 128 ; le mot <20> chercher (jusqu'au caract<63>re espace)
2023-08-14 16:47:29 +00:00
2023-08-20 14:04:48 +00:00
* Le texte <EFBFBD> afficher
2023-08-15 13:20:00 +00:00
2023-08-15 07:46:34 +00:00
ligne_max ds max_colonnes ; une ligne du texte
2023-08-14 16:47:29 +00:00
texte ds max_colonnes*max_lignes ; the text from the .TXT file
texte_final ds max_colonnes*max_lignes ; the final text - known as b$ in Atari ST
ds 2
texte_liens ds max_colonnes*max_lignes ; FALSE: not a link, TRUE est un mot cliquable
2023-08-20 09:10:34 +00:00
texte_index ds max_colonnes*max_lignes ; num<75>ro du mot
2023-08-14 16:47:29 +00:00
2023-08-11 15:59:57 +00:00
* Toujours en d<EFBFBD>cal<EFBFBD> : index 1 d<EFBFBD>marre <EFBFBD> 0 (NB_TEXTES est toujours > au nombre de sc<EFBFBD>nes)
2023-08-14 13:30:29 +00:00
SUITE_DATA = * ; C'est vachement pratique pour tout effacer (encore) !
2023-08-13 15:54:50 +00:00
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<73> 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 <20> charger <20> chaque sc<73>ne
rouge1 ds NB_TEXTES ; les composants RVB pour le fond
2023-08-11 15:59:57 +00:00
vert1 ds NB_TEXTES
bleu1 ds NB_TEXTES
rouge2 ds NB_TEXTES
vert2 ds NB_TEXTES
bleu2 ds NB_TEXTES
2023-08-20 14:04:48 +00:00
2023-08-11 15:59:57 +00:00
FIN_DATA = * ; Ben, ouais !
ds 2 ; padding, we never know :-)