home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 110 / EnigmaAmiga110CD.iso / software / varie / mccontrol / modules / empty_mcm.asm < prev    next >
Assembly Source File  |  2000-03-02  |  3KB  |  85 lines
  1. ;----------------------------------------------------------------------------
  2. ;    Empty.mcm by Guido Mersmann
  3. ;----------------------------------------------------------------------------
  4.     include "Include.i"
  5.     ;include "SRC.MC_ModuleInclude"
  6.     output Sourcecodes:MCControl/Modules/Empty.mcm
  7.     opt o+,w-
  8. ;----------------------------------------------------------------------------
  9. Version = 1
  10. Revision = 12
  11. Day = 19
  12. Month = 02
  13. Year = 00
  14. ;----------------------------------------------------------------------------
  15. ;--- Macros
  16. Version_String    MACRO
  17.     dc.b "$VER: ",\1,' \<Version>.\<Revision>'," (\<Day>.\<Month>.\<Year>) ",'\2',0
  18.     ENDM
  19. ;----------------------------------------------------------------------------
  20. ;--- Your defines
  21.  
  22. ;----------------------------------------------------------------------------
  23.     RSSET Module_SIZEOF
  24. ;--- User Data
  25. Module_UserData    rs.b 0
  26. ;--- Insert Userdata here!
  27. Module_UserData_End    rs.b 0
  28. ;----------------------------------------------------------------------------
  29. ;----------------------------------------------------------------------------
  30. DModule_Code    rts
  31. DModule_Version    dc.w Module_VersionNumber
  32. DModule_ID    dc.l Module_Identifier
  33. DModule_Flags    dc.l ModuleF_EnableModuleInfo ;(ModuleF_xxxx)
  34. DModule_Exec_Base    dc.l 0 ;Filled by MCControl
  35. DModule_Dos_Base    dc.l 0 ;Filled by MCControl
  36. DModule_Intuition_Base    dc.l 0 ;Filled by MCControl
  37. ;--- Card Data
  38.     ds.l 14 ;Reserved
  39. ;--- Jump Table
  40. DModule_Delay    bra DModule_Info
  41.     nop
  42.     bra DModule_Open
  43.     nop
  44.     bra DModule_Close
  45.     nop
  46.     ds.w 3*7 ;Reserved
  47.     bra DModule_AccessDirectFrame
  48.     nop
  49.     bra DModule_AccessDirectPage
  50.     nop
  51.     bra DModule_AccessRawFrame
  52.     nop
  53.     bra DModule_AccessRawPage
  54.     nop
  55.     ds.w 3*6 ;Reserved
  56.     ds.b Module_UserData_End-Module_UserData
  57. ;----------------------------------------------------------------------------
  58. Module_VersionString    Version_String "Empty.mcm",<by Guido Mersmann>
  59.     even
  60. ;----------------------------------------------------------------------------
  61. DModule_Open
  62. DModule_Close
  63. DModule_AccessDirectFrame
  64. DModule_AccessDirectPage
  65. DModule_AccessRawFrame
  66. DModule_AccessRawPage
  67.     moveq    #Module_Error_NoError,d0
  68.     rts
  69. ;----------------------------------------------------------------------------
  70. ;----------------------------------------------------------------------------
  71. ;    DModule_Info
  72. ;    >a0.l Pointer on Destination
  73. ;    >d0.l Pointer on Lenght
  74. ;----------------------------------------------------------------------------
  75. ;----------------------------------------------------------------------------
  76. DModule_Info    lea    Module_VersionString+6(pc),a1
  77. .Copy_Version    move.b    (a1)+,d0
  78.     move.b    d0,(a0)+
  79.     cmp.b    #"(",d0
  80.     bne    .Copy_Version
  81.     subq.w    #2,a0
  82.     clr.b    (a0)
  83.     moveq    #Module_Error_NoError,d0
  84.     rts
  85.