home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Science / Science.zip / goat006.zip / SRC.ZIP / goatsrc / SubProcs / saveini < prev    next >
Text File  |  2002-08-17  |  476b  |  17 lines
  1. /* save to the ini file */
  2. CALL LINEOUT iniloc,imageeditor,1
  3. CALL LINEOUT iniloc,imageparameters
  4. CALL LINEOUT iniloc,imageautorun
  5. CALL LINEOUT iniloc,texteditor.0
  6. CALL LINEOUT iniloc,texteditor.1
  7. CALL LINEOUT iniloc,texteditor.2
  8. CALL LINEOUT iniloc,textparameters.0
  9. CALL LINEOUT iniloc,textparameters.1
  10. CALL LINEOUT iniloc,textparameters.2
  11. CALL LINEOUT iniloc,textautorun
  12. do i=1 to 16
  13.   CALL LINEOUT iniloc,curocrval.i
  14. end
  15. drop i
  16. rc=stream(iniloc,'c','close')
  17.