blob: 8a78e048f93da7676c5be5e857f1e75dbefb7889 [file] [log] [blame]
.text
.ID "id-is-jane"
.INITSCT a_section,data, align
.OPTJ OFF,JMPW,JSRW
.INSF glbfunc, G, 0
.CALL glbsub, G
.CALL localsub, S
.EINSF
.FB 80H
ldc #80H,FB
.FBSYM george
.LBBA 1000h
ldr #1000h,LBBA
lda 1000h,0,1200h,1
.SB 80H
ldc #80,SB
.SBBIT lance
bclr lance
.SBSYM sym
mov.B #0, sym
.SBSYM16 sym2
mov.B #0.sym2
.RVECTOR 12,timer
.BTGLB bit1
fred .DEFINE "#01H,mem"
bit1 .BTEQU 1,dmem
three .equ .INSTR {"albert","bert",1}
seven .equ .LEN {"albert"}
.byte .SUBSTR {"albert",3,3}
.ASSERT "assertion message"
.FORM 20,80
.LIST ON
nop
.PAGE "new page"
.VER "ver"
.END
This text should just be emitted and not assembled