OLÁ, OLHE O MEU PADRÃO!

O Programador · April 26, 2017

TODOS NÓS ESTAMOS AQUI PRA ACHAR AS 50 DEZENAS QUE NOS DÊ DINHEIRO, ENTÃO EU BOLEI UM PADRÃO DIFERENTE DE TUDO QUE JÁ VIMOS NESSE FORÚM.

DURANTE MUITO TEMPO NESSE FORÚM NÃO VI PADRÃO ASSIM, VOU TRAZER PRA CÁ POIS QUERO QUE TODOS FAÇAM PARTE DESSE NOVO PADRÃO.

VAI SER ASSIM VC ESCOLHE UM PADRÃO, PODE SER O QUE MAIS SAI NOS CONCURSOS, OU O QUE MENOS SAI, VOCÊ VAI DECIDIR ISSO.

O PROGRAMA QUE EU CRIEI VAI TE DAR OPÇÕES DE SOMA AO SEU PADRÃO ESCOLHIDO.

BASICAMENTE.

SÃO 70 PADRÕES CADA PADRÃO TEM 32 DEZENAS. (NÃO SE PREOCUPE POIS NEM TODOS SÃO FORTES).

AS 100 DEZENAS FORAM DIVIDIDAS EM 12 GRUPOS. (USAREMOS O ESPELHO).

NOIS ENCHERGAMOS O JOGO ASSIM. JOGO.PNG.c756cae717a392bef38f80d820c616f1.PNG

MAS EU QUERO QUE VCS ENCHEGUEM O JOGO ASSIM JOGO1.1.png.4b779daea0ce9b5849b3f2128f2ccd5e.png E O JOGO2.1.png.92c7a8f33718f09f61f96bf14e26087f.png

NO MODO DE IMPRESSÃO DO JOGO. 12 DIVISÕES.

O Programador · April 26, 2017

AS DIVISÕES FORAM FEITAS ASSIM

JOGO1.3.png.9e3c1d9d8360032282afbb6bba79b8d7.png JOGO2.2.PNG.cad6ff4d71582ec662c47fad91e1c254.PNG

NA A FIGURA DA ESQUERDA É O VOLANTE ORIGINAL E O DA DIREITA O ESPELHO.

NO PROGRAMA QUE EU FIZ JÁ ESTÃO FEITAS ESSAS DIVISÕES.

NÃO SE APEGUEM AOS NÚMEROS DOS JOGOS O QUE VALE NAS IMAGENS É AS DIVISÕES.

Edited April 26, 2017 by O Programador
MAIS CONTEUDO

O Programador · April 26, 2017

SEGUE O LINK DO ESQUEMA NOVO:

DEPOIS VOU FAZER UM VIDEO CURTO PRA ENSINAR COMO USA O PROGRAMA.

(NÃO TEM SEGREDO DIGITA OS NUMEROS DO CONCURSO E PRONTO O PROGRAMA FAZ O RESTO)

https://www.4shared.com/folder/ptJ3o9YV/_esquema_novo.html.

QUERO DEIXAR CLARO QUE PODEMOS A QUALQUER HORA IMPLEMENTAR IDEIAS A ESSE PROJETO.

O Programador · April 26, 2017

1 minuto atrás, Crazy Rabbit disse:

Olá Programador,

Está dando vírus em 2 softwares,

Software Nome do Vírus Atualização

DrWeb Adware.InstallCore.53
20170426

Zillya Worm.VBNA.Win32.264033 20170426

Olá Crazy deve estar acusando vírus pois o programa visualg é um exe.

April 26, 2017

oq exatamente o programa faz?

O Programador · April 26, 2017

CRAZY AMANHÃ VOU POSTAR UM VIDEO DE COMO USAR O PROGRAMA, NÃO PRECISA PREOCUPAR AGORA COM O PROGRAMA,

VAMOS ENTEDER PRIMEIRO COMO FUNCIONA O ESQUEMA, PARA QUE POSSA SURGIR NOVAS IDEIAS POR ISSO QUE EU DIVULGUEI ESSE ESQUEMA. EU JÁ FIZ PARTE DESSE FORUM SEI COMO FUNCIONA. ABRAÇO.

O Programador · April 26, 2017

54 minutos atrás, Crazy Rabbit disse:

Ok, mesmo assim vou analisar ele na madrugada, só por precaução,

pois está detectando 2 vírus, vou me infectar na máquina virtual e

daí vou saber se tem ou não tem vírus nocivo ao computador.

Crazy Rabbit

CRAZY, MEU PC NÃO DETECTOU VIRUS, MAS SERÁ QUE VC NÃO CONSEGUE LIMPAR E POSTAR DE NOVO, VALEU

April 26, 2017

3 horas atrás, O Programador disse:

TODOS NÓS ESTAMOS AQUI PRA ACHAR AS 50 DEZENAS QUE NOS DÊ DINHEIRO, ENTÃO EU BOLEI UM PADRÃO DIFERENTE DE TUDO QUE JÁ VIMOS NESSE FORÚM.

DURANTE MUITO TEMPO NESSE FORÚM NÃO VI PADRÃO ASSIM, VOU TRAZER PRA CÁ POIS QUERO QUE TODOS FAÇAM PARTE DESSE NOVO PADRÃO.

VAI SER ASSIM VC ESCOLHE UM PADRÃO, PODE SER O QUE MAIS SAI NOS CONCURSOS, OU O QUE MENOS SAI, VOCÊ VAI DECIDIR ISSO.

O PROGRAMA QUE EU CRIEI VAI TE DAR OPÇÕES DE SOMA AO SEU PADRÃO ESCOLHIDO.

BASICAMENTE.

SÃO 70 PADRÕES CADA PADRÃO TEM 32 DEZENAS. (NÃO SE PREOCUPE POIS NEM TODOS SÃO FORTES).

AS 100 DEZENAS FORAM DIVIDIDAS EM 12 GRUPOS. (USAREMOS O ESPELHO).

