mirror of
https://git.k-space.ee/arti/vt1200.git
synced 2026-10-31 12:05:05 +02:00
31 lines
1.4 KiB
Plaintext
31 lines
1.4 KiB
Plaintext
GSP COFF Assembler, Version 2.00, 87.300 Sun Oct 18 02:48:35 2026
|
|
(c) Copyright 1985, 1987, Texas Instruments Inc.
|
|
|
|
PAGE 1
|
|
|
|
0001 ; ret_test.asm -- smallest payload that proves `jump` i
|
|
0002 ;
|
|
0003 ; It writes two marker words and returns with `rets`.
|
|
0004 ; stub really used `call`, control comes back to the di
|
|
0005 ; session stays usable; if it used a plain jump, there
|
|
0006 ; this would fault or wander.
|
|
0007 ;
|
|
0008 ; Linked at bit 01840000h (byte 00308000h) by dwt/visua
|
|
0009
|
|
0010 00000000 .text
|
|
0011 00000000 _start:
|
|
0012 00000000 0550 setf 16, 0, 0 ; field 0 = 16 bits, zero-extended
|
|
0013 00000010 0740 setf 32, 0, 1 ; field 1 = 32 bits, zero-extended
|
|
0014 00000020 09E0 movi 0C0DEh, a0, L
|
|
00000030 0000C0DE
|
|
0015 00000050 0580 move a0, @01850000h, 0 ; MARK1 = C0DE
|
|
00000060 01850000
|
|
0016 00000080 09E0 movi 0B007h, a0, L
|
|
00000090 0000B007
|
|
0017 000000B0 0580 move a0, @01850010h, 0 ; MARK2 = B007 (proves the seco
|
|
000000C0 01850010
|
|
0018 000000E0 0960 rets
|
|
0019 .end
|
|
|
|
No Errors, No Warnings
|