The following listing was created by Neil Grantham for his own use

I have converted it into html for access by other users

Variables returned from the command QVAR ALL

VARIABLE

 

TYPICAL VALUE

MEANING

ARCCT$

(S)

0.4 30 5

Arc Factor (Shows: Curve factor, Max angle, Min angle)

ARCFC$

(S)

0.4

Curve Factor

AREA$

(S)

345

Area of current element

ASP$C

(S)

1

Aspect of current element

ATT

(S)

'D:\Users\Neilg'

Attachment point

ATT$

(S)

'D:\Users\Neilg'

Current Directory

BAT$3D

(U)

'D:\NGI\NG31FCS\MASTER_PROJECT\
M3D\COMMAND\JOB3D.BAT\'

3D Batch queue program

BEG$EP

(U)

':\'

Beginning delimiter for directories

BIN$2D

(U)

'M2D\BIN\'

MEDUSA 2D Binaries directory (Relative path)

BIN$MD

(U)

'MED\BIN\'

MEDUSA System Binaries directory (Relative path)

BKOUT$

(S)

0

MDI backout setting (1 True, 0 False)

BRKNO$

(S)

-1

Number of Breaks before breakout occurs

BTNSL$

(S)

'DELV'

Mouse Button Assignment |

BTNSM$

(S)

'@[*** Command Aborted ***@]@A'

Mouse Button Assignment | - Shifted

BTNSR$

(S)

'@VTEXT$'

Mouse Button Assignment |

BTNUL$

(S)

'@O(AUT@O)CP'

Mouse Button Assignment |

BTNUM$

(S)

' '

Mouse Button Assignment | - Unshifted

BTNUR$

(S)

'@VCOM$'

Mouse Button Assignment |

CLASS$

(S)

1

Class of current element

CLASS$

(S)

1

Class of current element

CMDL$

(S)

'qvar all'

Last typed command

CODE$

(S)

1

Current sheet Code setting

COM

(S)

'HIGX'

Previous command line

COM$

(S)

'HIGX'

Previous command

CPU$

(S)

45.765

Elapsed time in seconds - current MEDUSA session

CPF$C

(S)

1

Copy protection flag of current element

DAT

(S)

'24-NOV-1998'

System Date

DATE$

(S)

'TUE NOV 24 1998'

Current Date

DATMP$

(S)

0 0

Datum of current element in Polar Co-ordinates

DATUM$

(S)

0 0

Datum of current element (X-Y)

DEVI$W

(U)

'WIN'

Device Graphics

DIMD$

(S)

'HOR'

Dimensioning direction

DIMDU$

(S)

''

Dual Dimensioning set

DIMF$

(S)

'_._'

Dimensioning linear format

DIMFL$

(S)

'ON'

Dimensioning Flip control (On/Off/Force)

DIMH$

(S)

4

Dimensioning text height

DIML$

(S)

4

Dimensioning layer number

DIMS$

(S)

'BSI'

Dimensioning standard

DIMSP$

(S)

0

Dimensioning Line spacing

DIMT$

(S)

'CHA'

Dimensioning type

DIMZ$

(S)

'ON'

Dimensioning trailing zero's (On/Off)

DIN$TL

(S)

'NORMAL'

 

ECHO$

(S)

2

Echo Setting

END$EP

(U)

'\'

End delimiter for directories

ENDCL$

(S)

0

Current element is last of clump (0 False, 1 True)

ENDSH$

(S)

0

Current element is last of sheet (0 False, 1 True)

EOF$

(S)

0

End of file Character

ERBEL$

(S)

2

Error Bell Setting (0 off, 1 Info, 2 on, 3, error, 4 hard, 5 fatal)

ERMES$

(S)

1

Error Message State

ERPAU$

(S)

2

Error Pause setting (0 off, 1 Info, 2 On/Warn, 3 error)

ERROR$

(S)

0

