Procedure zh1_51;
Static R1:real32:=11.8974609375;
begin zh1_51;

MOV(1734,AX);                                                         // 1.
//?  (type uns8 AH)=6; AH=%0000_0110; 
//?  (type int8 AL)=-58; AL=$C6(=-58=198); AX=$06C6(=1734); 

MOV($1734,EBX);                                                       // 2.
//?  (type uns8 BH)=23; BH=$17(=23); 
//?  (type int8 BL)=52; BL=$34(=52); (type int16 BX)=5940; 

MOV(R1,EAX);                                                          // 3.
//?  (type uns8 AH)=92; AH=%0101_1100; EAX=$413E5C00(=1094605824); 

MOV(-26,EAX); ADD($86,EAX);                                           // 4.
//?  (type int8 AL)=108; (type uns8 AH)=0; 
//?  CF=1; PF=1; AF=0; ZF=0; SF=0; OF=0; 

MOV(-39,AX); SUB($87,AL);                                             // 5.
//?  (type int8 AH)=-1; (type uns8 AL)=82; 
//?  CF=0; PF=0; OF=0; 

MOV($37,AX); INTMUL(11,AX);                                           // 6.
//?  AL=%0101_1101; (type int8 AL)=93; (type uns8 AH)=2; 
//?  CF=0; 

MOV(17,AX); MOV($BCD,BX); SUB(BX,AX); MOV(2,BL);                      // 7.
//?  AX=$F444(=-3004=62532); (type int16 BX)=2818; 
//?  CF=1; PF=1; OF=0; 

MOV(-171,AX); MOVSX(AL,BX); ADD(BX,AX); MOVZX(AL,BX);                 // 8.
//?  AX=$FFAA(=-86=65450); BX=$00AA(=170); (type uns8 AL)=170; 
//?  CF=0; SF=1; 

MOV(-29,AX); MOVSX(AL,BX); ADD(BH,AL);                                // 9.
//?  AL=$E2(=-30=226); AX=$FFE2(=-30=65506); 
//?  CF=1; PF=1; SF=1; 

MOV(-213,EAX); PUSH(EAX); PUSH(ECX); POP(EAX); SUB(ECX,EAX); POP(ECX); // 10.
//?  AL=$00(=0); CX=$FF2B(=-213=65323); (type uns8 CH)=255; 
//?  ZF=1; SF=0; 

end zh1_51;//30+20


Procedure zh1_52;
Static R1:real32:=-5.4208984375;
begin zh1_52;

MOV(R1,EAX);                                                          // 1.
//?  (type int8 AH)=120; AH=%0111_1000; EAX=$C0AD7800(=-1062373376=3232593920); 

MOV(1883,AX);                                                         // 2.
//?  (type uns8 AH)=7; AH=%0000_0111; 
//?  (type int8 AL)=91; AL=$5B(=91); AX=$075B(=1883); 

MOV($1883,EBX);                                                       // 3.
//?  (type uns8 BH)=24; BH=%0001_1000; 
//?  (type int8 BL)=-125; BL=$83(=-125=131); (type int16 BX)=6275; 

MOV(-38,EAX); ADD($75,EAX);                                           // 4.
//?  (type int8 AL)=79; (type uns8 AH)=0; 
//?  CF=1; PF=0; AF=0; ZF=0; SF=0; OF=0; 

MOV(-13,AX); SUB($95,AX);                                             // 5.
//?  (type uns8 AH)=255; (type int8 AL)=94; 
//?  CF=0; SF=1; OF=0; 

MOV(-9,AX); INTMUL(%1_0101,AX);                                       // 6.
//?  AL=%0100_0011; (type uns8 AL)=67; (type uns8 AH)=255; 
//?  OF=0; 

MOV(-21,AX); MOV($9AB,BX); ADD(BX,AX); MOV(-1,BL);                    // 7.
//?  AX=$0996(=2454); (type int16 BX)=2559; 
//?  CF=1; AF=1; OF=0; 

MOV(-21,AX); MOVSX(AL,BX); ADD(BX,AX); MOVZX(AL,BX);                  // 8.
//?  AX=%1111_1111_1101_0110; BX=$00D6(=214); (type uns8 AL)=214; 
//?  CF=1; SF=1; 

MOV(293,AX); MOVSX(AL,BX); ADD(BH,AL);                                // 9.
//?  BL=$25(=37); AX=$0125(=293); 
//?  CF=0; OF=0; AF=0; 

SUB(ECX,ECX); PUSH(ECX); MOV(ESP,EAX); POP(EBX); SUB(ESP,EAX);        // 10.
//?  BL=$00(=0); EAX=$FFFFFFFC(=-4=4294967292); (type int8 AL)=-4; 
//?  CF=1; OF=0; 

end zh1_52;//30+20


