331 lines
13 KiB
Promela
331 lines
13 KiB
Promela
|
C************************************************************************
|
||
|
|
C* FUNCCODE.PRM *
|
||
|
|
C* *
|
||
|
|
C* This parameter file stores the function codes used by GEMPLT. *
|
||
|
|
C* Log: *
|
||
|
|
C* M. desJardins/GSFC 4/85 GEMPLT 3.1 *
|
||
|
|
C* M. desJardins/GSFC 12/85 Added function codes for curve fitting *
|
||
|
|
C* M. desJardins/GSFC 3/88 Removed RMISSD, etc & moved to GPARMS *
|
||
|
|
C* S. Schotz/GSC 3/90 Added function codes for cloud/weather *
|
||
|
|
C* symbols routines *
|
||
|
|
C* M. desJardins/NMC 10/91 Copied GCURVE codes from MV4 *
|
||
|
|
C* M. desJardins/NMC 11/91 Added codes for GFILL *
|
||
|
|
C* M. desJardins/NMC 11/91 Added new contour routines *
|
||
|
|
C* M. desJardins/NMC 1/92 Add DQDCHR to query device info *
|
||
|
|
C* S. Jacobs/EAI 11/92 Added codes for GMESG *
|
||
|
|
C* S. Jacobs/EAI 6/93 Added codes for GGTPNT *
|
||
|
|
C* J. Cowie/NPS 10/93 Added code FSATMC *
|
||
|
|
C* A. Chang/EAI 12/93 Added code for GSCTBL, GSFLNM, GSPLOT, *
|
||
|
|
C* GSPIXM, GEPIXM, GLOOPC, GSHCAT, GSATIM *
|
||
|
|
C* S. Jacobs/NMC 3/94 Renamed: GSPIXM ==> GSTANM *
|
||
|
|
C* GEPIXM ==> GENANM *
|
||
|
|
C* GSHCAT ==> GSDATT *
|
||
|
|
C* S. Jacobs/NMC 7/94 Removed code FSATAO *
|
||
|
|
C* A. Chang/EAI 8/94 Added code for GTEXTC *
|
||
|
|
C* J. Cowie/COMET 8/94 Added FSATMG - Mcidas Goes *
|
||
|
|
C* J. Cowie/COMET 12/94 Added FSLUTF, CSLUTF - set LUT file *
|
||
|
|
C* J. Cowie/COMET 1/95 Added FSIMGB - Set image bounds *
|
||
|
|
C* J. Cowie/COMET 5/95 Added FSICMN, CSICMN - Set image common *
|
||
|
|
C* J. Cowie/COMET 5/95 Added FSCOLB - Set color in color bank *
|
||
|
|
C* C. Lin/EAI 6/95 Added FSBRGB, CSBRGB - Set color RGB *
|
||
|
|
C* with color bank *
|
||
|
|
C* G. Krueger/EAI 11/95 Removed references to HLS color scheme. *
|
||
|
|
C* J. Cowie/COMET 11/95 Removed FSLUTF, CSLUTF. Added FQCLRS, *
|
||
|
|
C* CQCLRS *
|
||
|
|
C* M. Linda/GSC 12/95 Removed FCLDHT, FSATMC, and FSATNP *
|
||
|
|
C* M. Linda/GSC 2/96 Added FSDEVA and CINITA *
|
||
|
|
C* S. Jacobs/NCEP 5/96 Added code for GSLWIN and GQDATT *
|
||
|
|
C* S. Jacobs/NCEP 5/96 Removed FSDEV, CINITD, FSFLNM, CSFLNM *
|
||
|
|
C* S. Jacobs/NCEP 8/96 Removed FSIMGB *
|
||
|
|
C* M. Linda/GSC 8/96 Added xICNG, xSPCL, and xTURB *
|
||
|
|
C* E. Wehner/EAi 10/96 Added xFRNT *
|
||
|
|
C* S. Maxwell/GSC 11/96 Removed save and restore functions *
|
||
|
|
C* K. Tyle/GSC 2/97 Added FCLPNL and CCLPNL *
|
||
|
|
C* M. Linda/GSC 2/97 Removed CFLUSH and FFLUSH *
|
||
|
|
C* D. Keiser/GSC 3/97 Added xSPLN *
|
||
|
|
C* E. Safford/GSC 4/97 Added code for GTXSY *
|
||
|
|
C* E. Safford/GSC 6/97 Added xTXSY *
|
||
|
|
C* C. Lin/EAI 6/97 Added code for GSROAM, GROAM *
|
||
|
|
C* S. Maxwell/GSC 6/97 Added FSFILL, FQFILL and CSFILL *
|
||
|
|
C* S. Maxwell/GSC 6/97 Added FSGRP, FEGRP and CSGRP *
|
||
|
|
C* G. Krueger/EAI 7/97 Added GETMAP *
|
||
|
|
C* M. Linda/GSC 7/97 Added FLOGO and CLOGO *
|
||
|
|
C* S. Jacobs/NCEP 9/97 Removed FSTXSY, FQTXSY and CSTXSY *
|
||
|
|
C* I. Durham/GSC 12/97 Added FQSIZD *
|
||
|
|
C* S. Jacobs/NCEP 2/98 Added FSSMTH, FQSMTH and CSSMTH *
|
||
|
|
C* S. Jacobs/NCEP 3/98 Added FSDASH, FQDASH, and CSDASH *
|
||
|
|
C* I. Durham/GSC 3/98 Added FDARR, FSDARR, and FQDARR *
|
||
|
|
C* I. Durham/GSC 3/98 Added CDARR, and CSDARR *
|
||
|
|
C* I. Durham/GSC 3/98 Added FHASH, FSHASH, and FQHASH *
|
||
|
|
C* I. Durham/GSC 3/98 Added CHASH, and CSHASH *
|
||
|
|
C* I. Durham/GSC 3/98 Added FSCLR2, FQCLR2, CSCLR2, and CQCLR2*
|
||
|
|
C* S. Jacobs/NCEP 6/98 Removed FSDATT *
|
||
|
|
C* S. Jacobs/NCEP 6/98 Removed FOUTP and COUTP *
|
||
|
|
C* S. Jacobs/NCEP 6/98 Changed F/CSCTBL from CONTROL to COLORS *
|
||
|
|
C* T. Lee/GSC 7/98 Added FQCVSC *
|
||
|
|
C* A. Hardy/GSC 10/98 Added F/CCMBO, F/CSCMBO and FQCMBO *
|
||
|
|
C* D.W.Plummer/NCEP 11/98 Added FCFDRV, FCFFIL and FCFLIN *
|
||
|
|
C* S. Jacobs/NCEP 5/99 Added FSRDUC, FQRDUC and CSRDUC *
|
||
|
|
C* T. Lee/GSC 9/99 Added FSATPX, CSATPX *
|
||
|
|
C* M. Li/GSC 1/00 Added FCNTLN, FCNTBX and FCNTFL *
|
||
|
|
C* A. Hardy/GSC 6/00 Added FARC and CARC *
|
||
|
|
C* M. Li/GSC 04/01 Added FFLBND *
|
||
|
|
C* D. Kidwell/NCEP 6/02 Added FSGTGN and CSGTGN *
|
||
|
|
C* C. Bailey/HPC 1/05 Added FGSAVE and CGSAVE *
|
||
|
|
C************************************************************************
|
||
|
|
INTEGER ACCESS, CONTRL, BOUNDS, MAP, SATLTE, GRAPH
|
||
|
|
INTEGER GRID, PLOT, TRNSFM, ATTRBT, UTILTY, COLORS
|
||
|
|
INTEGER CURVE, CONTOR
|
||
|
|
C*
|
||
|
|
INTEGER FINITP, FENDP, FSMODE, FQMODE
|
||
|
|
INTEGER FCLEAR, FCLOSP, FQDEV, FSDEVA
|
||
|
|
INTEGER FMESG, FGTPNT, FSLWIN, FCLPNL, FGSAVE
|
||
|
|
INTEGER FSVIEW, FQVIEW, FQBND, FEPLOT
|
||
|
|
INTEGER FSMMAP, FSMPRJ, FSMBND, FSMMGN, FSMFIL, FDRGRD, FGTMAP
|
||
|
|
INTEGER FDRMAP, FQMMAP, FQMPRJ, FQMBND, FQMMGN, FQMFIL
|
||
|
|
INTEGER FFLBND
|
||
|
|
INTEGER FSATVS, FQSATN
|
||
|
|
INTEGER FSGRAF, FSGMGN, FDAXIS, FAAXIS, FQGRAF, FQGMGN
|
||
|
|
INTEGER FTICK, FSATIM, FSATMG, FSATPX
|
||
|
|
INTEGER FSGMAP, FSGPRJ, FSGGRF, FQGMAP, FQGPRJ, FQGGRF
|
||
|
|
INTEGER FLINE, FTEXT, FMARK, FBARB, FARRW, FCIRCL, FTEXTC
|
||
|
|
INTEGER FICNG, FSPCL, FTURB, FLOGO, FARC
|
||
|
|
INTEGER FSKY, FWTHR, FPTND, FPWTH, FCTYP, FFILL, FTXSY
|
||
|
|
INTEGER FTRANS, FPTVIS, FSFILL, FQFILL, FSSMTH, FQSMTH
|
||
|
|
INTEGER FSRDUC, FQRDUC
|
||
|
|
INTEGER FSDASH, FQDASH
|
||
|
|
INTEGER FSLINE, FSTEXT, FSBARB, FSARRW, FSMRKR, FSTICK
|
||
|
|
INTEGER FSLPAT, FQLINE, FQTEXT, FQBARB, FQARRW, FQMRKR
|
||
|
|
INTEGER FSSKY, FQSKY, FSWTHR, FQWTHR, FSPTND, FQPTND, FSPWTH
|
||
|
|
INTEGER FQPWTH, FSCTYP, FQCTYP, FSCNTR, FQCNTR
|
||
|
|
INTEGER FQLPAT, FQSYSZ, FQSIZD
|
||
|
|
INTEGER FCONTR, FSMCON, FSTRML
|
||
|
|
INTEGER FQCOLR, FSCOLR, FQCOMP, FSCINT, FSCNAM
|
||
|
|
INTEGER FSCRGB, FQNCOL, FSCOLB, FSBRGB, FQCLRS
|
||
|
|
INTEGER FCYEVL, FCURVE
|
||
|
|
INTEGER FCLGRN, FCSPLN, FCBOXX, FCFILL, FCNTLN, FCNTFL, FCNTBX
|
||
|
|
INTEGER FSCTBL, FSPLOT, FSTANM, FENANM, FLOOPC, FSGRP, FEGRP
|
||
|
|
INTEGER FSROAM, FROAM, FSGTGN
|
||
|
|
INTEGER FSICMN, FQDATT
|
||
|
|
INTEGER FSICNG, FQICNG, FSSPCL, FQSPCL, FSTURB, FQTURB
|
||
|
|
INTEGER FFRNT, FSFRNT, FQFRNT
|
||
|
|
INTEGER FSPLN, FSSPLN, FQSPLN
|
||
|
|
INTEGER FDARR, FSDARR, FQDARR
|
||
|
|
INTEGER FHASH, FSHASH, FQHASH
|
||
|
|
INTEGER FSCLR2, FQCLR2, FQCVSC
|
||
|
|
INTEGER FCMBO, FSCMBO, FQCMBO
|
||
|
|
C------------------------------------------------------------------------
|
||
|
|
C* Access subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( ACCESS = 1 )
|
||
|
|
PARAMETER ( FINITP = 101, FENDP = 102, FSMODE = 103,
|
||
|
|
+ FQMODE = 104 )
|
||
|
|
C
|
||
|
|
C* Control subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( CONTRL = 2 )
|
||
|
|
PARAMETER ( FCLEAR = 202,
|
||
|
|
+ FCLOSP = 204, FQDEV = 206,
|
||
|
|
+ FEPLOT = 207, FMESG = 208, FGTPNT = 209,
|
||
|
|
+ FSPLOT = 212,
|
||
|
|
+ FSTANM = 213, FENANM = 214, FLOOPC = 215,
|
||
|
|
+ FSDEVA = 216, FSLWIN = 217, FCLPNL = 218,
|
||
|
|
+ FSROAM = 219, FROAM = 220, FSGRP = 221,
|
||
|
|
+ FEGRP = 222, FSGTGN = 223, FGSAVE = 224 )
|
||
|
|
|
||
|
|
C
|
||
|
|
C* Bounds subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( BOUNDS = 3 )
|
||
|
|
PARAMETER ( FSVIEW = 301, FQVIEW = 302, FQBND = 303 )
|
||
|
|
C
|
||
|
|
C* Map subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( MAP = 4 )
|
||
|
|
PARAMETER ( FSMMAP = 401, FSMPRJ = 402, FSMBND = 403,
|
||
|
|
+ FSMMGN = 404, FSMFIL = 405, FQMMAP = 406,
|
||
|
|
+ FQMPRJ = 407, FQMBND = 408, FQMMGN = 409,
|
||
|
|
+ FQMFIL = 410 )
|
||
|
|
C
|
||
|
|
C* Satellite subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( SATLTE = 5 )
|
||
|
|
PARAMETER ( FSATVS = 502, FQSATN = 503 )
|
||
|
|
C
|
||
|
|
PARAMETER ( FSATIM = 507, FSATMG = 508, FSICMN = 509,
|
||
|
|
+ FSATPX = 510 )
|
||
|
|
C
|
||
|
|
C* Graph subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( GRAPH = 6 )
|
||
|
|
PARAMETER ( FSGRAF = 601, FSGMGN = 602, FDAXIS = 603,
|
||
|
|
+ FAAXIS = 604, FQGRAF = 605, FQGMGN = 606,
|
||
|
|
+ FTICK = 607 )
|
||
|
|
C
|
||
|
|
C* Grid subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( GRID = 7 )
|
||
|
|
PARAMETER ( FSGMAP = 701, FSGPRJ = 702, FSGGRF = 703,
|
||
|
|
+ FQGMAP = 704, FQGPRJ = 705, FQGGRF = 706 )
|
||
|
|
C
|
||
|
|
C* Plot subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( PLOT = 8 )
|
||
|
|
PARAMETER ( FLINE = 801, FTEXT = 802, FMARK = 803,
|
||
|
|
+ FBARB = 804, FARRW = 805, FCIRCL = 806,
|
||
|
|
+ FSKY = 807, FWTHR = 808, FPTND = 809,
|
||
|
|
+ FPWTH = 810, FCTYP = 811, FFILL = 812,
|
||
|
|
+ FTEXTC = 813, FICNG = 814, FSPCL = 815,
|
||
|
|
+ FTURB = 816, FFRNT = 817, FSPLN = 818,
|
||
|
|
+ FTXSY = 819, FLOGO = 820, FDARR = 821,
|
||
|
|
+ FHASH = 822, FCMBO = 823, FARC = 824 )
|
||
|
|
C
|
||
|
|
C* Transform subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( TRNSFM = 9 )
|
||
|
|
PARAMETER ( FTRANS = 901, FPTVIS = 902 )
|
||
|
|
C
|
||
|
|
C* Attribute subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( ATTRBT = 10 )
|
||
|
|
PARAMETER ( FSLINE = 1001, FSTEXT = 1002, FSBARB = 1003,
|
||
|
|
+ FSARRW = 1004, FSMRKR = 1005, FSLPAT = 1006,
|
||
|
|
+ FQLINE = 1007, FQTEXT = 1008, FQBARB = 1009,
|
||
|
|
+ FQARRW = 1010, FQMRKR = 1011, FQLPAT = 1012,
|
||
|
|
+ FQSYSZ = 1013, FSTICK = 1014, FSSKY = 1015,
|
||
|
|
+ FQSKY = 1016, FSWTHR = 1017, FQWTHR = 1018,
|
||
|
|
+ FSPTND = 1019, FQPTND = 1020, FSPWTH = 1021,
|
||
|
|
+ FQPWTH = 1022, FSCTYP = 1023, FQCTYP = 1024,
|
||
|
|
+ FSCNTR = 1025, FQCNTR = 1026,
|
||
|
|
+ FQDATT = 1028, FSICNG = 1029, FQICNG = 1030,
|
||
|
|
+ FSSPCL = 1031, FQSPCL = 1032, FSTURB = 1033,
|
||
|
|
+ FQTURB = 1034, FSFRNT = 1035, FQFRNT = 1036,
|
||
|
|
+ FSSPLN = 1037, FQSPLN = 1038, FSFILL = 1039,
|
||
|
|
+ FQFILL = 1040, FQSIZD = 1041, FSSMTH = 1042,
|
||
|
|
+ FQSMTH = 1043, FSDASH = 1044, FQDASH = 1045,
|
||
|
|
+ FSDARR = 1046, FQDARR = 1047, FSHASH = 1048,
|
||
|
|
+ FQHASH = 1049, FQCVSC = 1050, FSCMBO = 1051,
|
||
|
|
+ FQCMBO = 1052, FSRDUC = 1053, FQRDUC = 1054 )
|
||
|
|
C
|
||
|
|
C* Utility subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( UTILTY = 11 )
|
||
|
|
PARAMETER ( FCONTR = 1101, FSMCON = 1102, FSTRML = 1103,
|
||
|
|
+ FDRMAP = 1104, FDRGRD = 1105, FGTMAP = 1106,
|
||
|
|
+ FFLBND = 1107 )
|
||
|
|
C
|
||
|
|
C* Color subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( COLORS = 12 )
|
||
|
|
PARAMETER ( FSCOLR = 1201, FSCRGB = 1202, FSCTBL = 1203,
|
||
|
|
+ FSCINT = 1204, FSCNAM = 1205, FQCOMP = 1206,
|
||
|
|
+ FQCOLR = 1207, FQNCOL = 1208, FSCOLB = 1209,
|
||
|
|
+ FSBRGB = 1210, FQCLRS = 1211, FSCLR2 = 1212,
|
||
|
|
+ FQCLR2 = 1213 )
|
||
|
|
C
|
||
|
|
C* Curve subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( CURVE = 14 )
|
||
|
|
PARAMETER ( FCYEVL = 1401, FCURVE = 1402 )
|
||
|
|
C
|
||
|
|
C* Contour subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( CONTOR = 15 )
|
||
|
|
PARAMETER ( FCLGRN = 1501, FCSPLN = 1502, FCBOXX = 1503,
|
||
|
|
+ FCFILL = 1504 )
|
||
|
|
PARAMETER ( FCFDRV = 1505, FCFFIL = 1506, FCFLIN = 1507 )
|
||
|
|
PARAMETER ( FCNTLN = 1508, FCNTFL = 1509, FCNTBX = 1560 )
|
||
|
|
C
|
||
|
|
C------------------------------------------------------------------------
|
||
|
|
C* Device Driver functions
|
||
|
|
C
|
||
|
|
INTEGER DACCES, DATTRB, DCNTRL, DWINDW, DPLOT, DCOLOR
|
||
|
|
C*
|
||
|
|
INTEGER CENDD, CINITP, CQDCHR, CINITA
|
||
|
|
INTEGER CSCOLR, CSARRW, CSLINE, CSMRKR, CSTEXT
|
||
|
|
INTEGER CSBARB, CSLPAT, CQLPAT
|
||
|
|
INTEGER CCLEAR, CCLOSP, CEPLOT, CQDEV
|
||
|
|
INTEGER CMESG, CGTPNT, CSLWIN, CCLPNL, CGSAVE
|
||
|
|
INTEGER CARRW, CBARB, CTEXT, CMARK, CLINE, CTICM, CTEXTC
|
||
|
|
INTEGER CICNG, CSPCL, CTURB, CLOGO
|
||
|
|
INTEGER CSKY, CWTHR, CPTND, CPWTH, CCTYP, CFILL
|
||
|
|
INTEGER CSWNDW, CSCLIP, CSCRGB, CSCINT, CSCOLB, CSBRGB
|
||
|
|
INTEGER CQCLRS, CSCNAM, CQCOMP, CCIRCL, CSPWTH, CSCTYP
|
||
|
|
INTEGER CQCOLR, CSSKY, CSWTHR, CSPTND, CARC
|
||
|
|
INTEGER CQNCOL, CSATIM, CSICMN, CSATPX
|
||
|
|
INTEGER CSCTBL, CSPLOT, CSTANM, CENANM, CLOOPC, CSGRP, CEGRP
|
||
|
|
INTEGER CSROAM, CROAM, CSGTGN
|
||
|
|
INTEGER CSDATT, CQDATT
|
||
|
|
INTEGER CSICNG, CSSPCL, CSTURB
|
||
|
|
INTEGER CSFRNT, CFRNT
|
||
|
|
INTEGER CSSPLN, CSPLN
|
||
|
|
INTEGER CTXSY, CSFILL, CSSMTH, CSRDUC, CSDASH
|
||
|
|
INTEGER CDARR, CSDARR
|
||
|
|
INTEGER CHASH, CSHASH
|
||
|
|
INTEGER CSCLR2, CQCLR2
|
||
|
|
INTEGER CCMBO, CSCMBO
|
||
|
|
C
|
||
|
|
C* Device Access subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DACCES = 1 )
|
||
|
|
PARAMETER ( CENDD = 102, CINITP = 103,
|
||
|
|
+ CQDCHR = 104, CINITA = 105 )
|
||
|
|
C
|
||
|
|
C* Device Attribute subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DATTRB = 2 )
|
||
|
|
PARAMETER ( CSARRW = 201, CSLINE = 202, CSMRKR = 203,
|
||
|
|
+ CSTEXT = 204, CSBARB = 205, CSLPAT = 206,
|
||
|
|
+ CQLPAT = 207, CSSKY = 208, CSWTHR = 209,
|
||
|
|
+ CSPTND = 210, CSPWTH = 211, CSCTYP = 212,
|
||
|
|
+ CSDATT = 213, CQDATT = 214, CSICNG = 215,
|
||
|
|
+ CSSPCL = 216, CSTURB = 217, CSFRNT = 218,
|
||
|
|
+ CSSPLN = 219, CSFILL = 220, CSSMTH = 221,
|
||
|
|
+ CSDASH = 222, CSDARR = 223, CSHASH = 224,
|
||
|
|
+ CSCMBO = 225, CSRDUC = 226 )
|
||
|
|
C
|
||
|
|
C* Device Control subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DCNTRL = 3 )
|
||
|
|
PARAMETER ( CCLEAR = 301, CCLOSP = 303,
|
||
|
|
+ CEPLOT = 305, CQDEV = 306,
|
||
|
|
+ CMESG = 307, CGTPNT = 308,
|
||
|
|
+ CSPLOT = 311, CSTANM = 312,
|
||
|
|
+ CENANM = 313, CLOOPC = 314, CSLWIN = 315,
|
||
|
|
+ CCLPNL = 316, CSROAM = 317, CROAM = 318,
|
||
|
|
+ CSGRP = 319, CEGRP = 320, CSGTGN = 321,
|
||
|
|
+ CGSAVE = 322 )
|
||
|
|
|
||
|
|
C
|
||
|
|
C* Device Window subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DWINDW = 4 )
|
||
|
|
PARAMETER ( CSWNDW = 401, CSCLIP = 402 )
|
||
|
|
C
|
||
|
|
C* Device Plot Subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DPLOT = 5 )
|
||
|
|
PARAMETER ( CLINE = 501, CMARK = 502, CTEXT = 503,
|
||
|
|
+ CBARB = 504, CARRW = 505, CTICM = 506,
|
||
|
|
+ CCIRCL = 507, CSKY = 508, CWTHR = 509,
|
||
|
|
+ CPTND = 510, CPWTH = 511, CCTYP = 512,
|
||
|
|
+ CFILL = 513, CTEXTC = 514, CICNG = 515,
|
||
|
|
+ CSPCL = 516, CTURB = 517, CFRNT = 518,
|
||
|
|
+ CSPLN = 519, CTXSY = 520, CLOGO = 521,
|
||
|
|
+ CDARR = 522, CHASH = 523, CCMBO = 524,
|
||
|
|
+ CARC = 525 )
|
||
|
|
C
|
||
|
|
C* Device Color Subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DCOLOR = 6 )
|
||
|
|
PARAMETER ( CSCOLR = 601, CSCRGB = 602, CSCTBL = 603,
|
||
|
|
+ CSCINT = 604, CSCNAM = 605, CQCOMP = 606,
|
||
|
|
+ CQCOLR = 607, CQNCOL = 608, CSCOLB = 609,
|
||
|
|
+ CSBRGB = 610, CQCLRS = 611, CSCLR2 = 612,
|
||
|
|
+ CQCLR2 = 613 )
|
||
|
|
C
|
||
|
|
C* Device Satellite Subroutines
|
||
|
|
C
|
||
|
|
PARAMETER ( DSAT = 8 )
|
||
|
|
PARAMETER ( CSATIM = 801, CSICMN = 802, CSATPX = 803 )
|