2004 lines
42 KiB
C
2004 lines
42 KiB
C
|
|
/*
|
|
** The contents of this file are subject to the Mozilla Public License
|
|
** Version 1.1 (the "License"); you may not use this file except in compliance
|
|
** with the License. You may obtain a copy of the License at
|
|
** http://www.mozilla.org/MPL/
|
|
**
|
|
** Software distributed under the License is distributed on an "AS IS" basis,
|
|
** WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for
|
|
** the specific language governing rights and limitations under the License.
|
|
*/
|
|
|
|
static long dmval;
|
|
|
|
int scale(int, int, int);
|
|
|
|
int divscale (int, int, int);
|
|
int divscale14(int, int);
|
|
int divscale16(int, int);
|
|
int divscale25(int, int);
|
|
int divscale30(int, int);
|
|
int divscale31(int, int);
|
|
int divscale32(int, int);
|
|
|
|
int mulscale (int, int, int);
|
|
int mulscale1 (int, int);
|
|
int mulscale2 (int, int);
|
|
int mulscale3 (int, int);
|
|
int mulscale4 (int, int);
|
|
int mulscale5 (int, int);
|
|
int mulscale6 (int, int);
|
|
int mulscale7 (int, int);
|
|
int mulscale8 (int, int);
|
|
int mulscale9 (int, int);
|
|
int mulscale10(int, int);
|
|
int mulscale11(int, int);
|
|
int mulscale12(int, int);
|
|
int mulscale13(int, int);
|
|
int mulscale14(int, int);
|
|
int mulscale15(int, int);
|
|
int mulscale16(int, int);
|
|
int mulscale17(int, int);
|
|
int mulscale18(int, int);
|
|
int mulscale19(int, int);
|
|
int mulscale20(int, int);
|
|
int mulscale30(int, int);
|
|
int mulscale31(int, int);
|
|
int mulscale32(int, int);
|
|
|
|
int dmulscale1 (int, int, int, int);
|
|
int dmulscale2 (int, int, int, int);
|
|
int dmulscale3 (int, int, int, int);
|
|
int dmulscale4 (int, int, int, int);
|
|
int dmulscale5 (int, int, int, int);
|
|
int dmulscale6 (int, int, int, int);
|
|
int dmulscale7 (int, int, int, int);
|
|
int dmulscale8 (int, int, int, int);
|
|
int dmulscale9 (int, int, int, int);
|
|
int dmulscale10(int, int, int, int);
|
|
int dmulscale11(int, int, int, int);
|
|
int dmulscale12(int, int, int, int);
|
|
int dmulscale13(int, int, int, int);
|
|
int dmulscale14(int, int, int, int);
|
|
int dmulscale15(int, int, int, int);
|
|
int dmulscale16(int, int, int, int);
|
|
int dmulscale17(int, int, int, int);
|
|
int dmulscale18(int, int, int, int);
|
|
int dmulscale19(int, int, int, int);
|
|
int dmulscale20(int, int, int, int);
|
|
int dmulscale21(int, int, int, int);
|
|
int dmulscale22(int, int, int, int);
|
|
int dmulscale23(int, int, int, int);
|
|
int dmulscale24(int, int, int, int);
|
|
int dmulscale25(int, int, int, int);
|
|
int dmulscale26(int, int, int, int);
|
|
int dmulscale27(int, int, int, int);
|
|
int dmulscale28(int, int, int, int);
|
|
int dmulscale29(int, int, int, int);
|
|
int dmulscale30(int, int, int, int);
|
|
int dmulscale31(int, int, int, int);
|
|
int dmulscale32(int, int, int, int);
|
|
|
|
#pragma aux scale =\
|
|
"imul edx",\
|
|
"idiv ecx",\
|
|
parm nomemory [eax][edx][ecx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale =\
|
|
"imul edx",\
|
|
"shrd eax, edx, cl",\
|
|
parm nomemory [eax][edx][ecx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale1 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 1",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale2 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 2",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale3 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 3",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale4 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 4",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale5 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 5",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale6 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 6",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale7 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 7",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale8 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 8",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale9 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 9",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale10 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 10",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale11 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 11",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale12 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 12",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale13 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 13",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale14 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 14",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale15 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 15",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale16 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 16",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale17 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 17",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale18 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 18",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale19 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 19",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale20 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 20",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale21 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 21",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale22 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 22",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale23 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 23",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale24 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 24",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale25 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 25",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale26 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 26",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale27 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 27",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale28 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 28",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale29 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 29",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale30 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 30",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale31 =\
|
|
"imul edx",\
|
|
"shrd eax, edx, 31",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux mulscale32 =\
|
|
"imul edx",\
|
|
parm nomemory [eax][edx]\
|
|
modify exact [eax edx]\
|
|
value [edx]\
|
|
|
|
#pragma aux dmulscale =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, cl",\
|
|
parm nomemory [eax][edx][esi][edi][ecx]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale1 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 1",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale2 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 2",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale3 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 3",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale4 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 4",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale5 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 5",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale6 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 6",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale7 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 7",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale8 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 8",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale9 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 9",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale10 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 10",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale11 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 11",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale12 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 12",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale13 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 13",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale14 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 14",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale15 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 15",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale16 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 16",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale17 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 17",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale18 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 18",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale19 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 19",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale20 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 20",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale21 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 21",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale22 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 22",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale23 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 23",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale24 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 24",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale25 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 25",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale26 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 26",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale27 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 27",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale28 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 28",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale29 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 29",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale30 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 30",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale31 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
"shrd eax, edx, 31",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
|
|
#pragma aux dmulscale32 =\
|
|
"imul edx",\
|
|
"mov ebx, eax",\
|
|
"mov eax, esi",\
|
|
"mov esi, edx",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, esi",\
|
|
parm nomemory [eax][edx][esi][edi]\
|
|
modify exact [eax ebx edx esi]\
|
|
value [edx]\
|
|
|
|
#pragma aux tmulscale1 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 1",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale2 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 2",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale3 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 3",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale4 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 4",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale5 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 5",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale6 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 6",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale7 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 7",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale8 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 8",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale9 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 9",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale10 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 10",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale11 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 11",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale12 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 12",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale13 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 13",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale14 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 14",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale15 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 15",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale16 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 16",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale17 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 17",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale18 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 18",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale19 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 19",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale20 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 20",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale21 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 21",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale22 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 22",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale23 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 23",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale24 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 24",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale25 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 25",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale26 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 26",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale27 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 27",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale28 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 28",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale29 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 29",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale30 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 30",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale31 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
"shrd eax, edx, 31",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux tmulscale32 =\
|
|
"imul edx",\
|
|
"xchg eax, ebx",\
|
|
"xchg edx, ecx",\
|
|
"imul edx",\
|
|
"add ebx, eax",\
|
|
"adc ecx, edx",\
|
|
"mov eax, esi",\
|
|
"imul edi",\
|
|
"add eax, ebx",\
|
|
"adc edx, ecx",\
|
|
parm nomemory [eax][edx][ebx][ecx][esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
value [edx]\
|
|
|
|
#pragma aux boundmulscale =\
|
|
"imul ebx",\
|
|
"mov ebx, edx",\
|
|
"shrd eax, edx, cl",\
|
|
"sar edx, cl",\
|
|
"xor edx, eax",\
|
|
"js checkit",\
|
|
"xor edx, eax",\
|
|
"jz skipboundit",\
|
|
"cmp edx, 0xffffffff",\
|
|
"je skipboundit",\
|
|
"checkit:",\
|
|
"mov eax, ebx",\
|
|
"sar eax, 31",\
|
|
"xor eax, 0x7fffffff",\
|
|
"skipboundit:",\
|
|
parm nomemory [eax][ebx][ecx]\
|
|
modify exact [eax ebx edx]\
|
|
|
|
#pragma aux divscale =\
|
|
"mov edx, eax",\
|
|
"shl eax, cl",\
|
|
"neg cl",\
|
|
"sar edx, cl",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx][ecx]\
|
|
modify exact [eax ecx edx]\
|
|
|
|
#pragma aux divscale1 =\
|
|
"add eax, eax",\
|
|
"sbb edx, edx",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale2 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 30",\
|
|
"lea eax, [eax*4]",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale3 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 29",\
|
|
"lea eax, [eax*8]",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale4 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 28",\
|
|
"shl eax, 4",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale5 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 27",\
|
|
"shl eax, 5",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale6 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 26",\
|
|
"shl eax, 6",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale7 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 25",\
|
|
"shl eax, 7",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale8 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 24",\
|
|
"shl eax, 8",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale9 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 23",\
|
|
"shl eax, 9",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale10 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 22",\
|
|
"shl eax, 10",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale11 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 21",\
|
|
"shl eax, 11",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale12 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 20",\
|
|
"shl eax, 12",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale13 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 19",\
|
|
"shl eax, 13",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale14 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 18",\
|
|
"shl eax, 14",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale15 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 17",\
|
|
"shl eax, 15",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale16 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 16",\
|
|
"shl eax, 16",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale17 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 15",\
|
|
"shl eax, 17",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale18 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 14",\
|
|
"shl eax, 18",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale19 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 13",\
|
|
"shl eax, 19",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale20 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 12",\
|
|
"shl eax, 20",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale21 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 11",\
|
|
"shl eax, 21",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale22 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 10",\
|
|
"shl eax, 22",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale23 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 9",\
|
|
"shl eax, 23",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale24 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 8",\
|
|
"shl eax, 24",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale25 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 7",\
|
|
"shl eax, 25",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale26 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 6",\
|
|
"shl eax, 26",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale27 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 5",\
|
|
"shl eax, 27",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale28 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 4",\
|
|
"shl eax, 28",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale29 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 3",\
|
|
"shl eax, 29",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale30 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 2",\
|
|
"shl eax, 30",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale31 =\
|
|
"mov edx, eax",\
|
|
"sar edx, 1",\
|
|
"shl eax, 31",\
|
|
"idiv ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux divscale32 =\
|
|
"xor eax, eax",\
|
|
"idiv ebx",\
|
|
parm nomemory [edx][ebx]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux int5 =\
|
|
"int 0x5",\
|
|
|
|
#pragma aux setvmode =\
|
|
"int 0x10",\
|
|
parm [eax]\
|
|
|
|
#pragma aux setupmouse =\
|
|
"mov ax, 0",\
|
|
"int 33h",\
|
|
"and eax, 0x0000ffff",\
|
|
modify exact [eax]\
|
|
|
|
#pragma aux readmousexy =\
|
|
"mov ax, 11d",\
|
|
"int 33h",\
|
|
"mov [esi], cx",\
|
|
"mov [edi], dx",\
|
|
parm [esi][edi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux readmousebstatus =\
|
|
"mov ax, 5d",\
|
|
"int 33h",\
|
|
"mov [esi], ax",\
|
|
parm [esi]\
|
|
modify exact [eax ebx ecx edx]\
|
|
|
|
#pragma aux readpixel =\
|
|
"mov al, byte ptr [edi]",\
|
|
parm nomemory [edi]\
|
|
modify exact [eax]\
|
|
|
|
#pragma aux drawpixel =\
|
|
"mov byte ptr [edi], al",\
|
|
parm [edi][eax]\
|
|
modify exact \
|
|
|
|
#pragma aux drawpixels =\
|
|
"mov word ptr [edi], ax",\
|
|
parm [edi][eax]\
|
|
modify exact \
|
|
|
|
#pragma aux drawpixelses =\
|
|
"mov dword ptr [edi], eax",\
|
|
parm [edi][eax]\
|
|
modify exact \
|
|
|
|
#pragma aux clearbuf =\
|
|
"rep stosd",\
|
|
parm [edi][ecx][eax]\
|
|
modify exact [edi ecx]\
|
|
|
|
#pragma aux clearbufbyte =\
|
|
"cmp ecx, 4",\
|
|
"jae longcopy",\
|
|
"test cl, 1",\
|
|
"jz preskip",\
|
|
"stosb",\
|
|
"preskip: shr ecx, 1",\
|
|
"rep stosw",\
|
|
"jmp endit",\
|
|
"longcopy: test edi, 1",\
|
|
"jz skip1",\
|
|
"stosb",\
|
|
"dec ecx",\
|
|
"skip1: test edi, 2",\
|
|
"jz skip2",\
|
|
"stosw",\
|
|
"sub ecx, 2",\
|
|
"skip2: mov ebx, ecx",\
|
|
"shr ecx, 2",\
|
|
"rep stosd",\
|
|
"test bl, 2",\
|
|
"jz skip3",\
|
|
"stosw",\
|
|
"skip3: test bl, 1",\
|
|
"jz endit",\
|
|
"stosb",\
|
|
"endit:",\
|
|
parm [edi][ecx][eax]\
|
|
modify [ebx]\
|
|
|
|
#pragma aux copybuf =\
|
|
"rep movsd",\
|
|
parm [esi][edi][ecx]\
|
|
modify exact [ecx esi edi]\
|
|
|
|
#pragma aux copybufbyte =\
|
|
"cmp ecx, 4",\
|
|
"jae longcopy",\
|
|
"test cl, 1",\
|
|
"jz preskip",\
|
|
"movsb",\
|
|
"preskip: shr ecx, 1",\
|
|
"rep movsw",\
|
|
"jmp endit",\
|
|
"longcopy: test edi, 1",\
|
|
"jz skip1",\
|
|
"movsb",\
|
|
"dec ecx",\
|
|
"skip1: test edi, 2",\
|
|
"jz skip2",\
|
|
"movsw",\
|
|
"sub ecx, 2",\
|
|
"skip2: mov ebx, ecx",\
|
|
"shr ecx, 2",\
|
|
"rep movsd",\
|
|
"test bl, 2",\
|
|
"jz skip3",\
|
|
"movsw",\
|
|
"skip3: test bl, 1",\
|
|
"jz endit",\
|
|
"movsb",\
|
|
"endit:",\
|
|
parm [esi][edi][ecx]\
|
|
modify [ebx]\
|
|
|
|
#pragma aux copybufreverse =\
|
|
"shr ecx, 1",\
|
|
"jnc skipit1",\
|
|
"mov al, byte ptr [esi]",\
|
|
"dec esi",\
|
|
"mov byte ptr [edi], al",\
|
|
"inc edi",\
|
|
"skipit1: shr ecx, 1",\
|
|
"jnc skipit2",\
|
|
"mov ax, word ptr [esi-1]",\
|
|
"sub esi, 2",\
|
|
"ror ax, 8",\
|
|
"mov word ptr [edi], ax",\
|
|
"add edi, 2",\
|
|
"skipit2: test ecx, ecx",\
|
|
"jz endloop",\
|
|
"begloop: mov eax, dword ptr [esi-3]",\
|
|
"sub esi, 4",\
|
|
"bswap eax",\
|
|
"mov dword ptr [edi], eax",\
|
|
"add edi, 4",\
|
|
"dec ecx",\
|
|
"jnz begloop",\
|
|
"endloop:",\
|
|
parm [esi][edi][ecx]\
|
|
|
|
#pragma aux qinterpolatedown16 =\
|
|
"mov ebx, ecx",\
|
|
"shr ecx, 1",\
|
|
"jz skipbegcalc",\
|
|
"begqcalc: lea edi, [edx+esi]",\
|
|
"sar edx, 16",\
|
|
"mov dword ptr [eax], edx",\
|
|
"lea edx, [edi+esi]",\
|
|
"sar edi, 16",\
|
|
"mov dword ptr [eax+4], edi",\
|
|
"add eax, 8",\
|
|
"dec ecx",\
|
|
"jnz begqcalc",\
|
|
"test ebx, 1",\
|
|
"jz skipbegqcalc2",\
|
|
"skipbegcalc: sar edx, 16",\
|
|
"mov dword ptr [eax], edx",\
|
|
"skipbegqcalc2:",\
|
|
parm [eax][ecx][edx][esi]\
|
|
modify exact [eax ebx ecx edx edi]\
|
|
|
|
#pragma aux qinterpolatedown16short =\
|
|
"test ecx, ecx",\
|
|
"jz endit",\
|
|
"test al, 2",\
|
|
"jz skipalignit",\
|
|
"mov ebx, edx",\
|
|
"sar ebx, 16",\
|
|
"mov word ptr [eax], bx",\
|
|
"add edx, esi",\
|
|
"add eax, 2",\
|
|
"dec ecx",\
|
|
"jz endit",\
|
|
"skipalignit: sub ecx, 2",\
|
|
"jc finishit",\
|
|
"begqcalc: mov ebx, edx",\
|
|
"add edx, esi",\
|
|
"sar ebx, 16",\
|
|
"mov edi, edx",\
|
|
"and edi, 0ffff0000h",\
|
|
"add edx, esi",\
|
|
"add ebx, edi",\
|
|
"mov dword ptr [eax], ebx",\
|
|
"add eax, 4",\
|
|
"sub ecx, 2",\
|
|
"jnc begqcalc",\
|
|
"test cl, 1",\
|
|
"jz endit",\
|
|
"finishit: mov ebx, edx",\
|
|
"sar ebx, 16",\
|
|
"mov word ptr [eax], bx",\
|
|
"endit:",\
|
|
parm [eax][ecx][edx][esi]\
|
|
modify exact [eax ebx ecx edx edi]\
|
|
|
|
#pragma aux setcolor16 =\
|
|
"mov dx, 0x3ce",\
|
|
"shl ax, 8",\
|
|
"out dx, ax",\
|
|
parm [eax]\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux vlin16first =\
|
|
"mov al, byte ptr [edi]",\
|
|
"mov eax, ecx",\
|
|
"shr ecx, 2",\
|
|
"begvlin16firsta: mov byte ptr [edi], al",\
|
|
"mov byte ptr [edi+80], al",\
|
|
"mov byte ptr [edi+160], al",\
|
|
"mov byte ptr [edi+240], al",\
|
|
"add edi, 320",\
|
|
"dec ecx",\
|
|
"jnz begvlin16firsta",\
|
|
"mov ecx, eax",\
|
|
"and ecx, 3",\
|
|
"jz skipfirst",\
|
|
"begvlin16firstb: mov byte ptr [edi], al",\
|
|
"add edi, 80",\
|
|
"dec ecx",\
|
|
"jnz begvlin16firstb",\
|
|
"skipfirst:",\
|
|
parm [edi][ecx]\
|
|
modify exact [eax ecx edi]\
|
|
|
|
#pragma aux vlin16 =\
|
|
"mov esi, edi",\
|
|
"begvlin16: movsb",\
|
|
"add edi, 79",\
|
|
"add esi, 79",\
|
|
"dec ecx",\
|
|
"jnz begvlin16",\
|
|
parm [edi][ecx]\
|
|
modify exact [ecx esi edi]\
|
|
|
|
#pragma aux drawpixel16 =\
|
|
"mov ecx, edi",\
|
|
"mov eax, 0x00008008",\
|
|
"mov dx, 0x3ce",\
|
|
"ror ah, cl",\
|
|
"shr edi, 3",\
|
|
"out dx, ax",\
|
|
"mov cl, byte ptr [edi+0xa0000]",\
|
|
"mov byte ptr [edi+0xa0000], al",\
|
|
parm [edi]\
|
|
modify exact [eax ecx edx edi]\
|
|
|
|
#pragma aux fillscreen16 =\
|
|
"mov dx, 0x3ce",\
|
|
"shl ax, 8",\
|
|
"out dx, ax",\
|
|
"mov ax, 0xff08",\
|
|
"out dx, ax",\
|
|
"shr ecx, 5",\
|
|
"add edi, 0xa0000",\
|
|
"rep stosd",\
|
|
parm [edi][eax][ecx]\
|
|
modify exact [eax ecx edx edi]\
|
|
|
|
#pragma aux koutp =\
|
|
"out dx, al",\
|
|
parm [edx][eax]\
|
|
modify exact \
|
|
|
|
#pragma aux koutpw =\
|
|
"out dx, ax",\
|
|
parm [edx][eax]\
|
|
modify exact \
|
|
|
|
#pragma aux kinp =\
|
|
"in al, dx",\
|
|
parm nomemory [edx]\
|
|
modify exact [eax]\
|
|
|
|
#pragma aux mul3 =\
|
|
"lea eax, [eax+eax*2]",\
|
|
parm nomemory [eax]\
|
|
|
|
#pragma aux mul5 =\
|
|
"lea eax, [eax+eax*4]",\
|
|
parm nomemory [eax]\
|
|
|
|
#pragma aux mul9 =\
|
|
"lea eax, [eax+eax*8]",\
|
|
parm nomemory [eax]\
|
|
|
|
//returns eax/ebx, dmval = eax%edx;
|
|
#pragma aux divmod =\
|
|
"xor edx, edx",\
|
|
"div ebx",\
|
|
"mov dmval, edx",\
|
|
parm [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
value [eax]
|
|
|
|
//returns eax%ebx, dmval = eax/edx;
|
|
#pragma aux moddiv =\
|
|
"xor edx, edx",\
|
|
"div ebx",\
|
|
"mov dmval, eax",\
|
|
parm [eax][ebx]\
|
|
modify exact [eax edx]\
|
|
value [edx]
|
|
|
|
#pragma aux klabs =\
|
|
"test eax, eax",\
|
|
"jns skipnegate",\
|
|
"neg eax",\
|
|
"skipnegate:",\
|
|
parm nomemory [eax]\
|
|
|
|
#pragma aux ksgn =\
|
|
"add ebx, ebx",\
|
|
"sbb eax, eax",\
|
|
"cmp eax, ebx",\
|
|
"adc al, 0",\
|
|
parm nomemory [ebx]\
|
|
modify exact [eax ebx]\
|
|
|
|
//eax = (unsigned min)umin(eax,ebx)
|
|
#pragma aux umin =\
|
|
"sub eax, ebx",\
|
|
"sbb ecx, ecx",\
|
|
"and eax, ecx",\
|
|
"add eax, ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax ecx]\
|
|
|
|
//eax = (unsigned max)umax(eax,ebx)
|
|
#pragma aux umax =\
|
|
"sub eax, ebx",\
|
|
"sbb ecx, ecx",\
|
|
"xor ecx, 0xffffffff",\
|
|
"and eax, ecx",\
|
|
"add eax, ebx",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax ecx]\
|
|
|
|
#pragma aux kmin =\
|
|
"cmp eax, ebx",\
|
|
"jl skipit",\
|
|
"mov eax, ebx",\
|
|
"skipit:",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax]\
|
|
|
|
#pragma aux kmax =\
|
|
"cmp eax, ebx",\
|
|
"jg skipit",\
|
|
"mov eax, ebx",\
|
|
"skipit:",\
|
|
parm nomemory [eax][ebx]\
|
|
modify exact [eax]\
|
|
|
|
#pragma aux limitrate =\
|
|
"mov dx, 0x3da",\
|
|
"wait1: in al, dx",\
|
|
"test al, 8",\
|
|
"jnz wait1",\
|
|
"wait2: in al, dx",\
|
|
"test al, 8",\
|
|
"jz wait2",\
|
|
modify exact [eax edx]\
|
|
|
|
#pragma aux readtimer =\
|
|
"mov al, 0xd2",\
|
|
"out 0x43, al",\
|
|
"in al, 0x40",\
|
|
"shl eax, 24",\
|
|
"in al, 0x40",\
|
|
"rol eax, 8",\
|
|
modify [eax]\
|
|
|
|
#pragma aux redblueblit = \
|
|
"xor ecx, ecx",\
|
|
"begblit: mov eax, dword ptr [edx+ecx]",\
|
|
"shl eax, 4",\
|
|
"add eax, dword ptr [ebx+ecx]",\
|
|
"mov dword ptr [ecx+0xa0000], eax",\
|
|
"add ecx, 4",\
|
|
"cmp ecx, esi",\
|
|
"jb begblit",\
|
|
parm [ebx][edx][esi]\
|
|
modify exact [eax ecx]\
|
|
|
|
#pragma aux chainblit =\
|
|
"shr ecx, 1",\
|
|
"jnc prebeg",\
|
|
"mov al, byte ptr [esi+8]",\
|
|
"mov ah, byte ptr [esi+12]",\
|
|
"shl eax, 16",\
|
|
"mov al, byte ptr [esi]",\
|
|
"mov ah, byte ptr [esi+4]",\
|
|
"mov dword ptr [edi], eax",\
|
|
"add esi, 16",\
|
|
"add edi, 4",\
|
|
"test ecx, ecx",\
|
|
"prebeg: jz endit",\
|
|
"beg: mov al, byte ptr [esi+8]",\
|
|
"mov bl, byte ptr [esi+24]",\
|
|
"mov ah, byte ptr [esi+12]",\
|
|
"mov bh, byte ptr [esi+28]",\
|
|
"shl eax, 16",\
|
|
"add edi, 8",\
|
|
"shl ebx, 16",\
|
|
"mov al, byte ptr [esi]",\
|
|
"mov bl, byte ptr [esi+16]",\
|
|
"mov ah, byte ptr [esi+4]",\
|
|
"mov bh, byte ptr [esi+20]",\
|
|
"add esi, 32",\
|
|
"mov dword ptr [edi-8], eax",\
|
|
"dec ecx",\
|
|
"mov dword ptr [edi-4], ebx",\
|
|
"jnz beg",\
|
|
"endit:",\
|
|
parm [esi][edi][ecx]\
|
|
modify exact [eax ebx ecx esi edi]\
|
|
|
|
#pragma aux swapchar =\
|
|
"mov cl, [eax]",\
|
|
"mov ch, [ebx]",\
|
|
"mov [ebx], cl",\
|
|
"mov [eax], ch",\
|
|
parm [eax][ebx]\
|
|
modify exact [ecx]\
|
|
|
|
#pragma aux swapshort =\
|
|
"mov cx, [eax]",\
|
|
"mov dx, [ebx]",\
|
|
"mov [ebx], cx",\
|
|
"mov [eax], dx",\
|
|
parm [eax][ebx]\
|
|
modify exact [ecx edx]\
|
|
|
|
#pragma aux swaplong =\
|
|
"mov ecx, [eax]",\
|
|
"mov edx, [ebx]",\
|
|
"mov [ebx], ecx",\
|
|
"mov [eax], edx",\
|
|
parm [eax][ebx]\
|
|
modify exact [ecx edx]\
|
|
|
|
#pragma aux swapbuf4 =\
|
|
"begswap:",\
|
|
"mov esi, [eax]",\
|
|
"mov edi, [ebx]",\
|
|
"mov [ebx], esi",\
|
|
"mov [eax], edi",\
|
|
"add eax, 4",\
|
|
"add ebx, 4",\
|
|
"dec ecx",\
|
|
"jnz short begswap",\
|
|
parm [eax][ebx][ecx]\
|
|
modify exact [eax ebx ecx esi edi]\
|
|
|
|
#pragma aux swap64bit =\
|
|
"mov ecx, [eax]",\
|
|
"mov edx, [ebx]",\
|
|
"mov [ebx], ecx",\
|
|
"mov ecx, [eax+4]",\
|
|
"mov [eax], edx",\
|
|
"mov edx, [ebx+4]",\
|
|
"mov [ebx+4], ecx",\
|
|
"mov [eax+4], edx",\
|
|
parm [eax][ebx]\
|
|
modify exact [ecx edx]\
|
|
|
|
//swapchar2(ptr1,ptr2,xsiz); is the same as:
|
|
//swapchar(ptr1,ptr2); swapchar(ptr1+1,ptr2+xsiz);
|
|
#pragma aux swapchar2 =\
|
|
"add esi, ebx",\
|
|
"mov cx, [eax]",\
|
|
"mov dl, [ebx]",\
|
|
"mov [ebx], cl",\
|
|
"mov dh, [esi]",\
|
|
"mov [esi], ch",\
|
|
"mov [eax], dx",\
|
|
parm [eax][ebx][esi]\
|
|
modify exact [ecx edx esi]\
|
|
|
|
static long timeroffs1mhz;
|
|
//accutimeroffs = -8-(t1-t0);
|
|
#pragma aux inittimer1mhz =\
|
|
"xor ebx, ebx",\
|
|
"xor ecx, ecx",\
|
|
"in al, 0x61",\
|
|
"or al, 1",\
|
|
"out 0x61, al",\
|
|
"mov al, 0x34",\
|
|
"out 0x43, al",\
|
|
"xor al, al",\
|
|
"out 0x40, al",\
|
|
"mov al, 0xb4",\
|
|
"out 0x43, al",\
|
|
"mov al, 240",\
|
|
"out 0x42, al",\
|
|
"xor al, al",\
|
|
"cli",\
|
|
"out 0x40, al",\
|
|
"dec al",\
|
|
"out 0x42, al",\
|
|
"mov al, 0x04",\
|
|
"out 0x43, al",\
|
|
"in al, 0x40",\
|
|
"mov bl, al",\
|
|
"in al, 0x40",\
|
|
"mov bh, al",\
|
|
"mov al, 0x84",\
|
|
"out 0x43, al",\
|
|
"in al, 0x42",\
|
|
"mov cl, al",\
|
|
"in al, 0x42",\
|
|
"sti",\
|
|
"mov ch, al",\
|
|
"sub ebx, ecx",\
|
|
"sub ebx, 8",\
|
|
"mov timeroffs1mhz, ebx",\
|
|
modify exact [eax ebx ecx]\
|
|
|
|
#pragma aux uninittimer1mhz =\
|
|
"in al, 0x61",\
|
|
"and al, 252",\
|
|
"out 0x61, al",\
|
|
modify exact [eax]\
|
|
|
|
//t = ((ecx-ebx+timeroffs1mhz)&0xfff0)*4095 + ecx;
|
|
#pragma aux gettime1mhz =\
|
|
"mov ebx, timeroffs1mhz",\
|
|
"xor ecx, ecx",\
|
|
"mov al, 0x04",\
|
|
"cli",\
|
|
"out 0x43, al",\
|
|
"in al, 0x40",\
|
|
"sub bl, al",\
|
|
"in al, 0x40",\
|
|
"sbb bh, al",\
|
|
"mov al, 0x84",\
|
|
"out 0x43, al",\
|
|
"in al, 0x42",\
|
|
"mov cl, al",\
|
|
"in al, 0x42",\
|
|
"sti",\
|
|
"mov ch, al",\
|
|
"add ebx, ecx",\
|
|
"and ebx, 0x0000fff0",\
|
|
"sub ecx, ebx",\
|
|
"shl ebx, 12",\
|
|
"add ebx, ecx",\
|
|
modify exact [eax ebx ecx]\
|
|
value [ebx]\
|
|
|
|
//eax = eax-ebx; if (eax < 0) eax += (1<<28) - (1<<16);
|
|
#pragma aux deltatime1mhz =\
|
|
"sub eax, ebx",\
|
|
"jnc skipit",\
|
|
"add eax, 0x0fff0000",\
|
|
"skipit:",\
|
|
parm [ebx][eax]\
|