summaryrefslogtreecommitdiff
path: root/sys/src/games/mix/examples/maxmain.m
blob: 42c57a67d8a5fd8e6c54b675f9f2dc8d7f6db7cf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
	ORIG	X
	CON	0
	CON	3910
	CON	23
	CON	-45
	CON	310
	CON	475
	CON	40291
	CON	358
	CON	20912
RESULT	ALF	"MAX: "
	CON	0
	ALF	" AT: "
	CON	0
	ORIG	EXIT+1
MAIN	ENT1	RESULT-X-1
	JMP	MAXIMUM
	CHAR
	STX	RESULT+1
	ENTA	,2
	CHAR
	STX	RESULT+3
	OUT	RESULT(19)
	HLT
	END	MAIN