        GFA-BASIC 3.03 corrections et compl‚ments :      18.08.1988

RINSTR
        ne reconnait pas le premier signe, au lieu de cela le bit de remplissage
        est analys‚ … la suite de la chaine
OPEN "R"
        GET et PUT fonctionnent sans l'entr‚e d'un num‚ro d'article (defectueux)

SEEK
        pour l'entr‚e dans un fichier non ouvert, il r‚sulte une erreur d'adresse
        ou une erreur bus
-x^y
        ne fonctionne pas.
EXP()
        le test de d‚passement de capacit‚ ne fonctionne toujours pas




ON BREAK GOSUB x
        Quand les trois touches sont appuy‚es trŠs longtemps, la proc‚dure est
        rappel‚e et r‚p‚t‚e. Il y a deux possibilit‚s d'‚viter cela :

        1)      ON BREAK GOSUB x
                REPEAT
                UNTIL MOUSEK
                PROCEDURE x
                  ~BIOS(11,BIOS(11,-1) AND &F1)
                  ' Partie inchangee
                RETURN

        Par cette m‚thode, le statut des touches commut‚es est directement
        chang‚.

        2)      ON BREAK GOSUB x
                REPEAT
                UNTIL MOUSEK
                PROCEDURE x
                  ON BREAK CONT
                  ' Partie inchangee
                  ON BREAK GOSUB x
                RETURN

        Ici la routine Break est d‚connect‚e simplement avec des instructions
        non connect‚es pendant la dur‚e de la proc‚dure


        Il ‚tait possible d'inclure ce point particulier au Gfa basic, mais cela
        aurait eu des effets n‚gatifs sur la rapidit‚ de chaque appel de
        proc‚dures.

a=1E+100
FOR i=1 to 100
  PRINT a^i,LOG(a^i)/LOG(10)
NEXT i
        en ce qui concerne la boucle : ceci peut encore etre calcul‚ correctement
        avec des nombres plus grands que 1E+308, mais la sortie de nombres …
        partir de 1E+1000 n'est pas correcte.

 Quelques petits bugs ont encore ‚t‚ ‚cart‚s.

KEYDEF
        Pour d‚finir les touches de fonctions, le code SCAN est simul‚ par
        ESC et RETURN, de fa‡on … ce que ESC et RETURN aient ensuite des
        fonctions habituelles dans le GEM.

        README GFABASIC 3.03:                   16.08.1988

 zones Patch dans le GFA basic :

 A l'int‚rieur du programme GFA Basic et du programme GFABASRO, il y a une zone
 dans laquelle des pr‚r‚glages peuvent etre faits.

OPEN "U",#1,"GFABASIC.PRG" ! ou "GFABASRO.PRG"
SEEK #1,31
PRINT #1,"E";              ! ou "H";
CLOSE #1
'
' avec E, l'‚cran est effac‚ au lancement du programme
' avec H, l'‚cran n'est pas effac‚.
'

OPEN "U",#1,"GFABASRO.PRG"
SEEK #1,32
PRINT #1,"TESTPROG.GFA";CHR$(0);
CLOSE #1
'
' Au lancement du GFABASRO, le programme TESTPROG.GFA est charg‚ et lanc‚, si on
  n'a pas choisi d'utiliser un autre programme. Le nom de ce programme ne doit
  pas faire plus de 63 octets. Le chr$(O) est important (pour le lancement). Si
  on sort un seul chr$(O), l'‚tat original est recr‚‚.


OPEN "U",#1,"GFABASIC.PRG"
SEEK #1,32
FOR i%=0 to 25
  READ a%
  OUT #1,a%
NEXT i%
CLOSE #1
'
'    A B C D E F G H I J K L M N O P Q R S T U V X Y Z
DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
'
' Quand vous changez les lignes DATA, le default typ est chang‚ pour les
  variables dont le nom commence par une majuscule ci-dessus.
' Seules sont autoris‚es :
'       0=DEFFLT        1=DEFSTR        2=DEFINT        3=DEFBIT
'       8=DEFWRD        9=DEFBYT


OPEN "U",#1,"GFABASIC.PRG"
SEEK #1,58
FOR i%=0 to 3
  READ a%
  PRINT #1,MKI$(a%);
NEXT i%
CLOSE #1
'
DATA &0777,&0700,&0070,&0000
'
' couleurs pour l'‚diteur, Inverse:
' DATA &0000,&0700,&0070,&0777


OPEN "U",#1,"GFABASIC.PRG"
SEEK #1,80
PRINT #1,MKI$(0);               !pr‚r‚glage DEFLIST
CLOSE #1
'

OPEN "U",#1,"GFABASIC.PRG"      !LLIST pr‚r‚glage
SEEK #1,82
PRINT #1,MKI$(pl);              !.pl
PRINT #1,MKI$(pl-2);            !.pl
SEEK #1,86
PRINT #1,MKI$(ll);              !.ll
SEEK #1,88
PRINT #1,he$+chr$(13);          !.he
SEEK #1,120
PRINT #1,fo$+chr$(13);          !.fo
SEEK #1,152
PRINT #1,in$+chr$(13);          !.in
SEEK #1,184
PRINT #1,ff$+chr$(13);          !.ff
CLOSE #1
'
' he$, fo$, in$ et ff$ sont les valeurs par d‚faut pour .he, .fo, .in et .ff
' Avec CHR$(0) (=default) aucune entete, fins de lignes, et aucune chaine
  d'initialisation ne peuvent etre sorties (‚ventuellement ff$).
'
' On suppose que l'imprimante utilis‚e peut faire un saut de page … la suite
  d'une commande CHR$ (12). La longueur maximale pour ces chaines est de 32
  caractŠres, y compris le symbole final CHR$ (13).
'





 nouvelles instructions :

.PA
        ex‚cute un saut de page
.P-
        les instructions points ne sont pas imprim‚es en liste.
.P+
        Les instructions points sont imprim‚es en liste.

        .P+ et .P- sont valables pour le listing complet (comme .Nx),
        Ceci est valable pour la derniŠre mise au point.


DUMP/DIR/FILES
        La sortie ‚cran de ces instructions se laisse influencer comme pour
        TRON. On imprime lentement avec CAPS_LOCK. Avec touche Shift droite
        la sortie peut etre arret‚e (ou reprise) .

