|  | 
|   | 
 | 
  p.specht
 
   | Maschinenprogramme für älteres XProfan: Assembler-Hex in statisches Array (declare A&[fixeZahl])  packen gelingt nur für kleine Programme ohne große Sprungweiten, solange diese Internetseite:  [...]   noch online ist, und man sich dort 32-Bit-Code generieren lässt! Vorteil: Kann fast alle x86/x87/mmx/xmm/sse..-Befehle! Nachteil: Compiliert wird die Verwendung anderer als der XProfan-X4-geprüften Inline-Asmcodes riskant...
 Cls
'Vorspann für jedes ASM-Programm:
'55                      push   ebp
'89 e5                   mov    ebp,esp
'Quelle für "Wirkteil": https://defuse.ca/online-x86-assembler.htm
'8b 45 08                mov    eax,DWORD PTR [ebp + $08]
'Abspann für jedes ASM-Programm (Dein eigenes Edit):
'89 ec                   mov    esp,ebp
'5d                      pop    ebp
'c2 04 00                ret    $04  '<<< ZU EDITIEREN!: 4 Byte pro 1 Parameter
Var P$="5589E5"+"8B4508"+"89EC5DC20400"' (Vorspann + Wirkteil + Abspann)
Var Pz&=(len(P$)-1)/8
Declare B&[Pz&],Z$' : print sizeof(B&[])-1 '= Check MaxIndex
WhileLoop 0,Pz&:Z$=left$(mid$(P$,8*&Loop+1,8)+"00000000",8)
    Z$=mid$(z$,7,2)+mid$(z$,5,2)+mid$(z$,3,2)+mid$(z$,1,2):B&[&Loop]=val("$"+Z$)
endwhile
Print CALL(addr(b&[0]),1234567890)
WaitInput
End
 |  
  | 
|   | 
 | XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...   | 26.05.2021  ▲ |  
  | 
|   | 
 
 
  |