|
dammytosh
|
Hello guys, i built some couple of board games way back then with VB 6.0. i plan 2 upload them in this thread. i will upload just 3 games out of all the board games i wrote. 1. Tower Of Hanoi Game 2. Ludo. 3. Draught Board Game. All the games were purely written in VB 6.0. If time permits, i will explain the simple principles of building board games in VB 6.0 on this thread and probably upload some of the source codes. Take a look at the Tower Of Hanoi Game First . ooopssss ! nairaland does not allow .exe or .zip file upload  ok try this link http://tripleosolutionsltd.net/Downloads/TowerOfHanoi.zip
|
|
|
|
|
|
*dhtml
|
Interesting - i was thinkin u hav dumped vb 6.0 into the recycle bin and emptied it - it is finally time to learn from your paradigms! How about i donate a subdomain on my site - and create something like www.games.mwebng.net and give u upload access?
|
|
|
|
|
|
dammytosh
|
Interesting - i was thinkin u hav dumped vb 6.0 into the recycle bin and emptied it - it is finally time to learn from your paradigms!
i just dug into my archive lately. those codes av been written since. At least i av not opened VB 6.0 development environment in the last 3 years. How about i donate a subdomain on my site - and create something like www.games.mwebng.net and give u upload access? Thanks i will gladly upload the three games there, but i am working on a temporal link 2 be uploaded later 2day.
|
|
|
|
|
|
*dhtml
|
I too hav dumped vb 6 since - even before .NET i later switched to vc 6.0 Processing www.games.mwebng.net in the meantime, open a chat with me to get the upload link or send me an email thru the contact page of my site www.mwebng.net
|
|
|
|
|
|
|
|
Kobojunkie
|
Your Tower of Hanoi is an exe. Looking to see the code instead. By the way, where is the link to the Ludo game code?
|
|
|
|
|
|
*dhtml
|
No problems then - i will check out the stuff - though i have already created the space
|
|
|
|
|
|
dammytosh
|
I av uploaded the executable of my Ludo Game Here, i hope it works without any problem cos to build a setup 4 the stuff is tiring. [url]http://tripleosolutionsltd.net/Downloads/LudoGame.zip.[/url] I am trying to clean up the codes 2 some extent but work is very tiring here. but i can answer any question based on the implementation here. the game was written in VB 6.0 and i rely on the manipulations of control arrays, a feature in VB 6.0 i am missing in VB 8 & 9 although there are smarter ways out sha.
|
|
|
|
|
|
|
|
dammytosh
|
How To Play The Game :
1. Note d seed colours u are controlling. 2. Press CTRL+G to bring up d game settings. 3. Customize Player 1 nd player 2 names, select seed speed nd dice roll speed nd press OK. 4. Roll the dice nd note the colours of the seeds u are controlling. 5. Click on a die face nd click d seed u want 2 use dt value on (make sure it is d seed color your roll can control). 6. To use the sum of the 2 dice, click on the Number button and the seed u want 2 use it on. (it will take the seed in d sum of the 2 dice value steps.) i hope that helps.
As 4 d source code, i am not in a haste 2 do dt. It might be after d game as been appreciated nd seen working fine. But d tower of hanoi source code has been posted sha.
|
|
|
|
|
|
dammytosh
|
@Quotes From @Kobo from another thread Ok… Here are questions for you @DammyTosh
a) How did you store your values ? b) How do you keep track of the position of the disks for each move?
(a) I had four different arrays (arrays 1 to 4 ) for each of the set of seeds (i.e blue, red,green and yellow seeds) Dim rdtops(1 To 4) As Integer 'default pos -------------- this array stores the red top values at the initial state (Default) Dim rdlefts(1 To 4) As Integer 'default pos -------------- this array stores the red left value at the initial state (Default) Note: In VB 6.0 a control's location can be known if we know the Top and Left Value. (b) Dim rdpos(1 To 4) As Integer ----------------------this array stores the red position after the final count I simply repeated that array declaration for the 3 other different seed colors. I hope that helps ,
|
|
|
|
|
|
Kobojunkie
|
a) Could you elaborate on how you keep track of position of each tile on the screen.
b) Can you please explain the Algorithm you use in this game?
|
|
|
|
|
|
dammytosh
|
a) Could you elaborate on how you keep track of position of each tile on the screen.
b) Can you please explain the Algorithm you use in this game?
Sorry for the late reply : This is the trick. I placed an invisible control on every spot where the seeds can move on. And all these seeds av an index, so if a RedSeed will move to Indexed seed 30 then the new position of the seed will be set to 30 This is what i did. I av 4 Global Arrays Dim redpos(1 To 4) As Integer Dim bluepos(1 To 4) As Integer Dim greenpos(1 To 4) As Integer Dim yellowpos(1 To 4) As Integer when i move d seed to a new position, i will store the new position of that seed in the corresponding array. e.g if i move RedSeed 2 to a new position 30 (i.e the indexed seed 30), i will at that moment set RedPos(2) = 30. As for the algorithm, it is the simple LUDO Algorithm, i did not design any when i was working on the game. all i did was to implement the code at the point of need. (Remember that i was just fiddling with control arrays in VB 6 when i designed that stuff) i hope that helps
|
|
|
|
|
|