NOIS ENCHERGAMOS O JOGO ASSIM.

MAS EU QUERO QUE VCS ENCHEGUEM O JOGO ASSIME O

NO MODO DE IMPRESSÃO DO JOGO. 12 DIVISÕES.

Programador !

Vamos testar....

Qual é a senha para executar?

Att,

April 26, 2017

1 minuto atrás, Crazy Rabbit disse:

Cuidado, Pitaco_certo,

Este arquivo não é original, estou em contato como o desenvolvedor.

Calma, não abra ainda.

Crazy Rabbit

Obrigado!

Aqui não reportou nenhum problema.

Posso garantir que o sistema é normal sem vírus, aqui não gerou nenhum problema.

Apenas o programador inseriu uma senha para rodar a aplicação, preciso apenas disso para testar....

Grato!

April 26, 2017

pelo que sei o visualg é uma linguagem de programação tipo o vba mas independente , algo como a linguagem C mas em portugues

talvez o arquivo esteja maior por conter o programa do esquema

mas se bem que se for só para mudar as dezenas das tabelas seria só usar o excel

April 27, 2017

fiquei curioso e fui dar uma olhadinha , e realmente são varios arquivos que logo se mostram

um deles é esse

algoritmo "semnome"
arquivo "concurso1.txt"
var
resp: caractere
senha, login: inteiro
v: vetor [1..20] de inteiro
m: vetor [0..3] de inteiro
n: vetor [1..20] de caractere
c, i,j, sA,sB,sC,sD,s1,s2,s3,s4,s5,s6,s7,s8: inteiro
a1,a2,a3,a4,a5,a6,a7,a8,a9: inteiro
b1,b2,b3,b4,b5,b6,b7,b8,b9: inteiro
c1,c2,c3,c4,c5,c6,c7,c8,c9: inteiro
d1,d2,d3,d4,d5,d6,d7,d8,d9: inteiro
f1,f2,f3,f4,f5,f6,f7,f8: inteiro
g1,g2,g3,g4,g5,g6,g7,g8: inteiro
h1,h2,h3,h4,h5,h6,h7,h8: inteiro
i1,i2,i3,i4,i5,i6,i7,i8: inteiro
j1,j2,j3,j4,j5,j6,j7,j8: inteiro
l1,l2,l3,l4,l5,l6,l7,l8: inteiro
m1,m2,m3,m4,m5,m6,m7,m8: inteiro
n1,n2,n3,n4,n5,n6,n7,n8: inteiro
procedimento Topo()
inicio
Escreval(" ")
senha <- 1234
Escreva (".                    senha: ")
Leia (login)
Enquanto (login <> senha) faca
         LimpaTela
         Topo()
FimEnquanto
FimProcedimento
inicio
Topo()
LimpaTela
a1 <- 01
a2 <- 14
a3 <- 25
a4 <- 38
a5 <- 49
a6 <- 61
a7 <- 74
a8 <- 85
a9 <- 98

b1 <- 03
b2 <- 16
b3 <- 27
b4 <- 40
b5 <- 52
b6 <- 63
b7 <- 76
b8 <- 87
b9 <- 00

f1 <- 05
f2 <- 18
f3 <- 29
f4 <- 41
f5 <- 54
f6 <- 65
f7 <- 78
f8 <- 98

g1 <- 07
g2 <- 09
g3 <- 20
g4 <- 21
g5 <- 32
g6 <- 34
g7 <- 43
g8 <- 45

h1 <- 12
h2 <- 23
h3 <- 36
h4 <- 47
h5 <- 60
h6 <- 72
h7 <- 83
h8 <- 96

i1 <- 56
i2 <- 58
i3 <- 67
i4 <- 69
i5 <- 80
i6 <- 81
i7 <- 92
i8 <- 94

c1 <- 02
c2 <- 13
c3 <- 26
c4 <- 37
c5 <- 50
c6 <- 62
c7 <- 73
c8 <- 86
c9 <- 97

d1 <- 04
d2 <- 15
d3 <- 28
d4 <- 39
d5 <- 51
d6 <- 64
d7 <- 75
d8 <- 88
d9 <- 99

j1 <- 06
j2 <- 17
j3 <- 30
j4 <- 42
j5 <- 53
j6 <- 66
j7 <- 77
j8 <- 90

l1 <- 08
l2 <- 10
l3 <- 19
l4 <- 22
l5 <- 31
l6 <- 33
l7 <- 44
l8 <- 46

m1 <- 11
m2 <- 24
m3 <- 35
m4 <- 48
m5 <- 59
m6 <- 71
m7 <- 84
m8 <- 95

