Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
2048+ the Game - 2048 aggiunte

2048+ the Game

Sommario | Admin | Forum | Bugs | Todo | Files

Pagine: [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 ] Precedente | Prossimo
Avatar
Carlo (Member)
Guru


Messaggi: 1316
Iscritto: 29/01/2018

Segnala al moderatore
Postato alle 18:30
Lunedì, 16/04/2018
Complimenti Ultimo, programma complesso, ho capito poco di come opera.
Però ho implementato le frecce da tastiera, una piccola cosa, ma utile per un uso più agevole.


Carlo ha allegato un file: 2048_the_game.zip (247909 bytes)
Clicca qui per scaricare il file

Ultima modifica effettuata da Carlo il 16/04/2018 alle 23:29


in programmazione tutto è permesso
PM Quote
Avatar
Ultimo (Member)
Guru


Messaggi: 877
Iscritto: 22/05/2010

Segnala al moderatore
Postato alle 1:44
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Carlo:

Complimenti Ultimo, programma complesso, ho capito poco di come opera.
Però ho implementato le frecce da tastiera, una piccola cosa, ma utile per un uso più agevole.



Grazie Carlo, avevo provato anche io ad inserire le frecce da tastiera ma non ero riuscito ad implementarlo,
funziona bene ed è più comodo da usare, ho notato però che adesso non mi permette di scrivere nella textbox
del nome giocatore, come rimediare?
Prima di inserire una nuova versione aspetto di risolvere questo problema, se ti interessa il progetto puoi
chiedere di partecipare direttamente, si aggiunge il tuo nome nei Developers.


If ok Then GOTO Avanza else GOTO Inizia

PM Quote
Avatar
Carlo (Member)
Guru


Messaggi: 1316
Iscritto: 29/01/2018

Segnala al moderatore
Postato alle 11:03
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Ultimo:
Grazie Carlo, avevo provato anche io ad inserire le frecce da tastiera ma non ero riuscito ad implementarlo,
funziona bene ed è più comodo da usare, ho notato però che adesso non mi permette di scrivere nella textbox
del nome giocatore, come rimediare?
Prima di inserire una nuova versione aspetto di risolvere questo problema, se ti interessa il progetto puoi
chiedere di partecipare direttamente, si aggiunge il tuo nome nei Developers.  



Codice sorgente - presumibilmente VB.NET

  1. Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
  2.  
  3.         ' intercetto le frecce
  4.         Select Case keyData
  5.             Case Keys.Down
  6.                 But_Down_Click(But_Down, New System.EventArgs())
  7.             Case Keys.Up
  8.                 But_UP_Click(But_UP, New System.EventArgs())
  9.             Case Keys.Left
  10.                 But_L_Click(But_L, New System.EventArgs())
  11.             Case Keys.Right
  12.                 But_R_Click(But_R, New System.EventArgs())
  13.  
  14.                 ' Non avevo notato la Text, questo è un rimedio grossolano
  15.  
  16.             Case Keys.Delete ' Svuota la Text
  17.                 TextBox_Nome.Text = ""
  18.             Case Keys.Back ' Cancella un carattere sulla text
  19.                 If TextBox_Nome.Text.Length > 0 Then
  20.                     TextBox_Nome.Text = TextBox_Nome.Text.Substring(0, TextBox_Nome.Text.Length - 1)
  21.                 End If
  22.             Case Else ' Scrive le maiuscole sulla text
  23.                 If keyData > 64 And keyData < 91 Then
  24.                     TextBox_Nome.Text += keyData.ToString
  25.                 End If
  26.         End Select
  27.  
  28.         ' come alternativa per ora mi viene in mente:
  29.         ' Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short ' legge la pressione di più tasti simultanei (lega il programma a windows)
  30.         ' poi in un ciclo timer attivato solo quando vuoi leggere le frecce (utile anche per lo scorrere del tempo)
  31.         ' If GetAsyncKeyState(Keys.Left) Then
  32.         '       But_L_Click(But_L, New System.EventArgs())
  33.         ' End If
  34.         ' ecc ecc per le altre frecce
  35.  
  36.         Return True
  37.  
  38.     End Function


Ultima modifica effettuata da Carlo il 17/04/2018 alle 11:07


in programmazione tutto è permesso
PM Quote
Avatar
Ultimo (Member)
Guru


Messaggi: 877
Iscritto: 22/05/2010

Segnala al moderatore
Postato alle 12:08
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Carlo:

Testo quotato

Postato originariamente da Ultimo:
Grazie Carlo, avevo provato anche io ad inserire le frecce da tastiera ma non ero riuscito ad implementarlo,
funziona bene ed è più comodo da usare, ho notato però che adesso non mi permette di scrivere nella textbox
del nome giocatore, come rimediare?
Prima di inserire una nuova versione aspetto di risolvere questo problema, se ti interessa il progetto puoi
chiedere di partecipare direttamente, si aggiunge il tuo nome nei Developers.  



