INCLUDE 'traps.a'

        STRING ASIS

MyMDEF  MAIN EXPORT             ; this will be the entry point

    IMPORT MYMENU               ; name of Pascal FUNCTION that is the WDEF

                                ; we IMPORT externally referenced routines

                                ; from Pascal (in this case, just this one)

    BRA.S   @0                  ; branch around the header to the actual code

    DC.W    0                   ; flags word

    DC.B    'MDEF'              ; type

    DC.W    128                 ; ID number

    DC.W    0                   ; version

@0  JMP MyMenu                  ; this calls the Pascal WDEF

    END