n1 <- 55
n2 <- 57
n3 <- 68
n4 <- 70
n5 <- 79
n6 <- 82
n7 <- 91
n8 <- 93
i <- 0
sA <- 0
sB <- 0
sC <- 0
sD <- 0
Escreval("")
Escreval("")
Escreva(".                 digite o concurso :")
leia(m[j])
Repita
 Para i <- 0 ate 2 faca
      LimpaTela
      Escreval("                 --------------------------------------------")
      Escreval("                         Digite os Números do Sorteio")
      Escreval("")
      Escreva("concurso: ",m[j])
      m[j] <- m[j] + 1
      Escreval("")
      Escreval("")
  Para c <- 1 ate 20 faca
     Escreva("Digite o ",c , "° : ")
     Leia (v[c])
     Se (v[c]=a1)ou(v[c]=a2)ou(v[c]=a3)ou(v[c]=a4)ou(v[c]=a5)ou(v[c]=a6)ou(v[c]=a7)ou(v[c]=a8)ou(v[c]=a9) entao
        n[c] <- ("A")
        sA <- sA + 1
     senao
         Se (v[c]=b1)ou(v[c]=b2)ou(v[c]=b3)ou(v[c]=b4)ou(v[c]=b5)ou(v[c]=b6)ou(v[c]=b7)ou(v[c]=b8)ou(v[c]=b9) entao
            n[c] <- ("B")
            sB <- sB + 1
         senao
             Se (v[c]=c1)ou(v[c]=c2)ou(v[c]=c3)ou(v[c]=c4)ou(v[c]=c5)ou(v[c]=c6)ou(v[c]=c7)ou(v[c]=c8)ou(v[c]=c9) entao
                n[c] <-("C")
                sC <- sC + 1
             senao
                 Se (v[c]=d1)ou(v[c]=d2)ou(v[c]=d3)ou(v[c]=d4)ou(v[c]=d5)ou(v[c]=d6)ou(v[c]=d7)ou(v[c]=d8)ou(v[c]=d9) entao
                    n[c] <-("D")
                    sD <- sD + 1
                 senao
                     Se (v[c]=f1)ou(v[c]=f2)ou(v[c]=f3)ou(v[c]=f4)ou(v[c]=f5)ou(v[c]=f6)ou(v[c]=f7)ou(v[c]=f8) entao
                        n[c] <-("1")
                        s1 <- s1 + 1
                     senao
                         Se (v[c]=g1)ou(v[c]=g2)ou(v[c]=g3)ou(v[c]=g4)ou(v[c]=g5)ou(v[c]=g6)ou(v[c]=g7)ou(v[c]=g8) entao
                            n[c] <-("2")
                            s2 <- s2 + 1
                         senao
                             Se (v[c]=h1)ou(v[c]=h2)ou(v[c]=h3)ou(v[c]=h4)ou(v[c]=h5)ou(v[c]=h6)ou(v[c]=h7)ou(v[c]=h8) entao
                                n[c] <-("3")
                                s3 <- s3 + 1
                             senao
                                 Se (v[c]=i1)ou(v[c]=i2)ou(v[c]=i3)ou(v[c]=i4)ou(v[c]=i5)ou(v[c]=i6)ou(v[c]=i7)ou(v[c]=i8) entao
                                    n[c] <-("4")
                                    s4 <- s4 + 1
                                 senao
                                     Se (v[c]=j1)ou(v[c]=j2)ou(v[c]=j3)ou(v[c]=j4)ou(v[c]=j5)ou(v[c]=j6)ou(v[c]=j7)ou(v[c]=j8) entao
                                        n[c] <-("5")
                                        s5 <- s5 + 1
                                     senao
                                         Se (v[c]=l1)ou(v[c]=l2)ou(v[c]=l3)ou(v[c]=l4)ou(v[c]=l5)ou(v[c]=l6)ou(v[c]=l7)ou(v[c]=l8) entao
                                            n[c] <-("6")
                                            s6 <- s6 + 1
                                         senao
                                             Se (v[c]=m1)ou(v[c]=m2)ou(v[c]=m3)ou(v[c]=m4)ou(v[c]=m5)ou(v[c]=m6)ou(v[c]=m7)ou(v[c]=m8) entao
                                                n[c] <-("7")
                                                s7 <- s7 + 1
                                             senao
                                                 Se (v[c]=n1)ou(v[c]=n2)ou(v[c]=n3)ou(v[c]=n4)ou(v[c]=n5)ou(v[c]=n6)ou(v[c]=n7)ou(v[c]=n8) entao
                                                    n[c] <-("8")
                                                    s8 <- s8 + 1
                                                 FimSe
                                             FimSe
                                         FimSe
                                     FimSe
                                 FimSe
                             FimSe
                         FimSe
                     FimSe
                 FimSe
             FimSe
         FimSe
     FimSe
  FimPara
 FimPara
   LimpaTela
   Escreval ("                           .A = ", sA)
   Escreval ("                           .B = ", sB)
   Escreval ("                           .C = ", sC)
   Escreval ("                           .D = ", sD)
   Escreval ("")
   Escreval ("                           .1 = ", s1)
   Escreval ("                           .2 = ", s2)
   Escreval ("                           .3 = ", s3)
   Escreval ("                           .4 = ", s4)
   Escreval ("")
   Escreval ("                           .5 = ", s5)
   Escreval ("                           .6 = ", s6)
   Escreval ("                           .7 = ", s7)
   Escreval ("                           .8 = ", s8)
   EscrevaL ("")
   Escreval ("                CONCURSO :",(m[j] - 3), " AO CONCURSO :",(m[j]- 1))
   EscrevaL ("")
   Escreval ("                      ",n[1],n[2],n[3],n[4],n[5],n[6],n[7],n[8],n[9],n[10],n[11],n[12],n[13],n[14],n[15],n[16],n[17],n[18],n[19],n[20])
   EscrevaL ("")
   Escreva  ("                    QUER CONTINUAR? [S/N] : ")
   Leia (resp)
Ate(resp = "N")
   Escreval ("")
   Escreval ("")
   Escreval ("")
fimalgoritmo

maguiver · April 27, 2017

A senha para rodar é = 1234

Gloria Batista · April 27, 2017

Obrigada, por avisar, Crazy...não custa aguardar...Abs.

Att. Glória

April 27, 2017

2 horas atrás, maguiver disse:

A senha para rodar é = 1234

Obrigado Maguiver!

Funcionou perfeitamente, rodando sem problema;

Ainda não pude ler o código, mas já consegui executar;

Você já interpretou o código, o que o algoritmo executa?

Att,

April 27, 2017

4 horas atrás, Crazy Rabbit disse:

"NÃO INSTALEM ESTE SOFTWARE, FUI INFECTADO NA MINHA MAQUINA VIRTUAL,

AINDA BEM QUE NÃO DÁ PROBLEMA NENHUM, PARA MIM, POIS USO SEM INTERNET

PORTANTO, FOI SÓ PASSAR UM COMBOFIX E UM ANTIVÍRUS QUE FICOU TUDO BEM,

NÃO CONSEGUI ISOLAR ESTE VÍRUS, PORTANTO ATÉ "O PROGRAMADOR" POSTAR

O SOFTWARE LIMPO, NÃO INSTALEM"

