Criando Um Gerador De Cash

[' Sky 7]

Bom Pessoal Vou ensinar a vocês a fazer um gerador de cash

Vamos começar

Vou da um exemplo de como criar um da level up games

 

adicione

 

2 Edit

2 Button

 

No Button 1 Adicione esse codigo

Obs:Mude o caption para Gerar Cartão

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

No Button 2 Adicione

Obs : Mude o caption para gerar pin

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Aperte F9 e Seja Feliz

 

Duvidas de como criar outros geradores Poste aqui .

[rapha57 1]

Nao entendi :(

onde escrevo isso?

[Surfistinha£ 21]

Nao entendi :(

onde escrevo isso?

 

nos botoes que vc adicionou no delphi

 

@topic

 

Ta bom conteudo simples e bom

 

vlw

[viniciusavs 0]

Bom vo tentar .. (:

 

Futuramente se eu lembrar eu etido aki e te flo se deu certo ou nao (:

[DragonBoss 8]

cash nos jogos da lvl up eh tipo uma "premium account" no tibia ? Oo , ou tem nd a ver ? :p

 

OBS: isso funfa ? xD

[Surfistinha£ 21]

em tibia nao pq nao e da lvl up

 

vlw

[bidoow 0]

ah isso é foda funcionar, funciona que nem o gerador de senha, gera numeros aleatorios.

 

ou não? asuasuh

 

vlww ai

[Surfistinha£ 21]

ah isso é foda funcionar, funciona que nem o gerador de senha, gera numeros aleatorios.

 

ou não? asuasuh

 

vlww ai

 

Sim igualmente igual a ele

 

Pra vc consegui gerar um numero valido demora muito

 

Mas quem tem paciencia uma otima opção

 

vlw

[DragonBoss 8]

tipo, eu tinha entendido q n funfava em tibia, mas o ke keria saber eh se dava certo nos jogo da lvl up, pq nem jogo, mas meus rl joga, e fika pagando cash , se funfasse dava pra eu tira uns lucro xD...mas agora ke o surf falo ke eh foda de acerta um codigo valido ke eu entendi =P...o programa vai gerar numeros, ae pode ser ke uma dessas sequencias seja compativel com a do cash ke vc compra...eh isso neh ? \o/

[' Sky 7]

bom pra qm nao tem condições de comprar cash

essa é a solução

ja cheguei a encontrar so 1 valido

[viniciusavs 0]

Pra quem tem paciencia uma boa ?!?

 

 

AUHAU' nao vai servir pra mim .. !!

 

FATOO !!

[neivisson1 0]

ow uma duvida....

Qual a base de numeração pra criar ?

Pq todos cartao tem uns numeros inicais né ?

Tem que por essa base ou é so botar como ta aew ?

[~OwneR~ 8]

@neivisson1

Não é baseado em nada... Simplesmente gera números aleatóreos...

 

@Topic

A chance de gerar um código válido de 16 dígitos é de 7.958.661.109.946.400.884.391.936!!! Vamos considerar que exista cerca de 100.000.000 de códigos válidos, esse número vai para 7.958.661.109.946.400

Agora têm o PIN, a chance de achar o PIN de um código válido é de 3.656.158.440.062.976

A chance de acertar de primeira é Código*PIN, ou seja, 29.098.125.988.731.502.949.675.984.486.400

MELDELSSS!!!!!!!!!!!!!!!!!!!!

Mesmo que o cálculo esteja incorreto a chance de conseguir um Código e PIN válido é MUUUUUUUUUUUUUUUUUUUUUITO difícil... Quase que IMPOSSÍVEL!!!!!!!!!!

 

Calculo usado: 36 (26 letras + 10 números) elevado ao número de dígitos

[neivisson1 0]

Vlw owner...

Vou tentar ake...

Mas as chances sao realmente muito baixas '-'

[Surfistinha£ 21]

Nao se vc comprar um novo cartão

[Niik 3]

Mesmo eu naum gostando mto de gerador...

 

Bom Post!!

 

Nunk consegui achar um code mas td bem

shauishaiushuashuia

[bidoow 0]

Nunk consegui achar um code mas td bem

shauishaiushuashuia

 

acho que ninguem nunca conseguiu achar um na reaal , ashasuhasuhasus !

[dragonman12 0]

Onde Eu boto esses codigos? clico duas vezes no button e boto la?

[bidoow 0]

Onde Eu boto esses codigos? clico duas vezes no button e boto la?

 

sim, tipo você clica 2 vezes dai estará assim:

 

procedure TForm1.Button2Click(Sender: TObject);

begin

 

end;

 

dai você apaga o BEGIN e bota o codigo, fica assim

 

procedure TForm1.Button1Click(Sender: TObject);

var

i: integer;

const

str = 'ABCDEFGHIJKLMNOPQRSTUVXYWZ1234567890';{Code a ser gerado}

max = 16;{O numero ou letra que vai gerar esse numero 6 é a quantidade de numero ou letra a ser gerador}

begin

Edit1.Text := '';

for i := 1 to max do

Edit1.Text := Edit1.Text + str[random(length(str))+1];

end;

 

vlww

[Mr. Pitaya~ 0]

É o melhor que pôde fazer?

A única coisa que você fez, foi pegar este code de um tuto de gerar senhas 'random', que o max por padrão era 6 e em um vc alterou para 16 e outro para 10.

Nada criativo.

Esperava mais de você, amigo.

[קђ๏єภเא 15]

Fico zica essa em veio, mais tem que ter mais alguns complementos tipo se add uma web browser com a pagina do cash la fica melhor veio xD eu ia faze um pro web cheats so que to sem skin :(.

 

É o melhor que pôde fazer?

A única coisa que você fez, foi pegar este code de um tuto de gerar senhas 'random', que o max por padrão era 6 e em um vc alterou para 16 e outro para 10.

Nada criativo.

Esperava mais de você, amigo.

 

Velho voce e um idiota total,

nem foi o max que posto isso primero seu lambao foi o surfist mesmo veio, ele so posto bem antigamente seu idiota.

Num sabe de nada num fala merda ¬¬.

[bidoow 0]

É o melhor que pôde fazer?

A única coisa que você fez, foi pegar este code de um tuto de gerar senhas 'random', que o max por padrão era 6 e em um vc alterou para 16 e outro para 10.

Nada criativo.

Esperava mais de você, amigo.

 

pelo menos o cara feiz algo, não ficou criticando . :rolleyes:

[Surfistinha£ 21]

E eu tinha postado fais um tempo ja

Mr. Pitaya~ n fale besteira se vc nao sabe de ndz

Pђ๏єภเx nao precizava disso ne

 

max so posto vei ele nen invento os codes '--

[קђ๏єภเא 15]

Surfistinh olha issp num gera numeros randomicos de verdade tipo tem como por um numero randomico aqui \/

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

(onde ta em vermelho)

que va de um a 5?

si realmente ele se torna randomico!

[Surfistinha£ 21]

Adicione o numero tbm ao Edit1.Text := '';

 

var

i: integer;

const

str = 'ABCDEFGHIJKLMNOPQRSTUVXYWZ1234567890';{Code a ser gerado}

max = 16;{O numero ou letra que vai gerar esse numero 6 é a quantidade de numero ou letra a ser gerador}

begin

Edit1.Text := '4234532';

for i := 1 to max do

Edit1.Text := Edit1.Text + str[random(length(str))+1];

end;

 

end.

 

Torna sim pq vc dividiu os numeros das letras quando serem gerados eles se juntam e torna randomico

 

E muito dificil de vim cash mas oq que custa tentar