Source attached!
On -----
Lenght: -----
Size: -----
Download link :
Down.... just the source by now... please, don't re-upload that file or something like that.
Printable View
Source attached!
On -----
Lenght: -----
Size: -----
Download link :
Down.... just the source by now... please, don't re-upload that file or something like that.
how we dl that?
Open the link, then click free, wait the couter ends, and start the download, the attachement u just need to download normally... lol
Lol it's like watching porn for nerds.
But i loved it!
By all means, do not remove the music, it gives it that something special.
The guide is great and clear and foremost,the source is attached, what more would one need.
thanks, and... this launcher isn't perfect, this is just a simple launcher with register webpage, news webpage, options, and play button... :burn:
btw, if u need more buttons, just add him, and add the code to the button, for example, reset page:
do button with caption = Reset Page, 2 clicks on the button, and add the code
browser.navigate "http://www.server.com/reset.php"
:smilie3:
can you show me where can i get vb6 (microsoft visaul basic 6.0) ?
i can't find it in google
plz help
cool!
good job i like it
Watch porn?Quote:
Originally Posted by Sntnl
lol
try emule, i don't know, i get mine with my friend ^^
very nice :P
very nice i will use this for my server^_^
how can i contact wolf in msn?
Try jao_dos_jogo@hotmail.comQuote:
Originally Posted by graywolf
[]'s
hmmm can you give me the module of Mswinsck.ocx
so i dont need this file...
i just lost it somewhere :) have no time to search
edit1:
10x for starting this little code of launcher.. im going to do with this code some good launcher with Update button that will search for updates in the client and it will download them :)
oh and i have made cool design ill put some screens latter ;)
Can u include the required ocx files for people without vb6 but with visual studio.net
U can take here http://www.forum.ragezone.com/attach...8&d=1122343058
mswinsck.ocx
Here one launcher i have made:
http://img53.imageshack.us/img53/6208/launcher15wd.jpg
http://img53.imageshack.us/img53/9707/launcher26aj.jpg
http://img53.imageshack.us/img53/6418/launcher39mw.jpg
Damn...i got VB5.0...its not working :crazy: :mad_2:
Cant launch those winsock..tried almost 15 mswsck.ocx....
Well...ill search for VB6.0 then...hope that will help...
Anyway...Damn Nice Tut ^^:thumbup:
i didnt ask for this file (read my message again), i asked for the module of mswinsck.... if ill include this module of mswinsck in to the app i dont need this file anymoreQuote:
Originally Posted by navossoc
Hello There! pla instruct me how to make an MU plz
Im interested to make one, plz im beggin u plz help me
Plz Help me make one plz i dont know how to make so i need guides, coz i dont understand the posts guide
plz help me
DeeJay13, man the movie is good... if you still didnt understand here... i think it will be more easy for you if you take the Launcher Builder of "SkyTeam"
http://lorencia.com/index.php?topic=169.0
and make one for yourself.
http://www.forum.ragezone.com/showthread.php?t=79852
In case you guys doesn't concerned about hacks... then... ignore my link above.
this is cool, gotta redownload it tho :>
Yes ive done it ^^
But Question =
I dont want to make register field in the launcher
I want it to open in a new browser to reg page.
Is it possible ?
yeah, just need to create a new button then do 2 clicks to open code window, then type...Quote:
Originally Posted by kokotminut
browser.navigate "http://yourserver.servegame.com/registerpage.php"
or
shell "iexplore http://yourserver.servegame.com/registerpage.php"
ok?
U have checked my link ? i don't are stupidQuote:
Originally Posted by mr_es24
[]'s
Don't use Iexplore... that's f**king annoying to ppl who use other browsers (with good reasons).
Always use the shell command or, if you must use something else, make it START "http://url"
Solution is released from www.lorencia.com by BlurCode,.
Ive just reedited 1 line for it working
Code:Private Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA"( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) _
As Long
Private Sub YourButton_Click(Index As Integer)
Dim r As Long
r = ShellExecute(0, "open", "http://www.youradress.com", 0, 0, 1)
End Sub
Last question ^^
Any way to integrate the Windowed Mode ?
Yep, for sure - ask Blur or Alexteam on lorencia.com - they have the windowsmode stuff all nutted out :)Quote:
Originally Posted by kokotminut
I found it ^^
Easy in fact
create another check box in options
name it chk_winmode
double click on it and see this line
Then look for lines and add (only lines you dont have ^^)Code:Private Sub chk_winmode_Click()
End Sub
Code:Public Sub LoadOptions()
Dim resolution As Long
txt_login.Text = GetSettingString(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ID")
chk_sound(0).Value = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "SoundOnOff")
chk_sound(1).Value = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "MusicOnOff")
chk_winmode.Value = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "WindowMode")
resolution = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution")
Select Case resolution
Case "0"
chk_resolution(0).Value = True
Case "1"
chk_resolution(1).Value = True
Case "2"
chk_resolution(2).Value = True
Case "3"
chk_resolution(3).Value = True
End Select
End Sub
And you're done, you've got your WinMode 100% fonctionnal ^^Code:Public Sub SetOptions()
SaveSettingString HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ID", Trim(txt_login.Text)
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "SoundOnOff", chk_sound(0).Value
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "MusicOnOff", chk_sound(1).Value
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "WindowMode", chk_winmode.Value
If chk_resolution(0).Value Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "0"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(1).Value Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "1"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(2).Value Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "2"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(3).Value Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "3"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "1"
End If
End Sub
Oh righto, that's for the versions of Mu with windowsmode support already built-in, I wasn't sure which ver you were using :)
yes i did, and in the .rar there only Mswinsck.ocxQuote:
Originally Posted by navossoc
Anyway, Thanks a lot kamus2004 ^^
Now ive got a damn real personnal launcher, thats so great ^^
I love you guys :)
wats so lol about watching porn???:eh: :eh: :eh:Quote:
Originally Posted by invisable
Quote:
Originally Posted by kokotminut
it will work without hook.dll ?
this "guide"(if it's) seems fine :)
haven't tried it yet but i will :)
Yes, fully working without hook.dll !!!Quote:
Originally Posted by mr_es24
Tested on 0.99B+ and 1.1F
hmmm ok, and tell me you forgot to put the code
in
chk_winmode_Click ? or there are no code here ? only in SetOptions
edit1: but this window mode will be without the function
f12 (window)
f11 (hide/show)
?
In chk_winmode_CLick () =>nothing more to addQuote:
Originally Posted by mr_es24
and yes its without f11/f12, the window will start with exactly the resolution checked in the options
Well some lines are very strange, like:
Why not ?Code:Select Case resolution
Case "0"
chk_resolution(0).Value = True
Case "1"
chk_resolution(1).Value = True
Case "2"
chk_resolution(2).Value = True
Case "3"
chk_resolution(3).Value = True
End Select
Here to:Code:chk_resolution(resolution).Value = True
Code:If chk_resolution(0).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "0"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(1).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "1"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(2).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "2"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(3).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "3"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "1"
End If
Code:For i = 0 To 3
If chk_resolution(i).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", i
End If
Next
sorry for this damn code guys, i'm not a pro, just an student... xD, i just think that help someone, ^^ then i'll post 1 user control which i found over net ( Win xp buttons )
... i make it running to start my new launcher ( my server )
maybe, then i will add some ss's here...
someone can post ALL content of options a get error at this
Public Sub LoadOptions()
Dim resolution As Long
txt_login.Text = GetSettingString
IN YELOW Public Sub LoadOptions()
and in blue GetSettingString error is somthing like not exist post plz
check the project, it need registry.bas...
explain further detalis i'm not a COOL haker i'm only lerner:chair: :chair: :chair: :chair: :chair: :chair: :cry: :cry: :prop: :wallbash: :wallbash: :newbie: :helpsmili :pain: :death_2:
In the tutorial, at one moment, he import the registry.bas...just watch it carefully :)Quote:
Originally Posted by psihomatka
you mean when he add som file with name REGISTRY? i to have add it but he take it form some folder a take it from installed forder SORRY FOR MY ENGLISH
can smeone post registry PLZ:wallbash: :wallbash:
the registry.bas is in the source files...Quote:
Originally Posted by psihomatka
and my error?
Your error is = You NEED to load the registry.bas in your VB....
i have posted a picture and there is folder modules in pres on + you will se file with name REGISTRY .........
How to use it execelly /= /=
If you want build your own Launcher Easily and quickly, download LauncherFacil, from my website www.wansoft.somee.com
I dont understand nothing how to use this files:(
Great release, I made my own launcher!!!Quote:
Originally Posted by kamus2004
no have permission download
I need help making a MX Launcher. For versions 1.1 in Mu. Can some help me, by maybe giving me the Source code for Visual Basic C++ and the Project file as well. Please?
Nicee Server Duuudes!
Does it works with 1.02D?
if yes.. what did i do wrong?
i just start the exe and i can't select a server.
pls help.
greetz
MaSch
Does it works for 1.02?
Becaus when i use it and try to connect, it don't show any servers :-(
So there is this window where i usualy select out of 20servers (you know???) and there is nothing. Only the background ^^.
Why?
I looked in the MuError.log and wonder O.o the ip and port are given right.
pls help :-(
greetz
MaSch
-------------
Sry for my bad english
Wow Great
Great! Now how do I add option for Window Mode?
i already don't understand how to make launcher from this source :D
can you pls help me for this?
i have downloaded this launcher here in ragezone but unfortunately, its for MU launcher...
can this laucher work for ran online? pls help! how to change those code...? who knows, anyone sirs?
anyone who have good heart by helping me here? thnx a million in advance!
this is the VB code "frmMain" of the launcher:
this is the VB code" frmOptions" of the launcher:Quote:
Dim server_ip As String
Dim server_port As Long
Dim connect_port As Long
Private Sub buttons_Click(Index As Integer)
On Error GoTo Hell
Select Case Index
Case "0"
Shell App.Path & "\main.exe connect /u" & server_ip & " /p44405", vbNormalFocus
Case "1"
browser.Navigate "http://www.ragezone.com/" 'here is your register page
Case "2"
frmOptions.Show 1
Case "3"
End
End Select
Hell:
If Err.Number = "53" Then
MsgBox "File not found.", vbCritical, "Error"
End If
End Sub
Private Sub Form_Load()
'set options
server_ip = "darkteam.servegame.com"
server_port = "55901"
connect_port = "44405"
'do initial commands
ws.Connect server_ip, server_port
browser.Navigate "http://www.ragezone.com" 'here is your news page
End Sub
Private Sub tmr_Timer()
Select Case ws.State
Case "9"
StatusBar1.Panels(2).Text = "Error / Offline?"
ws.Close
ws.Connect server_ip, server_port
Case "7"
StatusBar1.Panels(2).Text = "Online"
tmr.Enabled = False
ws.Close
Case Else
StatusBar1.Panels(2).Text = "?"
ws.Close
ws.Connect server_ip, server_port
End Select
End Sub
take a look at this screenies...Quote:
Public Sub LoadOptions()
Dim resolution As Long
txt_login.Text = GetSettingString(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ID")
chk_sound(0).Value = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "MusicOnOff")
chk_sound(1).Value = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "SoundOnOff")
resolution = GetSettingLong(HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution")
Select Case resolution
Case "0"
chk_resolution(0).Value = True
Case "1"
chk_resolution(1).Value = True
Case "2"
chk_resolution(2).Value = True
Case "3"
chk_resolution(3).Value = True
End Select
End Sub
Public Sub SetOptions()
SaveSettingString HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ID", Trim(txt_login.Text)
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "MusicOnOff", chk_sound(0).Value
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "SoundOnOff", chk_sound(1).Value
If chk_resolution(0).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "0"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(1).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "1"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(2).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "2"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "0"
ElseIf chk_resolution(3).Value = True Then
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "Resolution", "3"
SaveSettingLong HKEY_CURRENT_USER, "Software\Webzen\Mu\Config", "ResolutionA", "1"
End If
End Sub
Private Sub chk_sound_Click(Index As Integer)
End Sub
Private Sub cmd_control_Click(Index As Integer)
If Index = "0" Then
SetOptions
Unload Me
Else
Unload Me
End If
End Sub
Private Sub Form_Load()
LoadOptions
End Sub
Error in VStudio 2005 pro edition =\=\
Cant u just not be like lazy and show us on Rz with screenies
3 years ago :\