QUEM QUISER INSTALAR, É POR CONTA E RISCO PRÓPRIO.

Crazy Rabbit.

se tiver é no arquivo do interpretador que vc pode baixar do site que indicou, no caso da pagina oficial

os outros arquivos são relacionados na programação dele e são simples script , é tõ simples que até carrega a senha

talvez a maquina dele estava infectada e quando mandou infectou o arquivo exe

mas é muito facil refazer a rotina no excel

bem o script dele é muto simples posso dizer até que amador

ão que eu seja profissional, mas ele poderia ter diminuído em muito o codigo usando um array 8x12 no lugar daquelas variaveis a1,a2.. ,b1,b2...f1,f2...f8,... e um loop de verificação

Edited April 27, 2017 by Zangado

O Programador · April 27, 2017

GALERA CALMA A SENHA É 1234 (COLOQUEI SENHA SÓ PRA CERTIFICAR QUE EU TAVA COMEÇANDO DE NOVO OUTROS TESTES).

O VISULAG É UM PROGRAMA PRA FAZER CODIGOS EM PROGRAMAÇÃO, O QUE EU FIZ FOI FAZER UM CODIGO DENTRO DELE, QUE ME AJUDASSE A FAZER CALCULOS MAIS RAPIDO COMO NO COLOGA, SE TEM VIRUS, VCS PODEM BAIXAR ELE DO PROPRIO DESENVOLVEDOR GRATIS, SÓ ESCREVER VISULAG NO GOOGLE.

VOU FAZER O VIDEO EXPLICANDO O ESQUEMA ESQUEÇAM ESSE NEGOCIO DE VIRUS. DAQUI A POUCO POSTO O VIDEO OK, AI QUEM QUISER COLABORAR FIQUE A VONTADE.

NO PROGRAMA VAI PEDIR A SENHA(1234)

AI NO ARQUIVO PROJETO_FORUM_1_JOGO, VAI PEDIR O CONCURSO, VC DIGITA OS NUMEROS DO SORTEIO.

AI O PROGRAMA TE MOSTRA A QUANTIDADE DE DEZENA QUE SAIU EM CADA GRUPO SÓ ISSO.

NO ARQUIVO PROJETO_FORUM_3_JOGOS, VC DIGITA 3 CONCURSOS SEGUIDO (TIPO 1, 2, 3) AI VAI SERVIR DE BASE PARA O 4° CONCURSO.

NO ARQUIVO 12 DIVISÕES É APENAS OS GRUPOS.

O Programador · April 27, 2017

1 hora atrás, edcronos2 disse:

se tiver é no arquivo do interpretador que vc pode baixar do site que indicou, no caso da pagina oficial

os outros arquivos são relacionados na programação dele e são simples script , é tõ simples que até carrega a senha

talvez a maquina dele estava infectada e quando mandou infectou o arquivo exe

mas é muito facil refazer a rotina no excel

bem o script dele é muto simples posso dizer até que amador

ão que eu seja profissional, mas ele poderia ter diminuído em muito o codigo usando um array 8x12 no lugar daquelas variaveis a1,a2.. ,b1,b2...f1,f2...f8,... e um loop de verificação

CARA EU SOU ESTUDANTE DE PROGRAMAÇÃO, APANHEI PRA CARAMBA PRA FAZER ESSE SIMPLES CODIGO, E COMO EU FIQUEI FELIZ PRA CARAMBA POR DESENVOLVELO EU COMPARTILHEI COM TODO MUNDO É A MINHA PRIMEIRA CRIAÇÃO KKKKK.

EU NÃO TENHO EXPERIÊNCIA NENHUMA, MAS VOU LEVAR SUA CRITICA COMO CONSTRUTIVA, VALEU.

April 27, 2017

7 minutos atrás, O Programador disse:

CARA EU SOU ESTUDANTE DE PROGRAMAÇÃO, APANHEI PRA CARAMBA PRA FAZER ESSE SIMPLES CODIGO, E COMO EU FIQUEI FELIZ PRA CARAMBA POR DESENVOLVELO EU COMPARTILHEI COM TODO MUNDO É A MINHA PRIMEIRA CRIAÇÃO KKKKK.

EU NÃO TENHO EXPERIÊNCIA NENHUMA, MAS VOU LEVAR SUA CRITICA COMO CONSTRUTIVA, VALEU.

eu entendo como ficamos quando estamo aprendendo e conseguimos montar algo funcional

a minha explicação foi pela acusação do coelho maluco

mas acho que seria bom vc começar já com uma linguagem mas forte como o C ou outra mais facil

ipo eu comecei no vba e estou preso na facilidade e não consigo ir para outra

pode parecer que essa é mais simples por ter comando em português mas apenas torna mais dificil ir para outra

aprenda a usar arrays isso vai facilitar a escrita de seus codigos e tornar muito mais rapido e eficiente

Edited April 27, 2017 by Zangado

April 27, 2017

29 minutos atrás, O Programador disse:

GALERA CALMA A SENHA É 1234 (COLOQUEI SENHA SÓ PRA CERTIFICAR QUE EU TAVA COMEÇANDO DE NOVO OUTROS TESTES).

O VISULAG É UM PROGRAMA PRA FAZER CODIGOS EM PROGRAMAÇÃO, O QUE EU FIZ FOI FAZER UM CODIGO DENTRO DELE, QUE ME AJUDASSE A FAZER CALCULOS MAIS RAPIDO COMO NO COLOGA, SE TEM VIRUS, VCS PODEM BAIXAR ELE DO PROPRIO DESENVOLVEDOR GRATIS, SÓ ESCREVER VISULAG NO GOOGLE.

VOU FAZER O VIDEO EXPLICANDO O ESQUEMA ESQUEÇAM ESSE NEGOCIO DE VIRUS. DAQUI A POUCO POSTO O VIDEO OK, AI QUEM QUISER COLABORAR FIQUE A VONTADE.