Worst Error in previous line (0 none, 2 Warn, 3 error)

ESC$

(S)

'@'

Escape Character (MEDUSA)

FIL

(S)

'D:\FILES\FRED.SHE'

Sheet file name

FILE$

(S)

'D:\FILES\FRED.SHE'

Sheet file name

FL$POS

(U)

'.flt'

Flat filename suffix

FL$PRE

(U)

''

Flat filename prefix

GRID$

(S)

0

Grid On/Off

GRIDA$

(S)

30 30 0 0

Grid Angles

GRIDP$

(S)

1

Grid Pen number

GRIDS$

(S)

5 5

Grid Spacing (Default 5 5)

GRIDT$

(S)

'CARTESIAN'

Grid type

GRIDO$

(S)

0 0

Grid Origin

GROUP$

(S)

'LGR'

Group line type

HEI$C

(S)

5

Height of current element

HITRA$

(S)

2

Hit radius for probes

HLP$2D

(U)

'D:\NGI\NG31FCS\
MED2D\M2D\HELP'

MEDUSA Help file location

HLP$PL

(U)

'D:\NGI\NG31FCS\MEDPLOT\
PLOT\MEDUTIL_HELP'

Plot Help

HOM

(S)

'd:\users\neilg'

Home Directory

HOME$

(S)

'd:\users\neilg'

Home Directory

HOST$

(S)

'HAMMERBEAM'

Machine name

HVP$C

(S)

Layer status of current element
(Hit, Vis, Prot)

 

ID$C

(S)

0

Identifier of current element

INTOL$

(S)

0.02

Intersection Probe Tolerance.

INTRA$

(S)

2.5

Intersection Probe radius

KBRED$

(S)

0

Indicating type ahead

LAY$C

(S)

'1'

Layer of current element

LAYDT$

(S)

0

Layer Datum

LAYFP$

(S)

''

Layer Full protection

LAYMP$

(S)

''

Layer modified protection

LAYPR$

(S)

''

List of protected layers

LAYHT$

(S)

'0/*'

List of hittable layers

LAYPR$

(S)

'0/*'

List of protected layers

LAYTR$

(S)

