DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦2c12106a8⟧ TextFile

    Length: 1280 (0x500)
    Types: TextFile
    Names: »GEMPCON.I«

Derivation

└─⟦4fbcde1e4⟧ Bits:30003931/GEM_Development-A.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
    └─⟦this⟧ »GEMPCON.I« 

TextFile


CONST
(** GEMPCON.I ***   Constants for GEM VDI PASCAL MT+ programs  **)
        cntl_max = 11;                  (* max sizes for arrays - relative 0 *)
        intin_max = 131;
        intout_max = 139;
        pts_max = 256;                  (* you may need this larger *)

        white = 0;                      (* std colors - not always true *)
        black = 1;
        red = 2;
        green = 3;
        blue = 4;
        cyan = 5;
        yellow = 6;
        magenta = 7;
 
        hollow = 0;                     (* std fill interior styles *)
        solid = 1;
        pattern = 2;
        hatch = 3;
        
        longdash = 2;                   (* line styles, solid as above *)
        dshdot = 4;
        
        maxndc = 32767;                 (* max coord in NDC space *)
 
        normal = 0;     (* graphic text styles - combinations ok as well *)
        bold = 1;
        light = 2;
        skew = 4;
        underline = 8;
        outline = 16;
        shadow = 32;
 
        request = 1;            (* input modes *)
        sample = 2;
 
        replace = 1;            (* write modes *)
        transparent = 2;
        xor_mode = 3;
        erase = 4;