1 % This is almost "hello world" simple
3 % This depends on working GETA, LDOU, PUT
11 LDOU $1,$0,0 % Quotent
12 LDOU $2,$0,8 % Divisor
13 LDOU $3,$0,16 % Expected result
14 LDOU $4,$0,24 % Expected remainder
31 Done TRAP 0,Fputs,StdOut
34 PassMsg BYTE "Passed",#a,0
35 FailMsg BYTE "Failed!",#a,0
42 OCTA #8000000000000000
43 OCTA #FFFFFFFFFFFFFFFF
45 OCTA #8000000000000000
47 OCTA #8000000000000017
50 OCTA #8000000000000017