pic.zabstr

<BEGIN-SEGMENT STARTUP> 
<DEFINE-ROUTINE TITLE-SCREEN> 
<END-SEGMENT> 
<BEGIN-SEGMENT 0> 
<CONSTANT YX-TBL <TABLE 0 0>> 
<CONSTANT WIN-TBL <TABLE 0 0 0>> 
<DEFINE-ROUTINE YCEILING> 
<DEFINE-ROUTINE XCEILING> 
<CONSTANT WTBL <LTABLE 0>> 
<DEFINE-ROUTINE MARGINAL-PIC> 
<DEFINE-ROUTINE RESET-MARGIN> 
<END-SEGMENT>