Perdu c'est oui
mais Non
B'AH quand même
Un peu caffouilleux mais c'est comme ca
WinDev ne permet pas de saisir directement des sequences en assembleur.
Mais via une api windows CallWindowsProcA et une bonne connaissance en
ASM un petit code fonctionnel (Surtout pour la conversion des ordres asm
en Hexadécimal)
Code de la procedure GETCPUID()
Procedure GetCPUID()
Asm est une chaîne
eax est un entier
ebx est un entier
ecx est un entier
edx est un entier
Low est un entier
Asm += Caract(0x56)
Asm += Caract(0x55)
Asm += Caract(0x8B) + Caract(0xEC)
Asm += Caract(0x8B) + Caract(0x75) + Caract(0xC)
esi,dword ptr [ebp+0Ch]
Asm += Caract(0x8B) + Caract(0x6)
eax,dword ptr [esi]
Asm += Caract(0xF) + Caract(0xA2)
Asm += Caract(0x8B) + Caract(0x75) + Caract(0xC)
esi,dword ptr [ebp+0Ch]
Asm += Caract(0x89) + Caract(0x6)
ptr [esi],eax
Asm += Caract(0x8B) + Caract(0x75) + Caract(0x10)
esi,dword ptr [ebp+10h]
Asm += Caract(0x89) + Caract(0x1E)
ptr [esi],ebx
Asm += Caract(0x8B) + Caract(0x75) + Caract(0x14)
esi,dword ptr [ebp+14h]
Asm += Caract(0x89) + Caract(0xE)
ptr [esi],ecx
Asm += Caract(0x8B) + Caract(0x75) + Caract(0x18)
esi,dword ptr [ebp+18h]
Asm += Caract(0x89) + Caract(0x16)
ptr [esi],edx
Asm += Caract(0x5D)
Asm += Caract(0x5E)
Asm += Caract(0xC2) + Caract(0x10) + Caract(0x0)
eax = 1
API("user32","CallWindowProcA", &Asm, &eax, &ebx, &ecx, &edx)
Low = eax
eax = 3
API("user32","CallWindowProcA", &Asm, &eax, &ebx, &ecx, &edx)
RENVOYER HexVal(Low) + "-" + HexVal(ecx) + "-" + HexVal(edx)
Code de la procedure HexVal
Procedure HexVal( lngValue est un entier)
sValRet est une chaîne
sValRet = NumériqueVersChaîne(lngValue,"x")
SI Taille(sValRet) < 8 ALORS sValRet = Répète("0",8 - Taille(sValRet)) +
sValRet
sValRet = sValRet [[ A 4]] + "-" + sValRet[[ 5 A ]]
RENVOYER sValRet
[DrCharly93] www.wdforge.org
Philippe Pasquali a écrit :
A ma connaissance c'est NON
"naceur" <naceur@mail2world.com> a écrit dans le message de
news:4215afa7$1@news.pcsoft.fr...
est il possible d ecrire une sequnce de programmation en assembleur
si possible comment et svp un exemple