Mercurial > hg > Members > kono > os9 > sbc09

view examples/cond09.asm @ 176:6ef317714ae8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mopen in TL/1
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 15 Apr 2019 00:25:58 +0900
parents 2088fd998865
children
line wrap: on
line source

* Conditional assembly.

jantje	equ 2

	org $100
	if jantje=1
main	ldx #12
	else
man2	ldx #13
	endif
labx	ldy #25

	include cond09.inc

	ldb #23
        ldu labx,pcr
        ldy laby,pcr
        sex
	mul
laby    sync  
	end