Utilitaire de dedoublement d'ecran compatible BASIC
Par masterglob 2008
Configuration/chargement
HIMEM < #4000
chargement "Rupt.bin" en #8000
Demarrage en #8000
Le demarrage du programme installe un deuxieme ecran
en bas de l'ecran habituel, qui est remonte de quelques
lignes. apres le demarrage, l'ecran du haut est actif.
Le nouvel ecran (du bas) est equivalent a une fenetre
de 5 lignes de hauteur.
Les commandes sont:
ùSCR,<num_ecran>
=> <num_ecran> vaut 0 pour activer l'ecran normal
=> toute autre valeur active le deuxieme ecran
ùSIZE,<taille>
=> redimensionne l'ecran du bas (en partie)
<taille> correspond au nombre de caractères equivalent
pour le mode 0 (defaut = 40)
On peut modifier les attributs de l'ecran qui n'est pas
actif avec les attributs de la fenetre 7.
Exemple, avec l'ecran 0 actif:
"pen #7,2" change la couleur du stylo de l'ecran 1
Il n'est pas possible d'effectuer (mais peut-etre un
jour saurais-je faire ca??) un cls #7 ou print #7
pur acceder directement a l'ecran inactif.
Il n'est pas possible dans la version actuelle d'avoir
un mode ou des couleurs differentes dans les deux ecrans.
Il est conseille de mettre tous les "INK" a 0 avant de faire
des acces au disque, sinon l'affichage sera instable.