Hi, everybody...
A friend sent me this lines of code. I wonder:
What kind of language is it, and what does it do
render:
moveq.l #0,d1
lea txture,a6
move.l a7,.stack
move.l #visuallist,.visual
bra.w .start
cnop 0,8
.poly
addq.l #4,-(a2)
; move.l a4,-(a2) ;
lea (a3,d3.w*4),a3
movem.w (a3)+,d0-d2
move.l 2(a1,d0.w*8),d3 ;
move.l 2(a1,d1.w*8),d4 ;
cmp.w d3,d4
beq.b .oo
blt.b .o
exg.l d1,d0
exg.l d3,d4
.o move.l 2(a1,d2.w*8),d3
exg.l d0,d2
.oo