home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1991 / 04 / txl / 3_preis / fast / intglob.c < prev    next >
C/C++ Source or Header  |  1991-01-15  |  2KB  |  62 lines
  1. /* intglob.c
  2. Dieses File enthält alle Globalvariablen des Interpreters.
  3. (c) 1990 Michael Beising & TOOLBOX
  4. */
  5.  
  6. #include    <stdio.h>
  7. #include    <stdlib.h>
  8. #include    "interp.h"
  9.  
  10.  
  11. /*    Initialisieren der Befehlsvergleichsliste */
  12.  
  13. TOKBEF    TokBefDesc[] = {
  14. /*    Funktion  Bef.-Name     Para-Count        CopyRest */
  15.     { crun,        "lauf"        ,    0,            0},
  16.     { cdruck,    "drucke"    ,    0,            1},
  17.     { cset,        "setze"        ,    3,            1},
  18.     { cif,        "wenn"        ,    2,            1},
  19.     { cload,    "lade"        ,    1,            1},
  20.     { csave,    "speichere"    ,    1,            1},
  21.     { cgoto,    "gehezu"    ,    1,            0},
  22.     { cende,    "ende"        ,    0,            0},
  23.     { cexit,    "verlasse"    ,    0,            0},
  24.     { cmerke,       "merke"         ,       0,                      1},
  25.     { clist,        "liste"         ,       0,                      1},
  26.     { cneu,         "neu"           ,       0,                      0},
  27. /*    NEUE BEFEHLE    */
  28.     { cinfo,        "info"          ,       0,                      0},
  29.     { cpiep,        "piep"          ,       0,                      0},
  30.     { cgerald,      "gerald"        ,       0,                      0},
  31.     { chilfe,       "hilfe"         ,       1,                      1},
  32.     { czeig,        "zeig"          ,       4,                      1},
  33.     { csetfarbe,    "setfarbe"      ,       2,                      1},
  34.     { cloesch,      "loesch"        ,       4,                      1},
  35.     { cpause,       "pause"         ,       0,                      0},
  36.     { cdos,         "dos"           ,       1,                      1},
  37.     { csbild,       "sbild"         ,       5,                      1},
  38.     { crbild,       "rbild"         ,       5,                      1},
  39.     { clese,        "lese"          ,       4,                      1},
  40.     { ciftaste,     "iftaste"       ,       1,                      1},
  41.     { cbox,        "box"        ,    5,            1},
  42.     { cattribut,    "attribut"    ,    6,            1},
  43.     { NULL,         NULL            ,       0,                      0}
  44. };
  45.  
  46. /* Globale Variable des Interpreters */
  47. int            IntError;        /* Interpreterfehler ist aufgetreten. */
  48.  
  49. PRGZEILE    *FirstLine;        /* erste Interpreterzeile */
  50. PRGZEILE    *LastLine;        /* letzte Interpreterzeile */
  51. PRGZEILE    *ActLine;        /* aktuelle interpretierte Zeile */
  52. char        *LinePos;        /* Zeilenposition der aktuellen Zeile*/
  53.  
  54. int            Steuer;            /* Scanner-Ergebnis */
  55. char        ScanBuffer[ZEILENLAENGE]; /* Ergebnis des Scanners */
  56.  
  57. VAR        *FirstVar = NULL;    /* Zeiger auf die erste Variable */
  58.  
  59. char    FileName[FNAMLEN];    /* Zwischenspeicher für den Filenamen */
  60.  
  61. /* Ende des Files INTGLOB.C */
  62.