NO PROGRAMA VAI PEDIR A SENHA(1234)

AI NO ARQUIVO PROJETO_FORUM_1_JOGO, VAI PEDIR O CONCURSO, VC DIGITA OS NUMEROS DO SORTEIO.

AI O PROGRAMA TE MOSTRA A QUANTIDADE DE DEZENA QUE SAIU EM CADA GRUPO SÓ ISSO.

NO ARQUIVO PROJETO_FORUM_3_JOGOS, VC DIGITA 3 CONCURSOS SEGUIDO (TIPO 1, 2, 3) AI VAI SERVIR DE BASE PARA O 4° CONCURSO.

NO ARQUIVO 12 DIVISÕES É APENAS OS GRUPOS.

Programador;

Eu gosto muito de trabalhar em projetos iniciais;

Fornecendo feedback;

Aqui parece que temos um bug, ecapando da tela temos o mesmo rodando perfeitamente;

Depois de escapar da tela, funciona perfeitamente;

Aqui tudo bem, vou para o arquivo 2!

Att,

Edited April 27, 2017 by Pitaco_certo!

Neguin · April 27, 2017

Boa tarde,

Você teria como adaptar para a lotofácil ou outra loteria???

Abraços.

BigMax · April 27, 2017

Citar

Crazy Rabbit

Vc está prestando um serviço a toda comunidade. Avisar que achou virus em um arquivo é útil para todos.
Obrigado por testar e avisar.

April 27, 2017

48 minutos atrás, Crazy Rabbit disse:

Então refaça, pois acusou o vírus novamente, não fui a fundo, pois era 05:30 horas da manhã e estava com sono,

simplesmente passei o combofix para retirar.

Portanto, há vírus e não sei o tão nocivo que é, se veio da máquina dele junto, mas de qualquer forma, há alguma coisa,

mas cada um sabe de sua vida e eu tentei apenas alertar.

Todos podem colocar o arquivo para análise, vai dar vírus em 56 antivírus.

TOTALMENTE INFECTADO, NUNCA VI UM ARQUIVO ACUSAR EM 56 ANTIVÍRUS

https://www.virustotal.com/pt/file/af5e201cab173eb7af827b222b96bfeec5cf0d8ccea6940b2e2de5c3882b4e14/analysis/1493314295/

Não vou mais avisar de vírus para ninguém, pois estou apenas fazendo um favor a todos os forenses e ainda

Crazy Rabbit

bem, eu nem baixei, como tbm não tenho baixado as planilhas e não é pq elas tbm pode ter viros

, sim cada um tem que saber oq faz com sua maquina já que nem sempre vai ter um coelho de plantão para testar antes isso bm vale par planilhas e programas lotericos

mas de qualquer forma tá aí os codigos que o cara fez , para aprender a programar é valido, mas para loteria esse tipo de estratégia acho mais ´pratico usar o excel

"tenho que trocar o teclado urgente"

algoritmo "semnome"
arquivo "concurso1755.txt"
var
resp: caractere
senha, login: inteiro
v: vetor [1..20] de inteiro
m: vetor [0..3] de inteiro
n: vetor [1..20] de caractere
c, i,j, sA,sB,sC,sD,s1,s2,s3,s4,s5,s6,s7,s8: inteiro
a1,a2,a3,a4,a5,a6,a7,a8,a9: inteiro
b1,b2,b3,b4,b5,b6,b7,b8,b9: inteiro
c1,c2,c3,c4,c5,c6,c7,c8,c9: inteiro
d1,d2,d3,d4,d5,d6,d7,d8,d9: inteiro
f1,f2,f3,f4,f5,f6,f7,f8: inteiro
g1,g2,g3,g4,g5,g6,g7,g8: inteiro
h1,h2,h3,h4,h5,h6,h7,h8: inteiro
i1,i2,i3,i4,i5,i6,i7,i8: inteiro
j1,j2,j3,j4,j5,j6,j7,j8: inteiro
l1,l2,l3,l4,l5,l6,l7,l8: inteiro
m1,m2,m3,m4,m5,m6,m7,m8: inteiro
n1,n2,n3,n4,n5,n6,n7,n8: inteiro
procedimento Topo()
inicio
Escreval(" ")
senha <- 1234
Escreva (".                    senha: ")
Leia (login)
Enquanto (login <> senha) faca
         LimpaTela
         Topo()
FimEnquanto
FimProcedimento
inicio
Topo()
LimpaTela
a1 <- 01
a2 <- 14
a3 <- 25
a4 <- 38
a5 <- 49
a6 <- 61
a7 <- 74
a8 <- 85
a9 <- 98

b1 <- 03
b2 <- 16
b3 <- 27
b4 <- 40
b5 <- 52
b6 <- 63
b7 <- 76
b8 <- 87
b9 <- 00

f1 <- 05
f2 <- 18
f3 <- 29
f4 <- 41
f5 <- 54
f6 <- 65
f7 <- 78
f8 <- 98

g1 <- 07
g2 <- 09
g3 <- 20
g4 <- 21
g5 <- 32
g6 <- 34
g7 <- 43
g8 <- 45

h1 <- 12
h2 <- 23
h3 <- 36
h4 <- 47
h5 <- 60
h6 <- 72
h7 <- 83
h8 <- 96

i1 <- 56
i2 <- 58
i3 <- 67
i4 <- 69
i5 <- 80
i6 <- 81
i7 <- 92
i8 <- 94

c1 <- 02
c2 <- 13
c3 <- 26
c4 <- 37
c5 <- 50
c6 <- 62
c7 <- 73
c8 <- 86
c9 <- 97

d1 <- 04
d2 <- 15
d3 <- 28
d4 <- 39
d5 <- 51
d6 <- 64
d7 <- 75
d8 <- 88
d9 <- 99

j1 <- 06
j2 <- 17
j3 <- 30
j4 <- 42
j5 <- 53
j6 <- 66
j7 <- 77
j8 <- 90

