CP/M/CPM_CDROM.iso/mbug/mbug022.arc/INVERSE2.I

Text File | 1979-12-31 | 384b | 22 lines

procedure Inverse;
begin
 Inline ($3E/1/
         $D3/$0B/
         $11/$F800/
         $21/$F000/
          01/$800/
          $7E/
          $2F/
          $12/
          $13/
          $23/
          $0B/
          $79/
          $B0/
          $20/$F6/
          $3E/00/
          $D3/$0B
          )

end;