Procedure zh1_53;
Static R1:real32:=17.8681640625;
begin zh1_53;

MOV(2304,AX);                                                         // 1.
//?  (type uns8 AH)=9; AH=%0000_1001; 
//?  (type int8 AL)=0; AL=$00(=0); AX=$0900(=2304); 

MOV($1204,EBX);                                                       // 2.
//?  (type uns8 BH)=18; BH=%0001_0010; 
//?  (type int8 BL)=4; BL=$04(=4); (type int16 BX)=4612; 

MOV(R1,EAX);                                                          // 3.
//?  (type uns8 AH)=242; AH=%1111_0010; EAX=$418EF200(=1099887104); 

MOV(-69,EAX); ADD($41,AH);                                            // 4.
//?  (type int8 AL)=-69; (type uns8 AH)=64; 
//?  CF=1; PF=0; AF=1; ZF=0; SF=0; OF=0; 

MOV(-59,AX); SUB($41,AL);                                             // 5.
//?  (type int8 AH)=-1; (type uns8 AL)=132; 
//?  CF=0; PF=1; OF=0; 

MOV(-73,AX); INTMUL(%101,AX);                                         // 6.
//?  AL=%1001_0011; (type int8 AL)=-109; (type uns8 AH)=254; 
//?  OF=0; CF=0; 

MOV(-63,AX); MOV($9B3,BX); SUB(BX,AX); MOV(4,BH);                     // 7.
//?  AX=$F60E(=-2546=62990); (type int16 BX)=1203; 
//?  CF=0; PF=0; OF=0; 

MOV(-63,AX); MOVZX(AL,BX); SUB(BH,AL); MOVSX(AL,BX);                  // 8.
//?  AX=$FFC1(=-63=65473); BX=$FFC1(=-63=65473); (type uns8 AL)=193; 
//?  CF=0; SF=1; 

MOV(-231,AX); MOVSX(AL,BX); ADD(BH,AL);                               // 9.
//?  AL=$19(=25); AX=$FF19(=-231=65305); BX=$0019(=25); 
//?  CF=0; SF=0; 

MOV(-287,EAX); PUSH(EBX); PUSH(EAX); POP(EBX); SUB(EAX,EBX); POP(EAX); // 10.
//?  AX=$0019(=25); (type uns8 AL)=25; 
//?  ZF=1; SF=0; 

end zh1_53;//30+20


Procedure zh1_54;
Static R1:real32:=-23.6044921875;
begin zh1_54;

MOV(R1,EAX);                                                          // 1.
//?  (type int8 AH)=-42; AH=%1101_0110; EAX=$C1BCD600(=-1044589056=3250378240); 

MOV(1567,AX);                                                         // 2.
//?  (type uns8 AH)=6; AH=%0000_0110; 
//?  (type int8 AL)=31; AL=$1F(=31); AX=$061F(=1567); 

MOV($1837,EBX);                                                       // 3.
//?  (type uns8 BH)=24; BH=%0001_1000; 
//?  (type int8 BL)=55; BL=$37(=55); (type int16 BX)=6199; 

MOV(37,EAX); ADD($C5,AL);                                             // 4.
//?  (type int8 AL)=-22; (type uns8 AH)=0; 
//?  CF=0; PF=0; AF=0; ZF=0; SF=1; OF=0; 

MOV(55,AX); SUB($C5,AH);                                              // 5.
//?  (type uns8 AH)=59; (type int8 AL)=55; 
//?  CF=1; SF=0; OF=0; 

MOV(-17,AX); INTMUL(%110,AX);                                         // 6.
//?  AL=%1001_1010; (type uns8 AL)=154; (type uns8 AH)=255; 
//?  OF=0; 

MOV(-35,AX); MOV($DC6,BX); SUB(BX,AX); MOV(-2,BH);                    // 7.
//?  AX=$F217(=-3561=61975); (type int16 BX)=-314; 
//?  CF=0; AF=0; OF=0; 

MOV(-23,AX); MOVZX(AL,BX); ADD(BX,AX); MOVSX(AL,BX);                  // 8.
//?  AX=%0000_0000_1101_0010; BX=$FFD2(=-46=65490); (type uns8 AL)=210; 
//?  CF=1; SF=0; 

MOV(372,AX); MOVSX(AL,BX); ADD(BH,AL);                                // 9.
//?  BL=$74(=116); AX=$0174(=372); 
//?  CF=0; OF=0; AF=0; 

MOV(ESP,EAX); SUB(ECX,ECX); PUSH(ECX); SUB(ESP,EAX); POP(EBX);        // 10.
//?  AL=%0000_0100; EBX=$00000000(=0); (type uns8 AL)=4; 
//?  CF=0; SF=0; 

end zh1_54;//30+20


