
Code: Select all
*Start = AllocateExecutableMemory(1)
PokeB(*Start, $CB)
CallFunctionFast(*Start)
Code: Select all
*Start = AllocateExecutableMemory(1)
PokeB(*Start, $CB)
CallFunctionFast(*Start)
Code: Select all
Caution ! This program could contain a virus : Are you sure you want to execute it ?
[Yes] [No] [Cancel]
Code: Select all
Object1()
...
code
...
JMP {lea Object2() } << Poke!
Object2()
...
code
...
JMP {lea Object3() } << Poke!
Object3()
...
code
...
JMP {lea Object1() } << And Poke!
Code: Select all
In this rectangle:
1) There is ... time(s) the figure 4
2) There is ... time(s) the figure 3
3) There is ... time(s) the figure 2
4) There is ... time(s) the figure 1
Who are you replying to? Has a post been deleted?>> Autoreferency enkrypton... What's that?
Maybe an expression with lots of error that a french try to translate!
Code: Select all
\ Just for fun (Win32Forth v6.13.00)...
: Test CR S" Hi, I'm a trojan for all dummies !!1" TYPE CR ;
HERE CONSTANT TestEnd
' Test CONSTANT TestStart
TestEnd TestStart - Constant CodeSize
CodeSize Allocate Drop Value MEMORY
TestStart MEMORY CodeSize MOVE
MEMORY EXECUTE