ADAPTA?ÃO DE CÓDIGO - SERVI?O PAGO

JAKSONLZ 09/01/2017 09:21:23
#470489
Pessoal, tenho um código que encontrei na Internet e preciso de alguém para adaptar ele pra mim, pois tentei de várias formas e não obtive o mesmo desempenho, se alguém se Interessar, o código é pra calcular a Cobertura de uma Roda de Loteria, PAGO pela adaptação desde que os resultados sejam realmente de agrado e satisfatório, blza contato : jaja.zilio@hotmail.com


Obs: Uso VB6
JAKSONLZ 09/01/2017 09:56:39
#470493
Cara me desculpa, é que fui editar o Tópico e acabou mudando sozinho para VB.net, mais não é, eu quero adaptar para VB6 mesmo.
JABA 09/01/2017 12:51:47
#470500
Que tipo de adaptação seria?
JAKSONLZ 09/01/2017 13:11:26
#470502
Tenho um código que verifica a cobertura de umas combinações de jogos de Loterias, mais ele foi feito apenas para a Loteria dos Estados Unidos, que é de 49/6, e o código da a garantia apenas para 3 se acertar 6, eu gostaria de mudar para aceitar todos os tipos de Loteria, ele é muito rápido, confere 163 bilhetes de um jogo 49/6 em 0,053 milésimos de segundos, então é mais ou menos isso, já desenvolvi boa parte do código e tenho várias explicações detalhadas, com outros exemplos, qualquer coisa entre em contato pelo meu email que passo mais informações....
KERPLUNK 09/01/2017 22:46:18
#470539
Publique o código, talvez possamos ajudar sem nem cobrar...
JAKSONLZ 10/01/2017 08:26:07
#470546
Postei 2 arquivos, o código que eu preciso adaptar está escrito [ô]Internet[ô] no fim, o outro é o meu, eu descobri onde está o problema no meu código, está calculando mais está com um problema que estou tentando resolver, eu sei onde está o problema......o problema está no preenchimento do Array [ô]VxB[ô], eu preciso preencher este Array com dados de outro Array... eis a questão aqui===>>>O Segundo Array é maior do que o Primeiro, preciso quebra-lo primeiro para ambos ficarem do mesmo tamanho, daí então combina-los....vou dar um exemplo:

6 números combinados de 3x3 é igual a 20 combinações certo: =Comb(6;3)=20combinações
o arquivo [ô]49-06-03-06.txt[ô] possui um total de 163 bilhetes de 6 numeros, ou seja, Combinando =Comb(6;3)= 20combinações * 163 = 3.260 Triplos
estes 3.260 Triplos devem ser preenchidos no Array [ô]VxB[ô], mais com uma condição, o Array [ô]VxB[ô] deve permanecer como [ô]Redim VxB(V,B) As Boolean[ô] , não pode ser alterado o tamanho pois o calculo final consiste em conferir se todos os Triplos de =Comb(49;3)=18.424combinações estão presentes no Array [ô]VxB[ô], percorrendo os 163 bilhetes, que no caso estão salvos no Array [ô]VxB[ô], ciclos=18.424 * 163= totalizando 3.003.112 ciclos





JABA 10/01/2017 20:20:10
#470587
Citação:

o calculo final consiste em conferir se todos os Triplos de =Comb(49;3)=18.424 combinações estão presentes no Array [ô]VxB[ô], percorrendo os 163 bilhetes, que no caso estão salvos no Array [ô]VxB[ô], ciclos=18.424 * 163= totalizando 3.003.112 ciclos


Sinceramente, ainda não entendi. O pouco que entendi foi o seguinte:

Você tem um arquivo com 163 linhas, cada uma apresentando uma sequência de 6 números, dos quais quer gerar uma combinação de 3 números para cada. Por exemplo, se na linha 1 tiver os números 01 02 03 04 05 06 então teríamos 20 sequências de 3 números, que poderia ser 01 02 03, 01 03 04, 01 05 06, etc.

Você quer gerar um único array contendo todas as combinações de todas as linhas ou quer gerar arrays para cada combinação, ou seja, um array para cada 20 sequências de 3 números?

O que você quer dizer com [Ô]conferir se todos os Triplos de =Comb(49;3)=18.424 combinações estão presentes no Array[Ô]?

Estou mais preocupado em entender o problema, o que você precisa, a finalidade do sistema, para depois tentar buscar uma solução. Tente nos explicar de uma maneira mais prática, sem envolver códigos.

OBS: Quando eu me refiro a gerar as combinações, estou me referindo a gerar as sequências de fato, como por exemplo, inserir em cada linha do array as sequencias 01 03 04, 01 05 06, etc.
NICKOSOFT 11/01/2017 07:10:48
#470598
é por isso q nao vivo de programar, se eu nao entender muito bem, me apropriar do assunto, ou no desenvolver eu achar q nao ta legal, eu aviso o solicitante e a gente deixa pra la.....