Codice sorgente - presumibilmente VB.NET

  1. Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
  2.  
  3.         ' intercetto le frecce
  4.         Select Case keyData
  5.             Case Keys.Down
  6.                 But_Down_Click(But_Down, New System.EventArgs())
  7.             Case Keys.Up
  8.                 But_UP_Click(But_UP, New System.EventArgs())
  9.             Case Keys.Left
  10.                 But_L_Click(But_L, New System.EventArgs())
  11.             Case Keys.Right
  12.                 But_R_Click(But_R, New System.EventArgs())
  13.  
  14.                 ' Non avevo notato la Text, questo è un rimedio grossolano
  15.  
  16.             Case Keys.Delete ' Svuota la Text
  17.                 TextBox_Nome.Text = ""
  18.             Case Keys.Back ' Cancella un carattere sulla text
  19.                 If TextBox_Nome.Text.Length > 0 Then
  20.                     TextBox_Nome.Text = TextBox_Nome.Text.Substring(0, TextBox_Nome.Text.Length - 1)
  21.                 End If
  22.             Case Else ' Scrive le maiuscole sulla text
  23.                 If keyData > 64 And keyData < 91 Then
  24.                     TextBox_Nome.Text += keyData.ToString
  25.                 End If
  26.         End Select
  27.  
  28.         ' come alternativa per ora mi viene in mente:
  29.         ' Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short ' legge la pressione di più tasti simultanei (lega il programma a windows)
  30.         ' poi in un ciclo timer attivato solo quando vuoi leggere le frecce (utile anche per lo scorrere del tempo)
  31.         ' If GetAsyncKeyState(Keys.Left) Then
  32.         '       But_L_Click(But_L, New System.EventArgs())
  33.         ' End If
  34.         ' ecc ecc per le altre frecce
  35.  
  36.         Return True
  37.  
  38.     End Function





Ho risolto con un altra soluzione, se si clicca la text esce un form per inserire il nome.
Inserisco la nuova versione con i comandi da tastiera, grazie.


If ok Then GOTO Avanza else GOTO Inizia

PM Quote
Avatar
Carlo (Member)
Guru


Messaggi: 1316
Iscritto: 29/01/2018

Segnala al moderatore
Postato alle 13:46
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Ultimo:
Ho risolto con un altra soluzione, se si clicca la text esce un form per inserire il nome.
Inserisco la nuova versione con i comandi da tastiera, grazie.  


Perfetto!!!:k:
Il segnatempo?

Ultima modifica effettuata da Carlo il 17/04/2018 alle 13:54


in programmazione tutto è permesso
PM Quote
Avatar
Ultimo (Member)
Guru


Messaggi: 877
Iscritto: 22/05/2010

Segnala al moderatore
Postato alle 14:51
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Carlo:

Testo quotato

Postato originariamente da Ultimo:
Ho risolto con un altra soluzione, se si clicca la text esce un form per inserire il nome.
Inserisco la nuova versione con i comandi da tastiera, grazie.  


Perfetto!!!:k:
Il segnatempo?



Si può anche inserire il tempo volendo


If ok Then GOTO Avanza else GOTO Inizia

PM Quote
Avatar
Carlo (Member)
Guru


Messaggi: 1316
Iscritto: 29/01/2018

Segnala al moderatore
Postato alle 20:05
Martedì, 17/04/2018
Semplice segnatempo e qualche allineamento grafico.

:asd::asd::asd: per gioco un tasto: [Fai meglio di me?] :asd::asd::asd:


Carlo ha allegato un file: 2048 the game v.3.0.1.zip (337945 bytes)
Clicca qui per scaricare il file


in programmazione tutto è permesso
PM Quote
Avatar
Ultimo (Member)
Guru


Messaggi: 877
Iscritto: 22/05/2010

Segnala al moderatore
Postato alle 22:25
Martedì, 17/04/2018
Testo quotato

Postato originariamente da Carlo:

Semplice segnatempo e qualche allineamento grafico.

:asd::asd::asd: per gioco un tasto: [Fai meglio di me?] :asd::asd::asd:



Simpatica la versione automatica, inserirò una nuova versione con queste modifiche :k:


If ok Then GOTO Avanza else GOTO Inizia

PM Quote
Avatar
Carlo (Member)
Guru


Messaggi: 1316
Iscritto: 29/01/2018

Segnala al moderatore
Postato alle 21:52
Mercoledì, 18/04/2018
Superare il 512 non è facile ma si può!
Non conoscevo questo gioco.
Il tasto: [Fai meglio di me?] fa comodo per far fare le mosse fino al 256-512, poi proseguire a mano.
Ho una nuova release che in automatico arriva quasi sempre a 512.


Carlo ha allegato un file: 1024.jpg (114405 bytes)
Clicca qui per guardare l'immagine

Ultima modifica effettuata da Carlo il 18/04/2018 alle 21:55


in programmazione tutto è permesso
PM Quote
Pagine: [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 ] Precedente | Prossimo