teh jimpie

@Robin: > Is it a fresh install of win7? Do you get any errors before it freezes? > > Go into MSConfig and turn off any superfluous processes from the startup list. no, its windows vista. and no, im not getting any errors. what do you mean by "MSConfig", i mean, where is it located?

hey I have noticed that my control + alt + delete is crashed on my computer, I cant go to "processes', close it or anything like that (check the picture - I dont have any tabs etc.) any ideas how to fix this? >! [](http://img9.imageshack.us/i/naamloosex.jpg/) thanks in advanced

@Robin: > You need to make an invisible menu by pressing CTRL + E in vb6. thanks, that helped me alot. "popup menu must have at least one submenu" ``` PopupMenu mnuHello ```

i've tried some things out, but it keep getting errors ``` Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton Then PopupMenu mnuHELLO End If End Sub `````` Sub mnuHELLO() Call MsgBox("hello, this is a test.") End Sub ``` when you press on "HELLO" it should popup a msgbox with "hello, this is a test." the error: ``` PopupMenu mnuHELLO ``` expected function or variable

@[Cake: > Vitin â„¢ link=topic=64749.msg693591#msg693591 date=1284838751] > you mean remove the admin and disconnect options? remove/make/edit and make it on my own, i want to use this also for something else but i dont know how to make this when you click on a list

how do i make something like this? > kick, make admin, ban [](http://img97.imageshack.us/i/naamloosdr.png/)

@ramoneknot: > I am saying this bacause EO is new yet and have alot of bugs Eclipse Stable does have alot bugs too

hm sorry, I didnt explain well with "on a frame" I ment just drawing a picture on something (e.g. a picturebox or on a form) >! [](http://img231.imageshack.us/I/naamloosut.jpg/) When I'll do this with a picturebox the grassland will be blue around the character

I want to draw a picture on my frame, I'll do it with DD7, but how? (Because I want the background transparant) Can somebody just give me an example of a random code to draw a picture on a frame? Then I'll copy it and try things out with untill I get it work. thanks

hello is it normal that in eclipse stable its not showing scripted items on you character if you equip them? ``` Case 1 If GetPlayerWeaponSlot(Index) 0 Then Call SetPlayerweaponSlot(Index, 0) Call PlayerMsg(Index, "UNEQUIPED", talkcolour) Call SendWornEquipment(Index) Else Call SetPlayerWeaponSlot(Index, 1) Call PlayerMsg(Index, "EQUIPED", talkcolour) call SendWornEquipMent(Index) End If Exit Sub ``` because when I use this its not showing ;/

froggy jump, doodle jump, 4in a row, seabattle, fingerball, scooter Xl, jellycar,linerider, GPSphone (only for jailbroken ipod)@SoiWilliamSoi: > I hope you use Installious. ye it rocks :P however I have the last time only "host unreachable" errors :/

ok, pmed you all ~~ so for the others - I have a job, thanks :)

@F0x: > Examples? Because im sure someone looking for a skilled worker will settle for 3 lines of text . . . Updated the topic is this enough? XD

hey I want to help someone with a game, please post here or PM me. Please make sure your game is already online because I hate it when people asking me to help and I cant help. So I can help mapping / scripting (I prefer scripting). A map: >! [](http://img685.imageshack.us/i/naamloosfv.jpg/) Scripts: Probably everything

it errors at this line: > Sub AcceptConnection(Socket As JBSOCKETSERVERLib.ISocket) > Dim Index As Long > > Index = FindOpenPlayerSlot > > If Index > 0 Then > Socket.UserData = Index > Set GameServer.Sockets.Item(CStr(Index)).Socket = Socket > Call SocketConnected(Index) > Socket.RequestRead > Else > Socket.Close > End If > End Sub "User-defined type not defined" help please?

hmm okay, thanks!

hey when I change ``` Public Const MAX_ITEMS As Byte = 255 ```to ``` Public Const MAX_ITEMS As Byte = 500 ```I'll get an error, why?

is there any information about how far its done and how long it takes left? I can't wait :P

Pikachu + Pokemon = Pokechu Pidgey + Ratata = Ratgey okay enough xD

@Ballie: > Move is a VB6 keyword, for one. You'll likely not be able to use it. > > Since it's a subscript out of range, I venture to say your Move() array isn't dimmed high enough. sorry, late reaction, but what do you mean by that? I've changed all "Move" to "PMove". also, I've found this: ' The order of the packets must match with the client's packet enumeration what does it exactly mean? Do I need to order the packets? Must I order everything the same in modEnumerations?

@Robin: > Install vb6 sp6 and re-download the source. ok, but why do I have the error at once? edit ~ mm lol I think my pc is ducked up, it works on a new source, I'll restart building

hello I have a problem when I start my orgins source server side.. it says in the log ``` Line 26: Class TabDlg.SSTab of control SSTab1 was not a loaded control class. ``` what must I do with it?

> Private Sub HandleUpdateMove(ByVal Index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) > Dim n As Long > Dim Buffer As clsBuffer > Dim MoveSize As Long > Dim MoveData() As Byte > Set Buffer = New clsBuffer > Buffer.WriteBytes Data() > n = Buffer.ReadLong > ' Update the move > MoveSize = LenB(Move(n)) > ReDim MoveData(MoveSize - 1) > MoveData = Buffer.ReadBytes(MoveSize) > CopyMemory ByVal VarPtr(Move(n)), ByVal VarPtr(MoveData(0)), MoveSize > Set Buffer = Nothing > > End Sub

There you go http://www.youtube.com/watch?v=YruGPY4XSlQ

Hi When I add the following packets: > HandleDataSub(SMoveEditor) = GetAddress(AddressOf HandleMoveEditor) > HandleDataSub(SUpdateMove) = GetAddress(AddressOf HandleUpdateMove) and compile, I'll get a subscript out of range error while logging in on the game. >! ``` Private Sub HandleUpdateMove(ByVal Index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long) Dim n As Long Dim Buffer As clsBuffer Dim MoveSize As Long Dim MoveData() As Byte Set Buffer = New clsBuffer Buffer.WriteBytes Data() n = Buffer.ReadLong ' Update the move MoveSize = LenB(Move(n)) ReDim MoveData(MoveSize - 1) MoveData = Buffer.ReadBytes(MoveSize) CopyMemory ByVal VarPtr(Move(n)), ByVal VarPtr(MoveData(0)), MoveSize Set Buffer = Nothing >! End Sub `````` Private Sub HandleMoveEditor() Dim I As Long >! With frmEditor_Move 'Editor = EDITOR_MOVE .lstIndex.Clear >! ' Add the names For I = 1 To MAX_MOVES .lstIndex.AddItem I & ": " & Trim$(Move(I).Name) Next >! .Show .lstIndex.ListIndex = 0 ItemEditorInit End With >! End Sub ``` can anybody help?