'0/*'`

List of transformable layers

LAYVS$

(S)

'0/*'

List of visible layers

LCPT$

(S)

0

Vertex number of current line point

LEGIB$

(S)

5

 

LEN$

(S)

370

Length of current line segment

LEV$C

(S)

0

Level in data structure for current element (0 = M10, 1 = Sheet etc)

LFN$

(S)

'LIN'

Current point line function

LFUV$

(S)

3

Point function as a number

LFUVN$

(S)

'F00 '

Point function as a name

LINE$

(S)

113.81 25 1 2 0

Current line point record

LNL$C

(S)

370

Total line length of current element

LNPTS$

(S)

2

Number of points in current line

LPLIN$

(S)

600

Current Program line number

M$ARCH

(U)

'i386'

Machine Architecture

M$TYPE

(U)

'pc'

Machine Type

TMP$MD

(U)

'c:\temp\'

MEDUSA Temp directory

GLBL$X

(U)

'MED\BIN\GLOBAL.BIN'

Globals Location

MAC$2D

(U)

'M2D\MACRO\'

MEDUSA 2D Macro directory (Relative path)

MAC$3D

(U)

'M3D\MACRO\'

3D Macro directory (Relative path)

MAC$IF

(U)

'IF\MACRO\'

 

MAC$IG

(U)

'D:\NGI\NG31FCS\
MEDIGES\IF\MACRO\'

IGES Macro directory

MAC$PJ

(U)

'D:\NGI\NG31FCS\MASTER_PROJECT\
IF\MACRO\'

Project Macro's

MAG$C

(S)

1

Magnification of current element

MAXRA$

(S)

50

Maximum probe radius

MBRD$W

(U)

5

 

MD$POS

(U)

'.mod'

Model filename suffix (VMS and NT default)

MD$PRE

(U)

''

Model filename prefix (Unix default)

MES$2D

(U)

'M2D\MESSAGE\'

MEDUSA 2D Message directory (Relative path)

MES$3D

(U)

'M3D\MESSAGE\'

3D Message directory (Relative path)

MES$IF

(U)

'MED\MESSAGE\'

 

MHDR$W

(U)

5

 

MID$EP

(U)

'\'

Middle delimiter for directories

MINS$W

(U)

0

 

MIR$C

(S)

Mirror status of current element

 

MNUCL$

(S)

0

Number of columns in current menu (MenuDef mode only)

MNUDF$

(S)

''

MenuDef mode flag

MNUNO$

(S)

0

Current Menu number (MenuDef mode only)

MNURW$

(S)

0

Number of rows in current menu (MenuDef mode only)

MODE$

(S)

'FRE'

Probe Mode

MXLAY$

(S)

1023

Maximum permissible MEDUSA Layer

NEARA$

(S)

2.5

Near Probe radius

NUMDP$

(S)

11

Number of decimal places for numbers

NXVCL$

(S)

0

Flag set if NEX moves to end of clump

NXVLN$

(S)

0

Flag set if NEX moves to end of line

NXVSH$

(S)

0

Flag set if NEX moves to end of sheet

OFFAT$

(S)

0.25

Offsetting continuity tolerance

OFFCR$

(S)

-1

 

OFFM$

(S)

'ROLL'

Offset Roll mode

OFFPT$

(S)

5

Offsetting positional tolerance

ORT$

(S)

20

Orthogonalization angle

OS$TYP

(U)

'win_nt'

Operating system type

PARACO

(S)

'SCO'

Parametric Instance clump text type

PARARP

(S)

'SAT'

Parametric symbol attachment text type

PARINS

(S)

'SPS'

Parametric symbol definition text type

PARBAS

(S)

'LBL'

Parametric baseline line type

PARBOX

(S)

'LPV'

Parametric Box line type

PARCOM

(S)

'TCO'

Parametric Command text type

PARDAT

(S)

'PVG'

Parametric datum prim type

PARDMS

(S)

'000'

 

PARINT

(S)

11

 

PARNDA

(S)

'ATP'

Parametric attachment point text type

PARPER

(S)

10

 

PARSLN

(S)

'SWL'

Parametric Window line (Not used)

PARSPM

(S)

'SWP'

Parametric Window datum prim (not used)
NOTE The above two are for backward compatibility only

PARTAN

(S)

12

 

PATH$

(S)

''

DDL path of current element

PDS$C

(S)

0

Distance between last two probes in stack

PIC$C

(S)

1

Picture of current element

PIT$C

(S)

1

Pitch of the current element

PL$

(U)

'hpgl2q'

Default Plot queue

PL$001

(U)

'hpgl2q'

Plot queue 1

PL$QTY

(U)

1

Default Plot quantity

PLQ$MD

(U)

'd:\projects\plotpr31'

Plot project directory

PRBS$X

(S)

0 0 0 0 0 0 0 0 0 0

X Co-ords of latest Probe (Sheet units)

PRBS$Y

(S)

0 0 0 0 0 0 0 0 0 0

Y Co-ords of latest Probe (Sheet units)

PRBU$X

(S)

0 0 0 0 0 0 0 0 0 0

X Co-ords of latest Probe (User units)

PRBU$Y

(S)

0 0 0 0 0 0 0 0 0 0

Y Co-ords of latest Probe (User units)

PRBUP$

(S)

0 0

Polar Version of PROBU$

PRE$C

(S)

'HIGH'

Precision of current element

PREC$

(S)

'HIGH'

Sheet Precision

PRECI$

(S)

'HIGH'

Sheet Precision

PROBE$

(S)

0 0

Latest Probe (Sheet Units)

PROBP$

(S)

0 0

Polar version of PROBE$

PROBU$

(S)

0 0

Latest Probe

PROM$

(S)

''

User Prompt

PXCUR$

(S)

436 853

 

PXPRB$

(S)

0 0

 

READY$

(U)

''@vatt >'' (Expression)

Ready Prompt in MEDUSA. (Useful in R12)

REPRA$

(S)

0

Repeat radius

RESL$W

(U)

1024 768

Resolution.

RESLT$

(S)

0

Fortran Value returned

REV$

(S)

3 1 0

MEDUSA Revision Number (3.1 in this case)

RP$POS

(U)

'.prt'

Report filename suffix (VMS and NT default)

RP$PRE

(U)

''

Report filename prefix (Unix default)

SAV$2D

(U)

'@ttsh'

2D Save expression

SAV$3D

(U)

'@TTSH'

3D Sheet saving expression

SCALE$

(S)

1 1

Sheet scale

SD$POS

(U)

''

Sub-directory suffix

SD$PRE

(U)

''

Sub-directory prefix

SEGRA$

(S)

2.5

Segment Probe radius

SEQ$C

(S)

0

Sequence number of current element

SH$POS

(U)

'.she'

Sheet filename suffix (VMS and NT default)

SH$PRE

(U)

''

Sheet filename prefix (Unix default)

SHE$2D

(U)

'D:\NGI\NG31FCS\MED2D\M2D\SHEET\'

2D Sheet library directory

SHE$3D

(U)

'D:\NGI\NG31FCS\MED2D\
M3D\SHEET\'

3D Sheet library directory

SHEES$

(S)

594 420

Sheet Size (Sheet Units)

SHEET$

(S)

594 420

Sheet size (User Units)

SHMOD$

(S)

0

Set if sheet has been modified (1 True, 0 False)

SIDE$W

(U)

0

Side Window used (0 = no)

SMEN$W

(U)

0

 

STIME$

(U)

'(eval(time$[1;2])*3600 + eval
(time$[4;5])*60 + eval
(time$[7;8]))' (Expression)

 

SY$POS

(U)

'.sym'

Symbol filename suffix (VMS and NT default)

SY$PRE

(U)

''

Symbol filename prefix (Unix default)

SYM$2D

(U)

'D:\NGI\NG31FCS\MED2D\M2D\SYMBOL\'

2D Symbol library directory

SYS$SR

(S)

0

 

SYS$MR

(S)

0

When set to nonzero, enables paging through output from MEDUSA commands such as ls, more and listf

SYS$TB

(S)

0

When set to nonzero, the MEDUSA list and save commands have partial support for indentation

SYS$LS

(S)

0

When set to nonzero, the output from MEDUSA ls and listf commands is the same as the dir (VMS) and ls (Unix) OS commands

TABLT$

(S)

4

Number of tablet areas

TEX

(S)

''

Input text buffer

TEX$C

(S)

'150'

Text of current element

TEXT$

(S)

''

Input Text Buffer ('' indicates empty)

TIM

(S)

'12:31:19'

System Time

TIME$

(S)

'12:31:19'

Current Time

TIMES$

(S)

0

Iteration Count on previous loop

TMEN$W

(U)

0

 

TSY$3D

(U)

'\'

 

TXT$RF

(S)

'LEG'

 

TYPE$

(S)

'M10'

CAN code of current element

UID

(S)

'00000122'

User ID

UID$

(S)

'00000122'

Unique User identifier

UNITA$

(S)

'DEG '

Current angular units

UNITS$

(S)

'MM '

Current sheet units

UNITT$

(S)

'MM '

Current User units

USER$

(S)

'neilg'

User name

USR

(S)

'neilg'

Current User

VBRD$W

(U)

5

 

VHDR$W

(U)

18

 

VIEW$W

(U)

0 0 1014 650

View window co-ordinates.

VINS$W

(U)

0

 

WILD$M

(U)

'*'

Multiple wildcard character

WILD$S

(U)

'?'

Single wildcard character

WINDS$

(S)

0 594 0 420

Current Window - Sheet units (x1 x2 y1 y2)

WINDU$

(S)

0 594 0 420

Current Window - User Units (x1 x2 y1 y2)

WINM$

(S)

2622 2448

Maximum Sheet Window size

WMAN$W

(U)

'WIN'

 

WSD$X

(U)

'D:\NGI\NG31FCS\MASTER_PROJECT\
med\ws\ws_default\'

Workstation set up file

XP$POS

(U)

'.sxp'

2D properties filename suffix

XP$PRE

(U)

''

2D properties filename prefix

XYL

(S)

0 0

Latest probe (Sheet units)

 

 

 

 

Variables marked thus:- TEXT$ may be altered with the 'Let' command

Variable that may be set with alternate commands are:-

VARIABLE

ALTERNATE

ARCFC$

ARCFAC

CODE$

COD

GROUP$

GRO

HITRA$

HITRAD

INTRA$

INTRAD

LAYDT$

LAYDAT

MAXRA$

MAXRAD

NEARA$

NEARAD

ORT$

ORT

REPRA$

REPRAD

SEGRA$

SEGRAD

Escape Sequences

@@ Inserts the@ escape character itself.

@A Aborts the current command line.

@C Concatenates the next record (line of data or variable) with this one.

@E+ Enables echoing.

@E- Disables echoing up to the end of the line. More complex command echoing can be handled as in this example:

@E-ech off

if (1 .eq. 2) then

@e-ech on

write "impossible"

@e-ech off

endif

@H Reserved (used in the Help on Menu Probe system).

@I Inserts the next record at this point.

@J Reserved.

@K Reads the next record in keyboard mode when in cursor mode.

@L Interprets subsequent characters as lowercase.

@M<variable> Inserts the named variable at this point; used for variable names of three characters.

@N Simulates a new line.

@O+ Enables optional section.

@O- Disables optional section.

@O(section@O)Defines optional section.

Any optional section definition and the control of it (enable, disable) must come through the same datastream: both must be contained in a macro or both on a tablet or screen menu.

@R Resets the syntax analyzer to its initial state (specific to 2D drafting).

If you use@R to escape from the middle of a command, MEDUSA may be left in an indeterminate

state. You should terminate your MEDUSA session as quickly as possible and start again to ensure that there is no corruption of the sheet database.

@S Queries current syntax state.

@Ttext_type Inserts the first text in the sheet having the specified type into the current command line (specific to 2D drafting).

@U Interprets subsequent characters as uppercase.

@Vvariable Inserts the named variable at this point; used for variable names of up to six characters. Variable

names shorter than six characters must be delimited using @.

In certain circumstances a fault may occur when you use @V as part of an if command. You can avoid this problem by setting a variable outside the if command using @V and then inserting the variable in the if command. For example:

let NEWV =@Vvariable_name

if (NEWV.eq.COMP) then.......

@X Aborts the input line up to the@X; executes remainder of input line up to@N or Return.

@Ytext_type Either inserts the first text in the current clump of the specified text type into the input record at this point, or if the current element is text of the type specified then inserts this text into the input record at this point. Specific to 2D drafting.

@Ttext_type Inserts the first text in the sheet having the specified text type into the current command line (specific to 2D drafting).

@Z Deletes the last character in the input record.

@~ Disables escape processing up to Return.

@. Delimits a variable name; indicates the end of a variable name of less than six characters so that subsequent characters are not assumed by MEDUSA to be part of the variable name.

@(comment@) Comment; used in command files or macros.

@<prompt@> Prompt; used in command files or macros.

@[prompt@] Prompt in menu definition; used in command files or macros.
Go back to Mike Nelsons Home Page

Go back to the CAD Page

This site is created and maintained by Mike Nelson for his own pleasure

© 1997 mike.nelson@camcon.co.uk