[Addon] TRAX!! RELEASE [Trax Release]

[grongere]

You cane see it up:

~ Leet Hotel ~ - Versie 14

Works:

- Lido II
- 126 Public rooms
- 70/80 Bots
- Lido II queue titels
- Lido II diving + swim
- Trax 100 %
- Full NL catalogue
- Console
- Recycler 80 % (Only Mode cane you Recycle)
- And more

Come you to leethotel?
And we have a own Infobus :)


~ Hamachi info ~

Link : ~ Leet Hotel ~ - Versie 14
Network name: leethotel
password: test

[Danny15]

Can't you get a full description with where you need to place it?
-------- ENG/NL
Kan je geen Descriptie geven van waar je het moet plaatsen??

In dutch is even better :)

[Danny15]

grongore your loader of test is not working...

[mirkan]

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, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPKQKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & 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, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPKQKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & trax & Chr(1)"
'Eind Trax
'Made by grongere

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

- grongere

What to write in traxt.txt..?

[Danny15]

Is it Hamachi??

[Nero]

The Network is full >.<

[grongere]

yes Hamachi

[casjebasje]

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, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPKQKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & 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, "DmPAPAIKQBSDPEQERESEPFQFRFSFJQAQBQIRISIPJQJRJSJPKQKKIQBIJKPAQARASAPBQBPARAQBRKSKPLQLRLSLPMQMRMDl" & 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 dont understand, i'm dutch xD
Please help me add msn or pm me xD
I don't knwo were i can find
frmMain.frm.

My MSN= RadioMC@live.nl

[grongere]

See now :) I delete People :P

[leah-ya-me]

yeah me too..
finally.

[X-Treme*GT]

Hamachi Network still full :(

[grongere]

Owh Sorry network is full :D
Join witch me new network:

~ Hamachi info: ~
Network name: leethotel1
Network Pass: test
Link: ~ Leet Hotel ~ - Versie 14

[Danny15]

lol its full -.-

[Stroved]

Yeah where is frmMain.frm is.. Also, i have Debbo Project, is that USA111's source?

[Jolly]

Loader not work :)

LeetHotel.com is closed...