Procedure zh1_55;
Static R1:real32:=1.6572265625;
begin zh1_55;

MOV(2324,AX);                                                         // 1.
//?  (type uns8 AH)=9; AH=%0000_1001; 
//?  (type int8 AL)=20; AL=$14(=20); AX=$0914(=2324); 

MOV($4324,EBX);                                                       // 2.
//?  (type uns8 BH)=67; BH=$43(=67); 
//?  (type int8 BL)=36; BL=$24(=36); (type int16 BX)=17188; 

MOV(R1,EAX);                                                          // 3.
//?  (type uns8 AH)=32; AH=%0010_0000; EAX=$3FD42000(=1070866432); 

MOV(-51,EAX); ADD(%101_1101,EAX);                                     // 4.
//?  (type int8 AL)=42; (type uns8 AH)=0; 
//?  CF=1; PF=0; AF=1; ZF=0; SF=0; OF=0; 

MOV(-13,AX); SUB($36,AL);                                             // 5.
//?  (type int8 AH)=-1; (type uns8 AL)=189; 
//?  CF=0; PF=1; OF=0; 

MOV(31,AX); INTMUL($11,AX);                                           // 6.
//?  AL=%0000_1111; (type int8 AL)=15; (type uns8 AH)=2; 
//?  CF=0; 

MOV(-15,AX); MOV($B8A,BX); SUB(BX,AX); MOV(2,BL);                     // 7.
//?  AX=$F467(=-2969=62567); (type int16 BX)=2818; 
//?  CF=0; PF=0; OF=0; 

MOV(-127,AX); MOVSX(AL,BX); ADD(BX,AX); MOVZX(AL,BX);                 // 8.
//?  AX=$FF02(=-254=65282); BX=$0002(=2); (type uns8 AL)=2; 
//?  CF=1; SF=1; 

MOV(-49,AX); MOVZX(AL,BX); ADD(BH,AL);                                // 9.
//?  AL=$CF(=-49=207); AX=$FFCF(=-49=65487); 
//?  CF=0; PF=1; SF=1; 

MOV(-313,EAX); PUSH(EAX); PUSH(ECX); POP(EAX); SUB(ECX,EAX); POP(ECX); // 10.
//?  AL=$00(=0); CX=$FEC7(=-313=65223); (type uns8 CH)=254; 
//?  ZF=1; SF=0; 

end zh1_55;//30+20


Procedure zh1_56;
Static R1:real32:=-3.9345703125;
begin zh1_56;

MOV(R1,EAX);                                                          // 1.
//?  (type int8 AH)=-48; AH=%1101_0000; EAX=$C07BD000(=-1065627648=3229339648); 

MOV(2973,AX);                                                         // 2.
//?  (type uns8 AH)=11; AH=%0000_1011; 
//?  (type int8 AL)=-99; AL=$9D(=-99=157); AX=$0B9D(=2973); 

MOV($F973,EBX);                                                       // 3.
//?  (type uns8 BH)=249; BH=%1111_1001; 
//?  (type int8 BL)=115; BL=$73(=115); (type int16 BX)=-1677; 

MOV(-97,EAX); ADD($45,EAX);                                           // 4.
//?  (type int8 AL)=-28; (type uns8 AH)=255; 
//?  CF=0; PF=1; AF=1; ZF=0; SF=1; OF=0; 

MOV(-97,AX); SUB($45,AX);                                             // 5.
//?  (type uns8 AH)=255; (type int8 AL)=90; 
//?  CF=0; SF=1; OF=0; 

MOV(-31,AX); INTMUL($6,AX);                                           // 6.
//?  AL=%0100_0110; (type uns8 AL)=70; (type uns8 AH)=255; 
//?  OF=0; 

MOV(-31,AX); MOV($7AC,BX); ADD(BX,AX); MOV(-1,BL);                    // 7.
//?  AX=$078D(=1933); (type int16 BX)=2047; 
//?  CF=1; AF=0; OF=0; 

MOV(-39,AX); MOVZX(AL,BX); ADD(BX,AX); MOVSX(AL,BX);                  // 8.
//?  AX=%0000_0000_1011_0010; BX=$FFB2(=-78=65458); (type uns8 AL)=178; 
//?  CF=1; SF=0; 

MOV(303,AX); MOVSX(AL,BX); ADD(BH,AL);                                // 9.
//?  BL=$2F(=47); AX=$012F(=303); 
//?  CF=0; OF=0; AF=0; 

SUB(ECX,ECX); PUSH(ECX); MOV(ESP,EAX); POP(EBX); SUB(ESP,EAX);        // 10.
//?  BL=$00(=0); EAX=$FFFFFFFC(=-4=4294967292); (type int8 AL)=-4; 
//?  CF=1; OF=0; 

end zh1_56;//30+20


