Speed Tetris

[StarBootics]

Hello everyone,

A small Tetris game that I have created without using any sprite or game libs.



There is two Mode to play, the "Sprint Mode" is the best time to reach 500 points. The "Endurance Mode" the best time to reach 1500 points. The source code can be downloaded here :

https://www.dropbox.com/s/x4mmgabj1ydu9 ... m.zip?dl=0

Edit #1 : Online Score system added
Edit #2 : Function to enter a user name for the online high score added
Edit #3 : Bug correction, Score tables now have all information (Completed lines and points) Special notes : The offline score file need to be deleted because of the corrected bug

Best regards
StarBootics

[RSBasic]

Very nice game, thank you. Can you create an online highscore list? E.g. with: https://www.purebasic.fr/german/viewtop ... =8&t=12857

[StarBootics]

Very nice game, thank you. Can you create an online highscore list? E.g. with: https://www.purebasic.fr/german/viewtop ... =8&t=12857

It's a good idea but I don't have any knowledge of php programming. So adapting the given example will take a while so maybe for version 2.0.0.

Best regards
StarBootics

[StarBootics]

Very nice game, thank you. Can you create an online highscore list? E.g. with: https://www.purebasic.fr/german/viewtop ... =8&t=12857

I have played around with the given example and I think I will be able to come up with something sooner than I previously thought. That being said, should I simply throw away the offline score tables and have only online score tables ? Your advice will be appreciated.

Best regards
StarBootics

[RSBasic]

Very nice game, thank you. Can you create an online highscore list? E.g. with: https://www.purebasic.fr/german/viewtop ... =8&t=12857

I have played around with the given example and I think I will be able to come up with something sooner than I previously thought. That being said, should I simply throw away the offline score tables and have only online score tables ? Your advice will be appreciated.s

The online high score is better for me. Offline highscore is not needed afterwards.
Thank you in advance.

[BarryG]

How do you rotate the shapes? I see the RotateShape() procedure but no keys that call it?

[RSBasic]

With A key.

[BarryG]

Thanks!

[StarBootics]

With A key.

For moving blocks :

"A" key rotate left
"D" key rotate right
"Left" move left
"Right" move right
"Down" move down

The corresponding code :

Code: Select all

      AddKeyboardShortcut(*This\MainWin\GetHandle(), #PB_Shortcut_A, #ShortCut_Rotate_Left)
      AddKeyboardShortcut(*This\MainWin\GetHandle(), #PB_Shortcut_D, #ShortCut_Rotate_Right)
      AddKeyboardShortcut(*This\MainWin\GetHandle(), #PB_Shortcut_Left, #ShortCut_Move_Left)
      AddKeyboardShortcut(*This\MainWin\GetHandle(), #PB_Shortcut_Right, #ShortCut_Move_Right)
      AddKeyboardShortcut(*This\MainWin\GetHandle(), #PB_Shortcut_Down , #ShortCut_Move_Down)

By the way I will add the online scoring system today along with the offline scoring system. The way I see this the user will have to set the high score system he want to use just once.

Best regards
StarBootics

[StarBootics]

Hello everyone,

I have uploaded a new version that include an online score system. See the first post for the source code download link.

Best regards
StarBootics

[RSBasic]

Thank you very mich.

Can you add a function to enter a user name for the online highscore?

[StarBootics]

Thank you very mich.

Can you add a function to enter a user name for the online highscore?

Done !

Best regards
StarBootics

[RSBasic]

Thank you, but the project doesn't compile.

Code: Select all

ToolBoxFile "BuiltPathDirectory - Module.pb", "ColorEffex - Module.pb", "CounterGadget - Module.pb"
ToolBoxFile "FormatMilliSeconds - Module.pb", "StringBetween - Module.pb", "DownloadToString - Module.pb"
ToolBoxFile "Language System - OOP.pb", "Window - OOP.pb", "Chrono - OOP.pb"

What is ToolBoxFile?

[StarBootics]

Thank you, but the project doesn't compile.

Code: Select all

ToolBoxFile "BuiltPathDirectory - Module.pb", "ColorEffex - Module.pb", "CounterGadget - Module.pb"
ToolBoxFile "FormatMilliSeconds - Module.pb", "StringBetween - Module.pb", "DownloadToString - Module.pb"
ToolBoxFile "Language System - OOP.pb", "Window - OOP.pb", "Chrono - OOP.pb"

What is ToolBoxFile?

Sorry my bad. I have make change and upload the source code again.

About ToolBoxFile look here : viewtopic.php?f=14&t=49190

Best regards
StarBootics

[RSBasic]

Thank you, now works.
But if I lost the game, how can I sign up for the online highscore?