;includes, xref, xdef, equ, etc...
 include e:startup/yaec.i
 xdef PROC_main
;code
 near a4,-1
 CODE
PROC_main:
 link a5, #-0
 move.l #37,-(a7)
 move.l #sstring__0,-(a7)
 move.l GLOBAL_execbase(a4),-(a7)
 move.l (a7)+,a6
 move.l (a7)+,a1
 move.l (a7)+,d0
 jsr -552(a6)
 move.l d0,GLOBAL_wb_workbenchbase(a4)
 beq ifendif_1_else_0
 move.l GLOBAL_execbase(a4),a6
 jsr -666(a6)
 move.l d0,GLOBAL_myport(a4)
 beq ifendif_2_else_0
 movem.l d2-d3/a2-a3,-(a7)
 move.l #0,-(a7)
 move.l GLOBAL_myport(a4),-(a7)
 move.l #sstring__1,-(a7)
 move.l #0,-(a7)
 move.l #0,-(a7)
 move.l GLOBAL_wb_workbenchbase(a4),-(a7)
 move.l (a7)+,a6
 move.l (a7)+,d0
 move.l (a7)+,d1
 move.l (a7)+,a0
 move.l (a7)+,a1
 move.l (a7)+,a2
 jsr -72(a6)
 movem.l (a7)+, d2-d3/a2-a3
 move.l d0,GLOBAL_myportappitem(a4)
 beq ifendif_3_else_0
 move.l #sstring__2,-(a7)
 bsr PROC_WriteF
 lea 4(a7), a7
 move.l GLOBAL_myport(a4),a0
 move.l GLOBAL_execbase(a4),a6
 jsr -384(a6)
 move.l #0,a0
 move.l GLOBAL_intuitionbase(a4),a6
 jsr -96(a6)
 move.l #sstring__3,-(a7)
 bsr PROC_WriteF
 lea 4(a7), a7
 move.l GLOBAL_myportappitem(a4),a0
 move.l GLOBAL_wb_workbenchbase(a4),a6
 jsr -78(a6)
while_1:
 move.l GLOBAL_myport(a4),a0
 move.l GLOBAL_execbase(a4),a6
 jsr -372(a6)
 move.l d0,GLOBAL_myportappitemappmsg(a4)
 beq endwhile_1
 move.l GLOBAL_myportappitemappmsg(a4),a1
 move.l GLOBAL_execbase(a4),a6
 jsr -378(a6)
 bra while_1
endwhile_1:
ifendif_3_else_0:
ifendif_3_end:
 move.l GLOBAL_myport(a4),a0
 move.l GLOBAL_execbase(a4),a6
 jsr -672(a6)
ifendif_2_else_0:
ifendif_2_end:
ifendif_1_else_0:
ifendif_1_end:
PROC_main_EXCEPT:
PROC_main_ENDEXCEPT:
PROC_main_END:
 unlk a5
 rts
;initcode...
 xdef _init_
_init_:
 move.l #10000,GLOBAL_stacksize(a4)
_init_end_:
 rts
 ;end-code...
 xdef _end_
_end_:
_end_end_:
 rts
  ;data (in code section)
 even
 dc.l 17
sstring__0:
 dc.b "workbench.library",0
 even
 dc.l 13
sstring__1:
 dc.b "DisplayBeep()",0
 even
 dc.l 48
sstring__2:
 dc.b "Come on, go and see whats in the Tools menu ...\n",0
 even
 dc.l 19
sstring__3:
 dc.b "Wow, you found it!\n",0
;bss 
 BSS ;SECTION "__MERGED", BSS 
GLOBAL_wb_workbenchbase:
 ds.l 1
GLOBAL_myport:
 ds.l 1
GLOBAL_myportappitem:
 ds.l 1
GLOBAL_myportappitemappmsg:
 ds.l 1
 END
 