home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 594a.lha / IOPack_v1.04 / sample.s < prev   
Text File  |  1991-06-13  |  262b  |  26 lines
  1.     LIST
  2.  
  3. ;Name:
  4. ;TA:
  5. ;Session:
  6.  
  7.     include "IOPackDefs.txt"
  8.     list
  9.  
  10. ;DC's
  11.  
  12. MyWindowTitle    dc.b    'This is an IOPack Window.',0
  13.  
  14. ;DS's
  15.  
  16. *Main Program
  17.  
  18. main    lea    MyWindowTitle,a0
  19.     jsr    MakeWindow
  20.     tst.l    d0
  21.     beq.s    end_main
  22.     jsr    WrtIOInfo
  23.     jsr    WaitForEvent
  24. end_main    jsr    Exit
  25.  
  26.