18.08.2013 Views

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

ID$–Identification Line Routine<br />

Bit 32<br />

Bit 31<br />

Clear: line spacing for first PCW is 1 (next line).<br />

Set: line spacing for first PCW is 07777 (top of page).<br />

Clear: do not print the ID$ output.<br />

Set: call I$DPRINT to print all ID$ output.<br />

The following are two examples of generating the ID$ packet with I$DPKT:<br />

Example 1<br />

$(2)<br />

IDPACKET I$DPKT ‘IDOUTPUT’ ‘Collector 31R1’<br />

In example 1, the I$DPKT procedure generates an 11-word packet at location IDPACKET<br />

under location counter 2. The I$DPKT procedure also allocates space following the ID$<br />

packet for a buffer, which will contain the ID$ output. IDOUTPUT specifies the location<br />

of the first word of this buffer. I$DPKT determines the length of the buffer (in this<br />

example, 14 words).<br />

I$DPKT also stores the ASCII string 'Collector 31R1' following the ID$ packet. The<br />

options bits parameter is omitted. This sets all option bits to zero.<br />

Example 2<br />

$(4)<br />

IDPAC I$DPKT 20,IDLINE 27,PGMIDENT 026<br />

IDLINE $RES 20<br />

PGMIDENT ‘Math Quiz Program (Level 8)’<br />

In example 2, the I$DPKT procedure generates an 11-word packet at location IDPAC<br />

under location counter 4. ID$ generates the identification line in the 20-word data area at<br />

location IDLINE. ID$ uses the 27-character string at location PGMIDENT for the program<br />

description part of the identification line.<br />

The octal code 026 sets condition bits 34, 33, and 31. This directs ID$ to exclude the<br />

creation date and time from the identification line, use the short format for execution<br />

data and time, and print the identification line.<br />

11–4 7833 1733–004

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!