#include Reg9s12.h
ORG $1000
JSR sort
JSR out
SWI
sort
out LDY #Nums+5
MOVB #5,count1
next1 MOVB #6,count2 ;
CLRA
next LDAB 1,Y-
PSHD ;
DEC count2 ;
BNE next ;
STY temp ;
LDD #msg ;
LDX printf ;
JSR 0,X ;
LEAS 12,SP ;
LDD temp ;
ADDD #12 ;
XGDY ;
DEC count1 ;
BNE next1 ;
RTS
printf EQU $EE88
temp RMB 2
count1 DB 30
count2 RMB 1
Nums DB 226,157,200,82,36,2,191,65,0,15,149,24,173,255,0
DB 117,209,77,52,99,45,33,139,166,222,245,9,107,11,8
msg FCC ' %u %u %u %u %u %u '
DB $0D,$0A,0
END
2007-12-13
06:20:06
·
2 answers
·
asked by
Rob
1