home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / qb_pds / qbasic_1 / getinput.bas < prev    next >
BASIC Source File  |  1992-07-02  |  154b  |  19 lines
  1. DECLARE SUB getinputs (x, y)
  2.           
  3.  
  4.             getinputs x, y
  5.  
  6.  
  7.  
  8. PRINT x
  9. PRINT y
  10.  
  11. END
  12.  
  13. SUB getinputs (x, y)
  14. x = 1
  15. y = 2
  16.  
  17. END SUB
  18.  
  19.