l1 <- 08
l2 <- 10
l3 <- 19
l4 <- 22
l5 <- 31
l6 <- 33
l7 <- 44
l8 <- 46

m1 <- 11
m2 <- 24
m3 <- 35
m4 <- 48
m5 <- 59
m6 <- 71
m7 <- 84
m8 <- 95

n1 <- 55
n2 <- 57
n3 <- 68
n4 <- 70
n5 <- 79
n6 <- 82
n7 <- 91
n8 <- 93
i <- 0
sA <- 0
sB <- 0
sC <- 0
sD <- 0
Escreval("")
Escreval("")
Escreva(".                 digite o concurso :")
leia(m[j])
Repita
 Para i <- 1 ate 1 faca
      LimpaTela
      Escreval("                 --------------------------------------------")
      Escreval("                         Digite os Números do Sorteio")
      Escreval("")
      Escreva("concurso: ",m[j])
      m[j] <- m[j] + 1
      Escreval("")
      Escreval("")
  Para c <- 1 ate 20 faca
     Escreva("Digite o ",c , "° : ")
     Leia (v[c])
     Se (v[c]=a1)ou(v[c]=a2)ou(v[c]=a3)ou(v[c]=a4)ou(v[c]=a5)ou(v[c]=a6)ou(v[c]=a7)ou(v[c]=a8)ou(v[c]=a9) entao
        n[c] <- ("A")
        sA <- sA + 1
     senao
         Se (v[c]=b1)ou(v[c]=b2)ou(v[c]=b3)ou(v[c]=b4)ou(v[c]=b5)ou(v[c]=b6)ou(v[c]=b7)ou(v[c]=b8)ou(v[c]=b9) entao
            n[c] <- ("B")
            sB <- sB + 1
         senao
             Se (v[c]=c1)ou(v[c]=c2)ou(v[c]=c3)ou(v[c]=c4)ou(v[c]=c5)ou(v[c]=c6)ou(v[c]=c7)ou(v[c]=c8)ou(v[c]=c9) entao
                n[c] <-("C")
                sC <- sC + 1
             senao
                 Se (v[c]=d1)ou(v[c]=d2)ou(v[c]=d3)ou(v[c]=d4)ou(v[c]=d5)ou(v[c]=d6)ou(v[c]=d7)ou(v[c]=d8)ou(v[c]=d9) entao
                    n[c] <-("D")
                    sD <- sD + 1
                 senao
                     Se (v[c]=f1)ou(v[c]=f2)ou(v[c]=f3)ou(v[c]=f4)ou(v[c]=f5)ou(v[c]=f6)ou(v[c]=f7)ou(v[c]=f8) entao
                        n[c] <-("1")
                        s1 <- s1 + 1
                     senao
                         Se (v[c]=g1)ou(v[c]=g2)ou(v[c]=g3)ou(v[c]=g4)ou(v[c]=g5)ou(v[c]=g6)ou(v[c]=g7)ou(v[c]=g8) entao
                            n[c] <-("2")
                            s2 <- s2 + 1
                         senao
                             Se (v[c]=h1)ou(v[c]=h2)ou(v[c]=h3)ou(v[c]=h4)ou(v[c]=h5)ou(v[c]=h6)ou(v[c]=h7)ou(v[c]=h8) entao
                                n[c] <-("3")
                                s3 <- s3 + 1
                             senao
                                 Se (v[c]=i1)ou(v[c]=i2)ou(v[c]=i3)ou(v[c]=i4)ou(v[c]=i5)ou(v[c]=i6)ou(v[c]=i7)ou(v[c]=i8) entao
                                    n[c] <-("4")
                                    s4 <- s4 + 1
                                 senao
                                     Se (v[c]=j1)ou(v[c]=j2)ou(v[c]=j3)ou(v[c]=j4)ou(v[c]=j5)ou(v[c]=j6)ou(v[c]=j7)ou(v[c]=j8) entao
                                        n[c] <-("5")
                                        s5 <- s5 + 1
                                     senao
                                         Se (v[c]=l1)ou(v[c]=l2)ou(v[c]=l3)ou(v[c]=l4)ou(v[c]=l5)ou(v[c]=l6)ou(v[c]=l7)ou(v[c]=l8) entao
                                            n[c] <-("6")
                                            s6 <- s6 + 1
                                         senao
                                             Se (v[c]=m1)ou(v[c]=m2)ou(v[c]=m3)ou(v[c]=m4)ou(v[c]=m5)ou(v[c]=m6)ou(v[c]=m7)ou(v[c]=m8) entao
                                                n[c] <-("7")
                                                s7 <- s7 + 1
                                             senao
                                                 Se (v[c]=n1)ou(v[c]=n2)ou(v[c]=n3)ou(v[c]=n4)ou(v[c]=n5)ou(v[c]=n6)ou(v[c]=n7)ou(v[c]=n8) entao
                                                    n[c] <-("8")
                                                    s8 <- s8 + 1
                                                 FimSe
                                             FimSe
                                         FimSe
                                     FimSe
                                 FimSe
                             FimSe
                         FimSe
                     FimSe
                 FimSe
             FimSe
         FimSe
     FimSe
  FimPara
 FimPara
   LimpaTela
   Escreval ("                           .A = ", sA)
   Escreval ("                           .B = ", sB)
   Escreval ("                           .C = ", sC)
   Escreval ("                           .D = ", sD)
   Escreval ("")
   Escreval ("                           .1 = ", s1)
   Escreval ("                           .2 = ", s2)
   Escreval ("                           .3 = ", s3)
   Escreval ("                           .4 = ", s4)
   Escreval ("")
   Escreval ("                           .5 = ", s5)
   Escreval ("                           .6 = ", s6)
   Escreval ("                           .7 = ", s7)
   Escreval ("                           .8 = ", s8)
   EscrevaL ("")
   Escreval ("                       CONCURSO :",(m[j] - 1))
   EscrevaL ("")
   Escreval ("                    ",n[1],n[2],n[3],n[4],n[5],n[6],n[7],n[8],n[9],n[10],n[11],n[12],n[13],n[14],n[15],n[16],n[17],n[18],n[19],n[20])
   EscrevaL ("")
   Escreva  ("                   QUER CONTINUAR? [S/N] : ")
   Leia (resp)