Procedure zh1_57;
Static R1:real32:=15.8876953125;
begin zh1_57;

MOV(2304,AX);                                                         // 1.
//?  (type uns8 AH)=9; AH=%0000_1001; 
//?  (type int8 AL)=0; AL=$00(=0); AX=$0900(=2304); 

MOV($1384,EBX);                                                       // 2.
//?  (type uns8 BH)=19; BH=%0001_0011; 
//?  (type int8 BL)=-124; BL=$84(=-124=132); (type int16 BX)=4996; 

MOV(R1,EAX);                                                          // 3.
//?  (type uns8 AH)=52; AH=%0011_0100; EAX=$417E3400(=1098789888); 

MOV(-89,EAX); ADD(41,AH);                                             // 4.
//?  (type int8 AL)=-89; (type uns8 AH)=40; 
//?  CF=1; PF=1; AF=1; ZF=0; SF=0; OF=0; 

MOV(-89,AX); SUB($47,AL);                                             // 5.
//?  (type int8 AH)=-1; (type uns8 AL)=96; 
//?  CF=0; PF=1; OF=1; 

MOV(-61,AX); INTMUL(%101,AX);                                         // 6.
//?  AL=%1100_1111; (type int8 AL)=-49; (type uns8 AH)=254; 
//?  OF=0; CF=0; 

MOV(-61,AX); MOV($AB3,BX); SUB(BX,AX); MOV(4,BH);                     // 7.
//?  AX=$F510(=-2800=62736); (type int16 BX)=1203; 
//?  CF=0; PF=0; OF=0; 

MOV(-61,AX); MOVZX(AL,BX); SUB(BH,AL); MOVSX(AL,BX);                  // 8.
//?  AX=$FFC3(=-61=65475); BX=$FFC3(=-61=65475); (type uns8 AL)=195; 
//?  CF=0; SF=1; 

MOV(-298,AX); MOVSX(AL,BX); ADD(BH,AL);                               // 9.
//?  AL=$D5(=-43=213); AX=$FED5(=-299=65237); BX=$FFD6(=-42=65494); 
//?  CF=1; SF=1; 

MOV(-281,EBX); PUSH(EBX); PUSH(EAX); POP(EBX); SUB(EAX,EBX); POP(EAX); // 10.
//?  AX=$FEE7(=-281=65255); (type uns8 AL)=231; 
//?  ZF=1; SF=0; 

end zh1_57;//30+20


Procedure zh1_58;
Static R1:real32:=-13.6123046875;
begin zh1_58;

MOV(R1,EAX);                                                          // 1.
//?  (type int8 AH)=-52; AH=%1100_1100; EAX=$C159CC00(=-1051079680=3243887616); 

MOV(2259,AX);                                                         // 2.
//?  (type uns8 AH)=8; AH=%0000_1000; 
//?  (type int8 AL)=-45; AL=$D3(=-45=211); AX=$08D3(=2259); 

MOV($3259,EBX);                                                       // 3.
//?  (type uns8 BH)=50; BH=%0011_0010; 
//?  (type int8 BL)=89; BL=$59(=89); (type int16 BX)=12889; 

MOV(73,EAX); ADD($75,AL);                                             // 4.
//?  (type int8 AL)=-66; (type uns8 AH)=0; 
//?  CF=0; PF=1; AF=0; ZF=0; SF=1; OF=1; 

MOV(73,AX); SUB(%0101_1101,AH);                                       // 5.
//?  (type uns8 AH)=163; (type int8 AL)=73; 
//?  CF=1; SF=1; OF=0; 

MOV(-36,AX); INTMUL($4,AX);                                           // 6.
//?  AL=%0111_0000; (type uns8 AL)=112; (type uns8 AH)=255; 
//?  OF=0; 

MOV(-36,AX); MOV($8F6,BX); SUB(BX,AX); MOV(-2,BH);                    // 7.
//?  AX=$F6E6(=-2330=63206); (type int16 BX)=-266; 
//?  CF=0; AF=0; OF=0; 

MOV(-39,AX); MOVZX(AL,BX); ADD(BX,AX); MOVSX(AL,BX);                  // 8.
//?  AX=%0000_0000_1011_0010; BX=$FFB2(=-78=65458); (type uns8 AL)=178; 
//?  CF=1; SF=0; 

MOV(371,AX); MOVSX(AL,BX); ADD(BH,AL);                                // 9.
//?  BL=$73(=115); AX=$0173(=371); 
//?  CF=0; OF=0; AF=0; 

MOV(ESP,EAX); SUB(ECX,ECX); PUSH(ECX); SUB(ESP,EAX); POP(EBX);        // 10.
//?  AL=%0000_0100; EBX=$00000000(=0); (type uns8 AL)=4; 
//?  CF=0; SF=0; 

end zh1_58;//30+20