MCD/Tape Variables

The $CECODE Variable

$\textbf{{\char36}CECODE}$

Current CODE identifier being processed

Type: String, Read-only

The $CECODE variable identifies the CODE identifier that is currently being processed by Control Emulator, or will be the special value CODE_NONE when a code identifier is not being processed.

The $DISPLY Variable

$\textbf{{\char36}DISPLY}$

Last operator message string input

Type: String, Read-only

The $DISPLY variable holds the last operator message string input by the control emulator, when processing a CODE_DISPLY command.

The $LMCD Variable

$\textbf{{\char36}LMCD}$

Last MCD block input

Type: String, Read-only

The $LMCD variable holds the last block of MCD input by the control emulator.

The $MCD Variable

$\textbf{{\char36}MCD}$

Current MCD block being processed

Type: String, Read-only

The $MCD variable holds the current block of MCD being processed by the control emulator.

The $NMCD Variable

$\textbf{{\char36}NMCD}$

Next MCD block to be processed

Type: String, Read-only

The $NMCD variable holds the next block of MCD to be processed by the control emulator.

The $MCDNO Variable

$\textbf{{\char36}MCDNO}$

Current MCD block number

Type: Numeric, Read-only

The $MCDNO variable holds the holds the line number of the current MCD block in the current MCD input file as defined by the $TAPEN variable. This is not the same as the $SEQNO variable, which identifies the block sequence number (e.g., typically the N register).

The $MCDRD Variable

$\textbf{{\char36}MCDRD}$

Last MCD block read by TAPERD or $FGET/$FGETR

Type: String, Read/Write

The $MCDRD variable holds the block of MCD last read by a TAPERD command, or by calling either the $FGET or $FGETR functions. This variable is writable. Calling TAPEWT in a macro produces the same result as EXEC/NOW,$MCDRD.

The $OPSKIP Variable

$\textbf{{\char36}OPSKIP}$

Current OPSKIP (block delete) level

Type: Numeric, Read-only

The $OPSKIP variable tracks the current OPSKIP (also called block-delete) level. On machines with a single level of OPSKIP, $OPSKIP will be set to 1 (one) when OPSKIP is enabled and 0 (zero) when OPSKIP is disabled. On machines with multiple OPSKIP levels, $OPSKIP indicates the number of different OPSKIP levels currently active.

The $OPSKIPL Variable

$\textbf{{\char36}OPSKIPL}\textbf{(}\mathit{level}\textbf{)}$

OPSKIP (block delete) status

Type: Logical, Read/Write

The $OPSKIPL array variable tracks the state of OPSKIP levels 1 through 9. $OPSKIPL(1) will be $TRUE if OPSKIP level 1 is active, otherwise it will be set to $FALSE. Similarly, $OPSKIPL(2) through $OPSKIPL(9) will be set depending on the state of OPSKIP levels 2 through 9.

The OPSKIP state can be modified under macro control by setting the OPSKIPL array positions true or false.

The $SEQNO Variable

$\textbf{{\char36}SEQNO}$

Current sequence number

Type: Numeric, Read/Write

The $SEQNO variable contains the sequence number (e.g., N register value) of the current block.

The $TAPEN Variable

$\textbf{{\char36}TAPEN}$

Primary tape file name

Type: String, Read-only

The $TAPEN variable contains the primary tape file name as specified on the CERUN command line.

The $TPRINT Variable

$\textbf{{\char36}TPRINT}$

Last MCD comment string input

Type: String, Read-only

The $TPRINT variable holds the last MCD comment string input by the control emulator, when processing a CODE_TPRINT command.

The $XMCD Variable

$\textbf{{\char36}XMCD}$

Unrecognized MCD

Type: String, Read/Write

The $XMCD variable holds the portion of the current block of MCD that does not match any known CODE or DATA entities. Following the Block Shutdown Macro (if any), this variable is tested and if non-blank, a diagnostic is output showing the unrecognized text. $XMCD is settable.