Converter código para Delphi

[cabuloso1 0]

C0nvrter c0de pra Delph'i

code é c++

UINT getCount() {
return (*(BYTE*)0x127ACD2) +9;
}

void bakana() {
VM_START
	try {
		BYTE b = getCount();
		b++;
		for(UINT i = 0; i < b;i++) {
			DWORD x = *(DWORD*)loko_pointer;

			if(x == 0)
				continue;

			x += 0x4B320 + i*7;

			DWORD y = *(DWORD*)x;

			if(y == 0)
				continue;

			y += *(BYTE*)y;

			if(y == 0)
				continue;

			*(DWORD*)(y+0x831) = 0x5467CAC5;
		}
} catch(...) {

}
VM_END
}

Se alguem poder ajudar eu agradeço.

[Baderous 33]

Usa as tags GeSHi para colorir o código.

Atenção aos títulos dos tópicos.

[cabuloso1 0]

Desculpa por nao ter colocado cores, alguem me ajuda ai por favor.