LOC Data_Segment Data OCTA 17,4,47,11,8,15,42 end GREG @ px IS $1 x IS $2 max IS $3 test IS $4 LOC #100 Main LDA px,Data LDO max,px 1H ADDU px,px,8 CMP test,px,end BZ test,Done LDO x,px CMP test,max,x CSN max,test,x JMP 1B Done SWYM