Below is a listing of COMMON /PLTR/, it may be included in programs by using the UNSAVE command in EDI on file [4,4]PLTR.CMN. COMMON /PLTR/ ILun,IDev,IsTerm,IMode,IXMax,IYmax, 1 Cnvrsn,CMag,CnvMag,IX0,IY0,KSetNo,IFancy,IBfDv3, 1 CSize,DeltaH,DeltaV,Upsiln,CosUP,SinUP The definition of a variable can be obtained by typing HELP MYLIB COMMON "variable name". 3 ILUN ILun - Plotter logical unit number. 3 IDEV IDev - Plotter device type code. IDev = 0, non-plotting device 1, Tektronics 4010 2, Tektronics 4014 3, Tektronics 4662 4, Tektronics 4025 3 ISTERM IsTerm - Terminal number. 3 IMODE IMode - Plot mode flag. The plotter is in the plot mode if non-zero. 3 IXMAX IXMax - Maximum X screen coordinate. 3 IYMAX IYMax - Maximum Y screen coordinate. 3 CNVRSN Cnvrsn - Conversion factor. (Screen coordinates/ True inches) 3 CMAG CMag - Magnification factor. 3 CNVMAG CnvMag - Conversion factor. CnvMag = Cnvrsn*Cmag (Screen coordinates/Scale inches) 3 IX0 IX0 - Screen coordinate of the X relocatable origin. 3 IY0 IY0 - Screen coordinate of the Y relocatable origin. 3 KSETNO KSetNo - Character set number. = 0, Terminal characters. 3, Simplex Roman 4, Simplex Greek 5, Duplex Roman 6, Complex Roman 7, Complex Greek 8, Complex Italic 9, Special and Math characters, single sequence access. 10(M), Math and special characters 11(G), Gothic English 12(W), Simplex Script 13, Complex Script 14, Gothic Italian 15, Gothic German 16, Cyrillic 17, Triplex Roman 18, Triplex Italic 20, Miscellaneous characters. 3 IFANCY IFancy - Special features enabled when bit set. = 1, Don't erase screen. = 2, Don't reset magnification or character size or orientation. = 4, Don't reset origin. = 10, Terminal not file. = 100000, Character generating task has been requested. 3 IBFDV3 IBfDv3 - Number of bytes remaining in input buffer of a Tektronix 4662 (IDev = 3). 3 CSIZE CSize - Character height. (Scale inches) 3 DELTAH DeltaH - Depth of a line feed. (Scale inches) 3 DELTAV DeltaV - Width of a space. (Scale inches) 3 UPSILN Upsiln - Character angle. (Degrees) 3 COSUP CosUp - COS( Upsiln*Pi/180. ) 3 SINUP SinUp - SIN( Upsiln*Pi/180. )