Ate(resp = "N")
   Escreval ("")
   Escreval ("")
   Escreval ("")
fimalgoritmo

algoritmo "semnome"
arquivo "concurso1.txt"
var
resp: caractere
senha, login: inteiro
v: vetor [1..20] de inteiro
m: vetor [0..3] de inteiro
n: vetor [1..20] de caractere
c, i,j, sA,sB,sC,sD,s1,s2,s3,s4,s5,s6,s7,s8: inteiro
a1,a2,a3,a4,a5,a6,a7,a8,a9: inteiro
b1,b2,b3,b4,b5,b6,b7,b8,b9: inteiro
c1,c2,c3,c4,c5,c6,c7,c8,c9: inteiro
d1,d2,d3,d4,d5,d6,d7,d8,d9: inteiro
f1,f2,f3,f4,f5,f6,f7,f8: inteiro
g1,g2,g3,g4,g5,g6,g7,g8: inteiro
h1,h2,h3,h4,h5,h6,h7,h8: inteiro
i1,i2,i3,i4,i5,i6,i7,i8: inteiro
j1,j2,j3,j4,j5,j6,j7,j8: inteiro
l1,l2,l3,l4,l5,l6,l7,l8: inteiro
m1,m2,m3,m4,m5,m6,m7,m8: inteiro
n1,n2,n3,n4,n5,n6,n7,n8: inteiro
procedimento Topo()
inicio
Escreval(" ")
senha <- 1234
Escreva (".                    senha: ")
Leia (login)
Enquanto (login <> senha) faca
         LimpaTela
         Topo()
FimEnquanto
FimProcedimento
inicio
Topo()
LimpaTela
a1 <- 01
a2 <- 14
a3 <- 25
a4 <- 38
a5 <- 49
a6 <- 61
a7 <- 74
a8 <- 85
a9 <- 98

b1 <- 03
b2 <- 16
b3 <- 27
b4 <- 40
b5 <- 52
b6 <- 63
b7 <- 76
b8 <- 87
b9 <- 00

f1 <- 05
f2 <- 18
f3 <- 29
f4 <- 41
f5 <- 54
f6 <- 65
f7 <- 78
f8 <- 98

g1 <- 07
g2 <- 09
g3 <- 20
g4 <- 21
g5 <- 32
g6 <- 34
g7 <- 43
g8 <- 45

h1 <- 12
h2 <- 23
h3 <- 36
h4 <- 47
h5 <- 60
h6 <- 72
h7 <- 83
h8 <- 96

i1 <- 56
i2 <- 58
i3 <- 67
i4 <- 69
i5 <- 80
i6 <- 81
i7 <- 92
i8 <- 94

c1 <- 02
c2 <- 13
c3 <- 26
c4 <- 37
c5 <- 50
c6 <- 62
c7 <- 73
c8 <- 86
c9 <- 97

d1 <- 04
d2 <- 15
d3 <- 28
d4 <- 39
d5 <- 51
d6 <- 64
d7 <- 75
d8 <- 88
d9 <- 99

j1 <- 06
j2 <- 17
j3 <- 30
j4 <- 42
j5 <- 53
j6 <- 66
j7 <- 77
j8 <- 90

l1 <- 08
l2 <- 10
l3 <- 19
l4 <- 22
l5 <- 31
l6 <- 33
l7 <- 44
l8 <- 46

m1 <- 11
m2 <- 24
m3 <- 35
m4 <- 48
m5 <- 59
m6 <- 71
m7 <- 84
m8 <- 95

