; One of the most important includes for a professional programmed tool
; linked with it. Fully Symbol-free and assemblerized by T. Stocksmeier.
; Link BEFORE your program and call your first program label 'Programm'.
; THIS INCLUDE IS NOT TAKEN FROM ANY AUG-BOOK OR ELSE. I WROTE IT MYSELF!

Startup
 move.l 4,a6
 move.l #0,a1
 jsr -294(a6)
 move.l d0,a5
 move.l 172(a5),d0
 tst.l d0
 beq FromWB
 bsr Programm
 rts
FromWB
 lea 92(a5),a0
 jsr -384(a6)
 lea 92(a5),a0
 jsr -372(a6)
 lea WBMsg(PC),a0
 move.l d0,(a0)
 bsr Programm
 jsr -132(a6)
 move.l WBMsg(PC),a1
 jsr -378(a6)
 rts
WBMsg ds.l 1