[rel] Battleball codes [rel]

[levi-porter]

these are not finished obviously but this is how far i have got check the codes out if you wish
Battleball
If Client(Index).Publicnum = 9 Then
Dim AmFolders As Integer
Open DBP & "battleball\gamecount.txt" For Input As #1
Input #1, AmFolders
Close #1
arenaname = FSO.OpenTextFile(DBP & "battleball\arenaname.txt", ForReading).ReadAll
Minimum = FSO.OpenTextFile(DBP & "battleball\minimum.txt", ForReading).ReadAll
Maximum = FSO.OpenTextFile(DBP & "battleball\maximum.txt", ForReading).ReadAll
pagecount = FSO.OpenTextFile(DBP & "battleball\pagecount.txt", ForReading).ReadAll
gamecount = FSO.OpenTextFile(DBP & "battleball\gamecount.txt", ForReading).ReadAll
For X = 1 To AmFolders
GameName = FSO.OpenTextFile(DBP & "battleball\" & X & "\gamename.txt", ForReading).ReadAll
gameowner = FSO.OpenTextFile(DBP & "battleball\" & X & "\gameowner.txt", ForReading).ReadAll
GameNumber = FSO.OpenTextFile(DBP & "battleball\" & X & "\gamenumber.txt", ForReading).ReadAll
GameData = GameData & GameName & "" & VL64encode(GameNumber) & gameowner & ""
Send Index, "CgH" & arenaname & "" & VL64encode(Minimum) & VL64encode(Maximum) & Chr(1)
Send Index, "Ch" & VL64encode(gamecount) & VL64encode(pagecount) & GameData & ""
Next X
End If
Created Game
CiHHTesting?RVAmobarbitalHJHH
-----------------------------------------
Auto Join Red Team
CiHHTesting?RVAmobarbitalHJIRVAmobarbitalH
-----------------------------------------
Join Blue Team
CiHHTesting?RVAmobarbitalHJHIRVAmobarbital
-----------------------------------------
View Who's Playing ( Already Started Game )
CiIH IdfkPAKNotesLittleWoodsIdfkIPeezoIPoliceCarI2
-----------------------------------------
CiHI SI-StukyHJISI-StukyH
CiHI SI-StukyHJISI-StukyIPKAmobarbital

--------------------------------------------

FSO.OpenTextFile(DBP & "habbos\" & LCase(Client(Index).Name) & "\hand.txt", ForAppending).Write ";" & TheCount

kamerFurni = FSO.OpenTextFile(DBP & "habbos\" & Client(Index).Name & "\hand.txt", ForReading).ReadAll
kamerFurni = Replace(kamerFurni & ";" & FurniID, ";;", ";")
FSO.OpenTextFile(DBP & "habbos\" & Client(Index).Name & "\hand.txt", ForWriting).Write kamerFurni
Room codes packetlogged off france

[21:46:08] - Client to Server:
43E260044794D58E12FCAF5F7BFC3C10798EADD9
----------------------------------------------------------
[21:46:08] - Server to Client:
C\HZHAHBattle Ball pour tous !RBPrQS[HAIBattle Ball pour tousHRLZHAbb_lobby_free_0[FtHhh_game_bb,hh_game_bb_room,hh_game_bb_ui,hh_gam esysHIXIAIBattle Ball pour tous 2HRLZHAbb_lobby_free_1XGtHhh_game_bb,hh_game_bb_ room,hh_game_bb_ui,hh_gamesysHIYIAIBattle Ball pour tous 3RBRLZHAbb_lobby_free_2YGtHhh_game_bb,hh_game_bb _room,hh_game_bb_ui,hh_gamesysHIZIAIBattle Ball pour tous 4HRLZHAbb_lobby_free_3ZGtHhh_game_bb,hh_game_bb_ room,hh_game_bb_ui,hh_gamesysHI

----------------------------------------------------------
[21:46:08] - Server to Client:
C\HZHAHBattle Ball pour tous !RBPrQS[HAIBattle Ball pour tousHRLZHAbb_lobby_free_0[FtHhh_game_bb,hh_game_bb_room,hh_game_bb_ui,hh_gam esysHIXIAIBattle Ball pour tous 2HRLZHAbb_lobby_free_1XGtHhh_game_bb,hh_game_bb_ room,hh_game_bb_ui,hh_gamesysHIYIAIBattle Ball pour tous 3RBRLZHAbb_lobby_free_2YGtHhh_game_bb,hh_game_bb _room,hh_game_bb_ui,hh_gamesysHIZIAIBattle Ball pour tous 4HRLZHAbb_lobby_free_3ZGtHhh_game_bb,hh_game_bb_ room,hh_game_bb_ui,hh_gamesysHI

----------------------------------------------------------
[21:46:12] - Client to Server:
8F3360D27F
----------------------------------------------------------
[21:46:12] - Server to Client:
ChHHPBH:)perle50QAI..-BoCaToR-ThE-KiNg-JK .:othm@ne.:QARBwilemssonwilemssonISB viki47PAPCvenez ici [IMG]http://www.*************.com/images/smilies2/wink15.gif[/IMG]-Chtit3-lov3-63-IQCmoi et cece [IMG]http://www.*************.com/images/smilies2/grin53.gif[/IMG]TheKing33IRCwilemssonwilemssonI

----------------------------------------------------------
[21:47:06] - Server to Client:
CkPDfieldTypeHJIIIIQAmaximumSimultaneousPowerups HIPAIIIRBpowerupCreateChanceHIRLIIIPYnumTeamsHJJ IJIPAcoloringForOpponentTimePulsesHISCIIIPYgameLe ngthSecondsHIPmIHHallowedPowerupsIJ1,2,3,4,5,6,7 ,8,9HcleaningTilesTimePulsesHISCIIIPYpowerupCrea teFirstTimePulsesHIHIHIPYsecondsUntilRestartHIRG IHHpowerupTimeToLivePulsesHIPOIQAIPYpowerupCreate IntervalPulsesHIPEIQAIPYstunTimePulsesHIRBIIIPYh ighJumpsTimePulsesHISCIIIPYnameIJHsecondsUntilS tartHISCIHH


enjoy im not french but i was on the hotel randomly lol ;] anyway if anyone could add to this it would be great

[MentaL]

[jetgod]

Pathetic, these have been released so many times, originally by me in fact.

[levi-porter]

actaully i released this on o taku ages ago.... it is codes and packetlogs aswell

[RascaL]

Nice, I'll see what I can come up with D:

Cya,
RascaL

[levi-porter]

no problem there not perfect the first bit is the code the other bit obv french packetlogg of battleball

[Donkjam]

um nice but theyre no use i have had this workion for ages

[levi-porter]

oh thanks could you pm me it would help alot :]

[NGangsta]

Lol, I think everyone that are a little of time in the "retro world" that they already seen this.
But it are crappy coded codes & it's a very very small part of BB.


Ltrz,
Me

[levi-porter]

yeah its not complete i did say that read^^

[RascaL]

Lol, nice, how long would it take to get full?

Cya,
RascaL

[levi-porter]

erm awhile even though im getting help from ths dutch guy that were doing a server on so were going to fixed the bugs in debbo add the v21 stuff and that and then use that to make our own server as it saves time but it wont be a rip off it but untill weve done all the bugs and v21 stuff we aint focussing much on battleball

[KingAmir]

nice

[levi-porter]

thanks i might work on these more so keep looking on here i may update it if i get it further

[Screwface]

How do i put it to my hotel ?

[levi-porter]

you cant this is what you put into visual basic coding the server you cant put it onto a server that is already been made