So pela questao de querer atender a todas as nossas loterias ja vejo algo fora da realidade, nao se tem qq padrso em nenhuma loteria nossa, fora o bilhete, se eu quiser jogar os 60 numeros num volante da mega sena eu posso.....outra loteria ja tem menos numeros a escoher e mais numeros a jogar, o criterio pra ganhar é outro.....mas sei la, vai q nem isso entendi
JAKSONLZ 11/01/2017 08:50:15
#470600
[txt-color=#0000f0]Você tem um arquivo com 163 linhas, cada uma apresentando uma sequência de 6 números, dos quais quer gerar uma combinação de 3 números para cada. Por exemplo, se na linha 1 tiver os números 01 02 03 04 05 06 então teríamos 20 sequências de 3 números, que poderia ser 01 02 03, 01 03 04, 01 05 06, etc.
Você quer gerar um único array contendo todas as combinações de todas as linhas ou quer gerar arrays para cada combinação, ou seja, um array para cada 20 sequências de 3 números?[/txt-color]


[txt-color=#e80000]* Isso mesmo quero gerar todos os Triplos dos 6 números das 163 combinações em 3x3 e preencher um ÚNICO Array...[/txt-color]

[txt-color=#0000f0]O que você quer dizer com [Ô]conferir se todos os Triplos de =Comb(49;3)=18.424 combinações estão presentes no Array[Ô]?
[/txt-color]
* Nesta parte talvez não me expressei direito, num outro Array que já vai estar criado, terão todas as combinações de =Comb(49;3)=18.424 combinações, então o próximo passo é confrontar TODAS as combinações criadas neste Array com as do segundo Array e ver quais não estão presentes no primeiro, está será a cobertura esperada...se você baixar o arquivo que postei, verás que no código que eu encontrei no Link abaixo, faz isso que estou te falando, só que ele tem Tamanho fixo de 6 números, e eu quero adaptar para outras Garantias de outros Tamanhos intendeu...mais sem perder a velocidade, mais pra isso precisava saber também se o código abaixo pode ser adaptado para outras Garantias, pois to falando aqui só o que eu li sobre o assunto, agora precisava converter este código aí pra ver se funciona com outros tipos de Garantias...vou postar a discussão pra ver se alguém intende oque estou tentando falar...

https://groups.google.com/forum/#!msg/rec.gambling.lottery/QdebsUcCZwI/ckTkizpouFMJ
http://www.colinfairbrother.com/LottoAnalysisByYield.aspx


*Obs: Desculpa as cores mais não consegui por como [ô]citação[ô] as suas perguntas...então ficou de azul mesmo
JABA 11/01/2017 14:18:15
#470605
Então só para ficar claro. Um array terá todas as combinações possíveis, um outro terá as combinações geradas a partir de um arquivo texto, que no caso, são 20 para cada linha de 6 números. A saída será um terceiro array contendo todas as combinações, com exceção das combinações geradas pelo arquivo texto. E o sistema deve permitir isso para qualquer tamanho de sequência, como por exemplo, gerar combinações para linhas com mais de 6 números, é isso?
JAKSONLZ 11/01/2017 15:02:40
#470608
Amigo praticamente é isso só não entendi esta parte : [txt-color=#e80000]A saída será um terceiro array contendo todas as combinações, com exceção das combinações geradas pelo arquivo texto.[/txt-color] na verdade a saída é a comparação entre os dois Arrays, tipo assim vou confrontar [ô]01 02 03[ô] do Array que contem todas as combinações com o Array que tem as combinações do arquivo txt, e conferir os acertos de cada combinação...

Exemplo : 1ª Combinação
combinação = 01 02 03 04 05 06 (do arquivo txt)
saída: total 20 combinações cada combinação de 06 números. Se temos 163 bilhetes de 06 números, então temos a seguinte formula :
163 * (KcT) = 163 * 20 = 3.260 combinações
onde K é igual ao Tamanho e T é a garantia

Combinações (KcT) da 1ª combinação:
01 02 03
01 02 04
01 02 05
01 02 06
01 03 04
01 03 05
01 03 06
01 04 05
01 04 06
01 05 06
02 03 04
02 03 05
02 03 06
02 04 05
02 04 06
02 05 06
03 04 05
03 04 06
03 05 06
04 05 06

na sequencia gerar todas as combinações de 49/3=18.424
só não vou expor aqui porque é muito grande mais vai lá um exemplo
1ª combinação (de todas as combinações) = 01 02 03
2ª combinação (de todas as combinações) = 01 02 04
3ª combinação (de todas as combinações) = 01 02 05
e assim por diante até a última...
...última combinação (de todas as combinações) = 47 48 49

Aqui agente confronta as combinações (do arquivo txt) com todas as 18.424 e verifica quantos pontos cada combinação acertou, salvando no TERCEIRO Array...
se ficar dúvidas me mande seu email que te passo mais informações..blza
Página 1 de 3 [22 registro(s)]
Faça seu login para responder