Google
 

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_3_19910112 - stanford/makimp/impdef.sai
There are no other files named impdef.sai in the archive.
! 	Impress file characteristics and painting codes;


define OutRecLen	=	   512,	comment words/page;
       OutBpB		=	     8,	comment bits/byte;
       OutBpR		=	  2048,	comment bytes/record(page);
       OutBpW		=	     4, comment bytes/word;
       OneByteMsk 	=         '377, comment rightmost eight bits;
       TwoByteMsk 	=      '177400, 
       ThreeByteMsk 	=    '77600000,
       imagenmark 	= '11133260547, comment "Imag" in 8 bit bytes;
       impresmark 	= '11133250162;	! "ImPr" in 8 bit bytes;


! **********************************************************************
! Impress instruction codes to be output to the .IMP file.		
! Documentation is contained in the Impress Manual.  
!
! For instructions with parameters, < > stands for a one byte and << >> 
! a two byte parameter.
! 
! Note that font and character definitions and deletions must occur at
! the beginning of a page, followed by typesetting commands.  
! **********************************************************************;

define I!bskip  = '320, comment 208: set baseline skip to <<bskip>>;
       I!marg   = '321, comment 209: set margin to <<margin>>;
       I!setsp  = '322, comment 210: set space width <<s>>;

       I!space 	= '200, comment 128: advance x by space width;
       I!1spac 	= '201, comment 129: advance x by space+1;
       I!mov   	= '202, comment 130: change x by <x> <I!mov-repeated>;
       I!mp    	= '203, comment 131: change x by plus 1;
       I!mm    	= '204, comment 132: change x by minus 1;
       I!h      = '303, comment 195: horizontal change <<x>>;
       I!v      = '304, comment 196: vertical change <<y>>;
       I!nl     = '305, comment 197: newline, go to next line at left margin;

       I!srule  = '300, comment 192: rule <wid> <ht> <voff>;
       I!brule  = '301, comment 193: big rule <<wid>> <<ht>> <<voff>>;

       I!sgly   = '306, comment 198: a small glyph
				      <<font-char>> <adv> <w> <x> <h> <y>
								      {mask};
       I!bgly   = '307, comment 199: a big glyph 
				     <<font-char>> <<adv>> <<wid>> <<x>> 
							 <<ht>> <<y>> {mask};

       I!delg   = '311, comment 201: delete char <<font-char>>;

       I!f	= '317, comment 207: set cur font to <f>;
 
       I!page   = '325, comment 213: output the page;
       I!endp   = '333, comment 219: end page;

       I!eof   	= '377; comment 255: end of file;