home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / FGL304D.ZIP;1 / EXBAS.ARJ / FGDOC / EXAMPLES / BASIC / 05-14.BAS < prev    next >
Encoding:
BASIC Source File  |  1994-01-24  |  237 b   |  22 lines
  1. REM $INCLUDE: 'fastgraf.bi'
  2.  
  3. DEFINT A-Z
  4.  
  5. DIM Zeroes(16)
  6.  
  7. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8.  
  9. FOR I = 0 TO 15
  10.    READ Zeroes(I)
  11. NEXT
  12.  
  13. Mode = FGgetmode
  14. FGsetmode 13
  15.  
  16. FGpalettes Zeroes()
  17.  
  18. FGsetmode Mode
  19. FGreset
  20.  
  21. END
  22.