Gaming League Project (Help Wanted)

[Q_Me]

"The Ruins of Terra" (Rebels' Revenge Phase 2.0)

(c)2002 TrueProgramming

Thanx to peet, I can now put my gaming league all together.
But I need some help with it. Lets just say we're working on a digital puzzel with 20,000 pieces.

Max Users in League = 256 'Hex ID's = UserID.XFF
Max Units in League = 32 'Hex ID's = UnitID.X1F
Max Members Per Unit = 16
Max Battles in League = 4096 'Hex ID's =BattleID.FF (Cycles When Full; I do this by hand)

First of All is the Main Menu

Diagram Layout:

::frmMain::
>frmLogin as Interupt Login
>Menus Buttons
>>My Unit
>>Report/Confirm Battles
>>Scores & Stats
>>Trials
>>My Stats

::frmLogin::
>Callsign
>Password
>Unit (Combo)

::frmMyUnit::
>Unit Name
>(Scratch Unit Rank, frmScores will handle that.)
>Members
>Leader
>Admins
>::Ranks::
>>10=Leader
>>9=2ndCommand
>>1=Recruit

::frmReportConfirmBattles::
>::REPORTING:: (If msgbox("Did you Win?") = vbNo)
>>::League Battle Type:: (Combo)
>>>Normal
>>>Trial
>>>WAR
>>::Battle Type:: (Combo)
>>>Capture The Flag
>>>Team Attrition
>>>Team Destruction
>>>Team King of the Hill
>>::Visibility:: (Combo)
>>>Clear
>>>Light Fog
>>>Heavy Fog
>>>Pea Soup Fog
>>:ay/Night:: (Combo?)
>>>Day
>>>Night
>>"Won With Mercs?" (Check Box)
><>If Yes Then Mercs.Enabled:
><>>Winning Mercs Team (Combo) As Merc Type Teams
><>>Winning Mercs Players (List Box.Multiselect) As Mercs.Memebrs
><>>Winning Mercs Kills/Score (Text Box.Numbers Only) As MercsBattleScore
>>Winning Team (Combo) As Any Team
>>Winning Team Players (List Box.Multiselect) As Winner.Members
>>Winning Team Kills/Score (Text Box) As WinBattleScore
>>Losing Team (Combo) As Reporter's Team '(Loser Reports)
>>Losing Team Players (List Box.MultiSelect) As Loser.Members
>>Losing Team Kills/Score (Text Box) As LoseBattleScore
>::CONFIRMING::
>Confirmer's Form = Reporter's Form But Winning Team = Confirmer's Team & Losing Team = Combo Select.
><>Prevents Cheating (Somewhat)
>::PREVIEWER::
>>Multilined Text Box
><>Adds Evething Up Like an INI file, into a text box.
>::COMPARE SEQUENCE::
>>If Confirmer Form.Preview <> Download(UplaodedReportedFile) Then BattleID.Filename = "XBattle." & Hex(BattleID) 'Downloading & Uploading is not a problem for me; act like the file is on the Hard Drive.

::frmScoresStats::
>For i = 0 to LobbyFile.EndUnit** 'LobbyFile Shows The Next Value for each SomethingID so that it will not rewright over one another.
>Open i File
>Put on List Box (Sorted)
>UnitStat$ = ReadLine & ReadLine & ReadLine & ...
>UnitStat$ Output = Score &Tab& Name &Tab& UnitType &...
>Next i

::frmTrials::
>(Special Stats) Like Scores/Stats
>Gives Members Experience Ranking.
>This Part I have to do on my own coding.

::frmMyStats::
>Callsign
>Score
>Unit
>Life Kills
>Exp
>Battles
>Wins
>Win%
><Debug>Password

[Q_Me]

File Size Limits:

600 Kb Max per file.

We can have several ID files instead of one INI type file.

Example

::NOTE::
The .###, .X##, or .XX# are the ID's in hex value. The "X" is a place holder.

Lobby.XXF 'This will be the master file. 600 Kb max.
UserID.XFF 'This will be its own INI file. Handles Users' Profile.
UnitID.X1F 'This will be its own INI file. Handles Units' Profile.
BattleID.FFF 'This will be its own INI file. Handles Battle Profiles

::Lobby.XX#::

EndUserID = i%
EndBattleID = i%
EndUnitID = i%

[Q_Me]

Someone Please Help.

[sql_lall]

Do you have any form that you can post, because just looking at the code below, it is very hard to understand.

[Q_Me]

(Updated)