AJUDA COM FURA FURA GAME
Bom pessoal
To desenvolvendo um joguinho de FUraFura, onde, vc irá escolher com o teclado o furo da tabela e se lah tibver um premio escondido vc ganha o memso
a bas eem si ja esta pronta
mais me atrapalho ainda em muita coisa
então, quem tiver interessado em colaborar comigo, pois pretendo deixar esse game openSource e pelo que vi, ser'ao unico da net nesse ramo livre, pois eu so conheço mais um que é vendido a 2500.00 por uma empresa
quem tiver entressse
ficaria grato com a ajuda, logico, será sem fins lucrativo
para ajudra a comunidade com fonte aberto
meu msn: ghpnet@ig.com.br
abraços
To desenvolvendo um joguinho de FUraFura, onde, vc irá escolher com o teclado o furo da tabela e se lah tibver um premio escondido vc ganha o memso
a bas eem si ja esta pronta
mais me atrapalho ainda em muita coisa
então, quem tiver interessado em colaborar comigo, pois pretendo deixar esse game openSource e pelo que vi, ser'ao unico da net nesse ramo livre, pois eu so conheço mais um que é vendido a 2500.00 por uma empresa
quem tiver entressse
ficaria grato com a ajuda, logico, será sem fins lucrativo
para ajudra a comunidade com fonte aberto
meu msn: ghpnet@ig.com.br
abraços
Onde você se atrapalha?
cara
na localização dos furos, pois to fazendo com que uma seta passe por cima de onde deve ser furado e por baixo tem um desenho, que no caso é o furo, se a seta tiver em cima e vc dar o p por exemplo
ele irá furar aquele furo
e outrta
to usando ini para ver quais os furos disponiveis
mais ta complicado
ta em anexo o meu sistema
quempuder me ajudar!
na localização dos furos, pois to fazendo com que uma seta passe por cima de onde deve ser furado e por baixo tem um desenho, que no caso é o furo, se a seta tiver em cima e vc dar o p por exemplo
ele irá furar aquele furo
e outrta
to usando ini para ver quais os furos disponiveis
mais ta complicado
ta em anexo o meu sistema
quempuder me ajudar!
bom pessoal
depois de muita dor de cabeça e matematica
cheguei a seguinte função
Private Function mostra()
Dim i
For i = 1 To 34
If Image1.Top - 5 = P(i).Top And Image1.Left = P(i).Left Then
MsgBox [Ô]achei o furo[Ô] & i
End If
Next i
End Function
e ela funcionou
conta certinho os furos
logica simples e facil de entender ;)
ainda procuro ajuda, pois to apanhando no .ini rsrsrs
depois de muita dor de cabeça e matematica
cheguei a seguinte função
Private Function mostra()
Dim i
For i = 1 To 34
If Image1.Top - 5 = P(i).Top And Image1.Left = P(i).Left Then
MsgBox [Ô]achei o furo[Ô] & i
End If
Next i
End Function
e ela funcionou
conta certinho os furos
logica simples e facil de entender ;)
ainda procuro ajuda, pois to apanhando no .ini rsrsrs
Tópico encerrado , respostas não são mais permitidas