[Addon] TRAX!! RELEASE [Trax Release]

[danidomen]

Yes Nillus, your English is perfect ;) (my english is worse than your english)

I'm waiting for a future update by grongere...

[grongere]

Yes Nillus, your English is perfect ;) (my english is worse than your english)

I'm waiting for a future update by grongere...

My English is verry bad :P sorry
Ooh sorry I update not the week back Sunday :( bugs
I hope that i cane update up 16 june
Leethotel server:

- Trax 100 % ( all songs )
- Diving 100 %
- Recycler 100 % ( New Update: Mode, Candy , Deals and all it other stuff... :P)
- 128 Public rooms
- 80 Bots
- Habbo Times
Close Message: 1:15:00
Close: 1:30:00
Open: 6:30:00
( you cane change this times )
- Infobus 100 % + drink + walk
- :status ( Informatie from the server )
- You cane create Max. 6 Milion Stuff's
- You cane create Max. 40000 Habbo's
- Max. Online: 400 ( I do me best )
- Bus Questions Start from a room then shout / say you: :infobus open
- Bus Status ( click up the doors from the bus )
- Add Public rooms to your favourite 50 %
- Swimming 100 %
- Change your Clothes 100 %



I come back! :) Questions? PM Me

[Nillus]

In the meantime, can you help us with the Trax code?
Just open your source and search for 'trax', I bet you've forgot something.

Waves'
Nillus

[LetMeHaveAName]

Yeah if you could help us out with the Trax code that would be great :)

Also, your server sounds like it will be good with those features, most working at 100% ^_^

[HHDragov]

I have made a code for trax:
Next workt:

- Save trax
- Play Trax Songs
- Delete Trax Songs
- More Then 1 Song in your Hotel

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

'Made by grongere
'Begin Trax

Case "CZ" 'Trax Opslaan
Dim VoucherC As String
VoucherC = (Mid(NewInfo, 5, 10000))
FSO.OpenTextFile(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt", ForWriting).Write VoucherC
trax = FSO.OpenTextFile(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt", ForReading).ReadAll
Send Index, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPK QKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & trax & "H" & Chr(1)
trax = FSO.OpenTextFile(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt", ForReading).ReadAll
sendAll "Dl" & trax & "H" & Chr(1), (Client(Index).InRoom)
Case "C]" 'Muziek Draaien
trax = FSO.OpenTextFile(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt", ForReading).ReadAll
Send Index, "Dl" & trax & "H" & Chr(1)
Case "CY" 'Muziek List open in de editor
If FSO.FileExists(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt") = False Then
FSO.CreateTextFile DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt"
End If
trax = FSO.OpenTextFile(DBP & "privaterooms\" & Client(Index).InRoom & "\trax.txt", ForReading).ReadAll
Send Index, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPK QKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & trax & Chr(1)"
'Eind Trax
'Made by grongere

------------------------------------------------------------------------------------------------------
Copy this text and Add it to your frmMain.frm by Case
and trax workt...

- grongere

I'm Italian... but It's Cool

[Danny15]

Jep grongore you got the skills :)

Grongore je hebt er verstand van hoor :D

[super1kid]

Cant save...

[azzimi]

hmm

[Lilt407]

Can sumone please jus release a server with trax people like me get confused lol

[php]

SomeTimes! but,, Nice GRon Very nice 100ste Post!!! :PDDD

[USA11]

Ik snap dr geen bal haar van :P

[Nillus]

Ik snap dr geen bal haar van :P

Lol, you're name, and this code doesn't work.
If you want a server with Trax working, download Mark's. =)
And next time use English, I know we all like the Dutch language, but this is an English forum.

Waves'
Nillus

[gefliptemens]

Dutch Rules! Belgi

[super1kid]

Lol ok.. lets dont go offtopic.. the trax code have error because the 2 bottons makes the same thing... to delete

[-RubberDuckie-]

Thanks very Much

- Takes


Regards,

-RubberDuckie-