n1 <- 55
n2 <- 57
n3 <- 68
n4 <- 70
n5 <- 79
n6 <- 82
n7 <- 91
n8 <- 93
i <- 0
sA <- 0
sB <- 0
sC <- 0
sD <- 0
Escreval("")
Escreval("")
Escreva(".                 digite o concurso :")
leia(m[j])
Repita
 Para i <- 0 ate 2 faca
      LimpaTela
      Escreval("                 --------------------------------------------")
      Escreval("                         Digite os Números do Sorteio")
      Escreval("")
      Escreva("concurso: ",m[j])
      m[j] <- m[j] + 1
      Escreval("")
      Escreval("")
  Para c <- 1 ate 20 faca
     Escreva("Digite o ",c , "° : ")
     Leia (v[c])
     Se (v[c]=a1)ou(v[c]=a2)ou(v[c]=a3)ou(v[c]=a4)ou(v[c]=a5)ou(v[c]=a6)ou(v[c]=a7)ou(v[c]=a8)ou(v[c]=a9) entao
        n[c] <- ("A")
        sA <- sA + 1
     senao
         Se (v[c]=b1)ou(v[c]=b2)ou(v[c]=b3)ou(v[c]=b4)ou(v[c]=b5)ou(v[c]=b6)ou(v[c]=b7)ou(v[c]=b8)ou(v[c]=b9) entao
            n[c] <- ("B")
            sB <- sB + 1
         senao
             Se (v[c]=c1)ou(v[c]=c2)ou(v[c]=c3)ou(v[c]=c4)ou(v[c]=c5)ou(v[c]=c6)ou(v[c]=c7)ou(v[c]=c8)ou(v[c]=c9) entao
                n[c] <-("C")
                sC <- sC + 1
             senao
                 Se (v[c]=d1)ou(v[c]=d2)ou(v[c]=d3)ou(v[c]=d4)ou(v[c]=d5)ou(v[c]=d6)ou(v[c]=d7)ou(v[c]=d8)ou(v[c]=d9) entao
                    n[c] <-("D")
                    sD <- sD + 1
                 senao
                     Se (v[c]=f1)ou(v[c]=f2)ou(v[c]=f3)ou(v[c]=f4)ou(v[c]=f5)ou(v[c]=f6)ou(v[c]=f7)ou(v[c]=f8) entao
                        n[c] <-("1")
                        s1 <- s1 + 1
                     senao
                         Se (v[c]=g1)ou(v[c]=g2)ou(v[c]=g3)ou(v[c]=g4)ou(v[c]=g5)ou(v[c]=g6)ou(v[c]=g7)ou(v[c]=g8) entao
                            n[c] <-("2")
                            s2 <- s2 + 1
                         senao
                             Se (v[c]=h1)ou(v[c]=h2)ou(v[c]=h3)ou(v[c]=h4)ou(v[c]=h5)ou(v[c]=h6)ou(v[c]=h7)ou(v[c]=h8) entao
                                n[c] <-("3")
                                s3 <- s3 + 1
                             senao
                                 Se (v[c]=i1)ou(v[c]=i2)ou(v[c]=i3)ou(v[c]=i4)ou(v[c]=i5)ou(v[c]=i6)ou(v[c]=i7)ou(v[c]=i8) entao
                                    n[c] <-("4")
                                    s4 <- s4 + 1
                                 senao
                                     Se (v[c]=j1)ou(v[c]=j2)ou(v[c]=j3)ou(v[c]=j4)ou(v[c]=j5)ou(v[c]=j6)ou(v[c]=j7)ou(v[c]=j8) entao
                                        n[c] <-("5")
                                        s5 <- s5 + 1
                                     senao
                                         Se (v[c]=l1)ou(v[c]=l2)ou(v[c]=l3)ou(v[c]=l4)ou(v[c]=l5)ou(v[c]=l6)ou(v[c]=l7)ou(v[c]=l8) entao
                                            n[c] <-("6")
                                            s6 <- s6 + 1
                                         senao
                                             Se (v[c]=m1)ou(v[c]=m2)ou(v[c]=m3)ou(v[c]=m4)ou(v[c]=m5)ou(v[c]=m6)ou(v[c]=m7)ou(v[c]=m8) entao
                                                n[c] <-("7")
                                                s7 <- s7 + 1
                                             senao
                                                 Se (v[c]=n1)ou(v[c]=n2)ou(v[c]=n3)ou(v[c]=n4)ou(v[c]=n5)ou(v[c]=n6)ou(v[c]=n7)ou(v[c]=n8) entao
                                                    n[c] <-("8")
                                                    s8 <- s8 + 1
                                                 FimSe
                                             FimSe
                                         FimSe
                                     FimSe
                                 FimSe
                             FimSe
                         FimSe
                     FimSe
                 FimSe
             FimSe
         FimSe
     FimSe
  FimPara
 FimPara
   LimpaTela
   Escreval ("                           .A = ", sA)
   Escreval ("                           .B = ", sB)
   Escreval ("                           .C = ", sC)
   Escreval ("                           .D = ", sD)
   Escreval ("")
   Escreval ("                           .1 = ", s1)
   Escreval ("                           .2 = ", s2)
   Escreval ("                           .3 = ", s3)
   Escreval ("                           .4 = ", s4)
   Escreval ("")
   Escreval ("                           .5 = ", s5)
   Escreval ("                           .6 = ", s6)
   Escreval ("                           .7 = ", s7)
   Escreval ("                           .8 = ", s8)
   EscrevaL ("")
   Escreval ("                CONCURSO :",(m[j] - 3), " AO CONCURSO :",(m[j]- 1))
   EscrevaL ("")
   Escreval ("                      ",n[1],n[2],n[3],n[4],n[5],n[6],n[7],n[8],n[9],n[10],n[11],n[12],n[13],n[14],n[15],n[16],n[17],n[18],n[19],n[20])
   EscrevaL ("")
   Escreva  ("                    QUER CONTINUAR? [S/N] : ")
   Leia (resp)
Ate(resp = "N")
   Escreval ("")
   Escreval ("")
   Escreval ("")
fimalgoritmo

O Programador · April 27, 2017

SEGUE O VIDEO DO ESQUEMA, DESCULPA A QUALIDADE POIS GRAVEI COM MEU CELULAR MESMO POIS EU TINHA PROMETIDO FAZER O VIDEO ENTÃO FIZ ASSIM. DEPOIS COM MAIS TEMPO FAÇO COM MAIS QUALIDADE E GRAVADO DIRETO DA TELA. VALEU

O Programador · April 27, 2017

ESSAS SÃO AS COMBINAÇÕES POSSIVEIS NESSE ESQUEMA TIRAMOS OS PILARES SÓ AS COMBINAÇÕES FEITAS COM OS NUMEROS.

CADA NUMERO TEM 8 DEZENAS AI FICA 8X4=32 DEZENAS MAIS 2 PILARES EU INDICO FAZER COM MAIS 1 NUMERO DE COMBINAÇÃO. DEPOIS FAZ O DESDOBRAMENTO SIMPLES USANDO O COLOGA.

1234

1235

1236

1237

1238

1245

1246

1247

1248

1256

1257

1258

1267

1268

1278

1345

1346

1347

1348

1356

1357

1358

1367

1368

1378

1456

1457

1458

1467

1468

1478

1567

1568

1578

1678

2345

2346

2347

2348

2356

2357

2358

2367

2368

2378

2456

2457

2458

2467

2468

2478

2567

2568

2578

2678

3456

3457

3458

3467

3468

3478

3567

3568

3578

3678

4567

4568

4578

4678

5678

O Programador · April 27, 2017

valeu entendi o recado

DrWeb	Adware.InstallCore.53	20170426
Zillya	Worm.VBNA.Win32.264033	20170426

Sign In

OLÁ, OLHE O MEU PADRÃO!

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest Pitaco_certo!

Link to comment

Share on other sites

Guest Pitaco_certo!

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest Pitaco_certo!

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Guest Pitaco_certo!

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest Zangado

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members