TODO
assembler; label l1, l2;
asm mov dx,3DAh l1: in al, dx and al,08h jnz l1 l2: in al,dx and al,08h jz l2
http://www.csn.ul.ie/~darkstar/assembler/
http://www.csn.ul.ie/~darkstar/assembler/intlist.html