home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / sourcecode / various / savepref.amos / savepref.amosSourceCode
AMOS Source Code  |  1993-01-08  |  484b  |  15 lines

  1. '*             ï¿½1992 by Volker Stepprath             * 
  2. '*  Saves the systemconfiguration in a file on disk  * 
  3. '**** Install buffer ****
  4. BUFFER$=Space$(232)+Chr$(0)
  5. '**** Get configuration set by preferences ****
  6. Areg(0)=Varptr(BUFFER$)
  7. Dreg(0)=233
  8. XGETPREF=Intcall(-132)
  9. '**** Choose file **** 
  10. FILE$=Fsel$("","","Please choose file","to save the preferencesdatas !")
  11. If FILE$<>""
  12.   '**** Save datas of systemconfiguration **** 
  13.   Bsave FILE$,XGETPREF To XGETPREF+232
  14. End If 
  15. Edit