home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / libbasic / blank.bas < prev    next >
BASIC Source File  |  1992-04-27  |  387b  |  26 lines
  1.  
  2.  
  3.     WindowWidth = 150
  4.     WindowHeight = 150
  5.  
  6.     UpperLeftX = 20
  7.     UpperLeftY = 20
  8.  
  9.     open "Window 1" for graphics as #win1
  10.  
  11.     UpperLeftX = 40
  12.     UpperLeftY = 40
  13.  
  14.     open "Window 2" for graphics as #win2
  15.  
  16.     UpperLeftX = 60
  17.     UpperLeftY = 60
  18.  
  19.     open "Window 3" for graphics as #win3
  20.  
  21.     input r$
  22.  
  23.     close #win1
  24.     close #win2
  25.     close #win3
  26.