# 68040, Amiga Assembler code ```armasm CODE:00010390 ; =========================================================================== CODE:00010390 CODE:00010390 ; Segment type: Pure code CODE:00010390 ; segment "CODE" CODE:00010390 CODE:00010390 ; =============== S U B R O U T I N E ======================================= CODE:00010390 CODE:00010390 ; Attributes: noreturn bp-based frame CODE:00010390 CODE:00010390 _main: ; CODE XREF: startup+CA↑p CODE:00010390 ; startup:domain↑p CODE:00010390 CODE:00010390 var_4 = -4 CODE:00010390 CODE:00010390 link a6,#-4 CODE:00010394 jsr _Init CODE:0001039A jsr _InitTrace CODE:000103A0 CODE:000103A0 loc_103A0: ; CODE XREF: _main+182↓j CODE:000103A0 ; _main+18C↓j CODE:000103A0 jsr _WaitToAnimate CODE:000103A6 jsr _ClearControl CODE:000103AC moveq #2,d0 CODE:000103AE move.l d0,-(sp) CODE:000103B0 jsr sub_1E88C CODE:000103B6 addq.l #4,sp CODE:000103B8 moveq #4,d0 CODE:000103BA move.l d0,-(sp) CODE:000103BC jsr sub_1E88C CODE:000103C2 addq.l #4,sp CODE:000103C4 jsr _PollJoy CODE:000103CA jsr _UserIn CODE:000103D0 tst.l (dword_2052A).l CODE:000103D6 bne.s loc_103EA CODE:000103D8 movea.l (_aniObj).l,a0 ``` --- # Agent Instructions: Querying This Documentation If you need additional information that is not directly available in this page, you can query the documentation dynamically by asking a question. Perform an HTTP GET request on the current page URL with the `ask` query parameter: ``` GET https://docs.hex-rays.com/8.4/user-guide/disassembler/disassembly-gallery/68040-amiga.md?ask= ``` The question should be specific, self-contained, and written in natural language. The response will contain a direct answer to the question and relevant excerpts and sources from the documentation. Use this mechanism when the answer is not explicitly present in the current page, you need clarification or additional context, or you want to retrieve related documentation sections.