home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / MBUG / MBUG013.ARC / DRAW.PRO < prev    next >
Text File  |  1979-12-31  |  1KB  |  26 lines
  1. procedure DRAW;
  2.  
  3. { This procedure developed inr Turbo Pascal for
  4.     the MicroBee LORES Graphics by Bob Burt
  5.  
  6.   Use this procedure in conjunction with the
  7.             procedure PLOT.PRO                   }
  8.  
  9. begin
  10.   inline ($18/$0B/0/0/0/0/0/0/0/0/0/0/0/$3A/*-3/
  11.          $B7/$28/$0D/$21/0/0/$ED/$5B/*-18/$B7/
  12.          $ED/$52/$22/*-24/$3A/*-21/$B7/$28/$0D/
  13.          $21/0/0/$ED/$5B/*-35/$B7/$ED/$52/$22/
  14.          *-41/$DD/$21/*-51/$DD/$66/1/$DD/$6E/3/
  15.          $AF/$CD/*+34/$2A/*-64/$ED/$5B/*-64/$19/
  16.          $22/*-72/$2A/*-73/$ED/$5B/*-73/$19/$22/
  17.          *-81/$3A/*-78/$3D/$32/*-82/$20/$D3/$C9/
  18.          $F5/$5C/$7D/$CB/$3B/$16/0/$30/1/$14/6/$FF/
  19.          4/$D6/3/$F2/*-4/$C6/3/7/$82/$4F/$68/$26/0/
  20.          $D5/6/4/$29/$10/$FD/$54/$5D/$29/$29/$19/$D1/
  21.          $16/0/$19/$11/0/$F0/$19/6/0/$F1/$B7/$20/$0C/
  22.          $DD/$21/*+22/$DD/9/$7E/$DD/$B6/0/$77/$C9/$DD/
  23.          $21/*+16/$DD/9/$7E/$DD/$A6/0/$18/$F2/$81/$82/
  24.          $84/$88/$90/$A0/$BE/$BD/$BB/$B7/$AF/$9F);
  25. end; {procedure draw}
  26.