;CND BZERO C 1 2 0 ; Este archivo es (C) Carlos Sánchez, y está sujeto a licencia LGPL v3 ; BZERO flagno bitno ; Se cumple si el valor de un bit de un flag es 0 :cnd_bzero dc.b 0xc1 0x04 0x03 0x00 0x00 ; Viene en {0} el flagno, y en {4} el bitno. {8} y {12} son variables globales jgt {4}.l 32.l 0 ; si el bit es > 32 es absurdo, vuelve sin cumplirse aload :flags.l {0}.l {8}.l copy {8}.l (sp) copy {4}.l (sp) call :bittest 0x02.b (sp) copy (sp) {8}.l jz {8}.l 1 return 0