munro
-
Posts
1797 -
Joined
-
Last visited
Never
Content Type
Profiles
Forums
Calendar
Posts posted by munro
-
-
-
-
Source GUI
in Q & A
well i have ee source and i ve never really done source before so i make my menu in vb6.0 my main menu and i open the client not any different so i delete the main menu gui so its set to basic and still not what i put there what iam i doing wrong? -
-
ok so iam useing ee2.2 i put on paperdoll verything is fine pd is working then i take off custom sprites and ??????? my whole pd messes up instead of a sword its a ring thats on my head??? no i unzip a test version of ee2.2 to see if it was just that file but its the exact same problem what am i doing wrong?
-
-
```
dim addattack
dim adddefence
dim petattack
dim petdefence
dim pethp
dim targetattack
dim targetdefence
dim targethp
dim exp
select case npcnumber
Case 1
owner = FindPlayer(GetVar("pets\pet.ini", "PET" & npcnumber, "owner"))
if npcnumber > 500 then
exit sub
end if
if "" & FindPlayer(GetVar("pets\pet.ini", "PET" & npcnumber, "owner")) = "" then
call ScriptSpawnNpc(mapnpcnum, MapNum, GetNpcX(MapNum, MapNpcNum), GetNpcy(MapNum, MapNpcNum), 0)
exit sub
end if
if isplaying(owner) = "False" or isplaying(owner) = "" then
exit sub
end if
if 0 + GetMapNpcHP(MapNum, mapnpcnum) < 1 then
call ScriptSpawnNpc(mapnpcnum, MapNum, GetNpcX(MapNum, MapNpcNum), GetNpcy(MapNum, MapNpcNum), 0)
call putVar("pets\pet.ini", "PET" & npcnumber, "owner", "")
exit sub
end if
if 0 + GetMapNpcHP(MapNum, mapnpcnum) < 1 then
call ScriptSpawnNpc(mapnpcnum, MapNum, GetNpcX(MapNum, MapNpcNum), GetNpcy(MapNum, MapNpcNum), 0)
call putVar("pets\pet.ini", "PET" & npcnumber, "owner", "")
exit sub
end if
if getplayertarget(owner) > 0 then
if 0 + val(getplayermap(owner)) = 0 + val(getplayermap(getplayertarget(owner))) then
call SetMapNpcTARGET( mapnum, mapnpcnum, getplayertarget(owner))
end if
else
if getplayertargetnpc(owner) <> 0 then
n = 0
if GetNpcX(mapnum, getplayertargetnpc(owner)) < x then
Call NpcMoving(MapNum, MapNpcNum, 2, 1)
Exit Sub
end if
if GetNpcX(mapnum, getplayertargetnpc(owner)) > x then
Call NpcMoving(MapNum, MapNpcNum, 3, 1)
Exit Sub
end if
if GetNpcY(mapnum, getplayertargetnpc(owner)) < Y - 1 then
Call NpcMoving(MapNum, MapNpcNum, 0, 1)
Exit Sub
end if
if GetNpcY(mapnum, getplayertargetnpc(owner)) > Y + 1 then
Call NpcMoving(MapNum, MapNpcNum, 1, 1)
Exit Sub
end if
'attacking the oher npc and recieving damage
addattack = 1 + GetVar("pets\pet.ini", "ITEMS", "hatadd" & npcnumber) + GetVar("pets\pet.ini", "ITEMS", "weaponadd" & npcnumber)
adddefence = 1 + GetVar("pets\pet.ini", "ITEMS", "armoradd" & npcnumber)
petattack = GetNpcStrength(npcnumber) + Int((GetNpcStrength(npcnumber) / 6 - addattack + 1) * Rnd) + addattack
petdefence = GetNpcDefence(npcnumber) + Int((GetNpcDefence(npcnumber) / 6 - adddefence + 1) * Rnd) + adddefence
pethp = Int(GetMapNpcHP( MapNum, mapnpcnum))
targetattack = GetNpcStrength(GetMapNPCnumber( MapNum, getplayertargetnpc(owner))) + Int((GetNpcStrength(GetMapNPCnumber( MapNum, getplayertargetnpc(owner))) / 6 - 1 + 1) * Rnd) + 1
targetdefence = GetNpcDefence(GetMapNPCnumber( MapNum, getplayertargetnpc(owner))) + Int((GetNpcDefence(GetMapNPCnumber( MapNum, getplayertargetnpc(owner))) / 6 - 1 + 1) * Rnd) + 1
targethp = Int(GetMapNpcHP( MapNum, getplayertargetnpc(owner)))
if isplaying(owner) = "false" or isplaying(owner) = "" then
exit sub
end if
if pethp - targetattack + petdefence < 1 then
Call battlemsg(owner, "you're pet has been killed in battle.", 14, 0)
call ScriptSpawnNpc(mapnpcnum, MapNum, GetNpcX(MapNum, MapNpcNum), GetNpcy(MapNum, MapNpcNum), 0)
else
Call battlemsg(owner, "Pet hp " & pethp - targetattack + petdefence & "/" & GetNpcMaxhp(mapnpcnum), 14, 0)
call SetMapNpcHP( MapNum, npcnumber, pethp - targetattack + petdefence)
end if
if targethp - petattack + targetdefence < 1 then
call ScriptSpawnNpc(getplayertargetnpc(owner), MapNum, GetNpcX(MapNum, getplayertargetnpc(owner)), GetNpcy(MapNum, getplayertargetnpc(owner)), 0)
Call battlemsg(owner, "you're pet has killed an enemy.", 14, 1)
else
Call battlemsg(owner, "Npc hp " & targethp - petattack + targetdefence & "/" & GetNpcMaxhp(GetMapNPCnumber(MapNum, getplayertargetnpc(owner))), 14, 1)
call SetMapNpcHP( MapNum, GetMapNPCnumber(MapNum, getplayertargetnpc(owner)), targethp - petattack + targetdefence)
end if
call playermsg(owner, "test",1)
else
If GetPlayerX(owner) < x - 1 Then
Call NpcMoving(MapNum, MapNpcNum, 2, 1)
Exit Sub
End If
If GetPlayerX(owner) - 1 > x Then
Call NpcMoving(MapNum, MapNpcNum, 3, 1)
Exit Sub
End If
If GetPlayery(owner) < y - 1 Then
Call NpcMoving(MapNum, MapNpcNum, 0, 1)
Exit Sub
End If
If GetPlayery(owner) - 1 > y Then
Call NpcMoving(MapNum, MapNpcNum, 1, 1)
Exit Sub
End If
end if
end if
end select
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' This sub runs when any player presses the Delete key
Sub HotScript2(index)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
dim npcnumber
i = 1
do while i <= 25
if 0 + GetMapNPCnumber(getplayermap(index), i) = 0 then
npcnumber = 0 + getvar("pets\pet.ini", "PETS", getplayername(index))
Call putvar("pets\pet.ini", "PET" & npcnumber, "owner", "" & trim(getplayername(index)) )
call ScriptSpawnNpc( i, getplayermap(index), getplayerx(index), getplayery(index), npcnumber)
i = 27
else
i = i + 1
end if
loop
if i = 27 then
call playermsg(index, "You summoned your pet.", 1)
else
call playermsg(index, "You can't summon your pet.", 1)
end if
End Sub
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' This sub runs when players press the End key
Sub HotScript3(index)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' Telling players the game time
'Call playermsg(index, "The time is " & getservertimehour() & ":" & getservertimeminute() & ":" & getservertimesecond() , 14)
' Loads the shop with new stuff
'call reloadshop(1)
Call CustomMenuShow(index, "Pet equipment", "\GUI\CUSTOM\menustone.gif", 1)
Call CustomMenuLabel(index, 1, "Pet equipment", 45, 15, 8, 15, 0, 400, 40)
call CustomMenuPicture(index, 1, "\GUI\CUSTOM\itembg.jpg", 62, 100)
call CustomMenuPicture(index, 2, "\GUI\CUSTOM\itembg.jpg", 62, 137)
call CustomMenuPicture(index, 3, "\GUI\CUSTOM\itembg.jpg", 100, 100)
petnumber = 0 + getvar("pets\pet.ini", "PETS", getplayername(index))
if 0 + getvar("pets\pet.ini", "PET" & petnumber, "hat") <> 0 then
call CustomMenuPicture(index, 4, "\GUI\CUSTOM\pethat" & getvar("pets\pet.ini", "PET" & petnumber, "hat") & ".jpg", 64, 102)
end if
if 0 + getvar("pets\pet.ini", "PET" & petnumber, "armor") <> 0 then
call CustomMenuPicture(index, 5, "\GUI\CUSTOM\petarmor" & getvar("pets\pet.ini", "PET" & petnumber, "armor") & ".jpg", 64, 139)
end if
if 0 + getvar("pets\pet.ini", "PET" & petnumber, "weapon") <> 0 then
call CustomMenuPicture(index, 6, "\GUI\CUSTOM\petweapon" & getvar("pets\pet.ini", "PET" & petnumber, "weapon") & ".jpg", 102, 102)
end if
End Sub
```
where would i put this script i know where hotscript goes but the stuff before that where does it go? -
Shapeshift
in Q & A
well i really really need to get a shapeshift script to work but it wont and yes ive used every single one that i can find and some just dont work and some just wont make the .ini file it needs to so i really need to find out the command to change sprite and change attributes for like 10 mins and then turn back so i can make a shapeshifting class if anyone can i would help them with anything they need on thier game because i am a good scripter but i just suck at timers and sprite change the two things i need -
so ive seen someposts about poeple downloading eclipse3 but ive never heard of it so i download te off the website nothing its the same old version i download ee off the website nothing its just eclipse i searched the forums and cannot find anything on it can someone post a link to the download and is it te or ee?
-
when every i make a scripted spell in ee it doesnt do anything just makes a attacking action but if i use the same script in te it works perfictly whats up does ee have a scripted spell bug?
-
Scroll to bottom for portal
ok so i just set up a custom menu that looks like this
```
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' This sub runs when any player presses the Delete key
Sub HotScript2(index)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Call CustomMenuShow(index, "Menu!", "\GUI\CUSTOM\books.gif", 1)
Call CustomMenuLabel(index, 1, "A Menu!", 20, 50, 10, 0, 0, 400, 20)
Call CustomMenuTextBox(index, 1, 300, 20, 100, "Click Here For Controlls!")
End Sub
Call CustomMenuShow(index, "controlls", "\GUI\CUSTOM\books.gif", 2)
Call CustomMenuLabel(index, 2, "arrow keys to move(more to come)", 20, 50, 10, 0, 0, 400, 20)
```
and this is the click part in my menu scripts
```
Case 2
If menu_title = "Menu!" Then
If Clicked_Index = 1 Then
Call CustomMenuShow(index, "controlls", "\GUI\CUSTOM\books.gif", 2)
Call CustomMenuLabel(index, 2, "arrow keys to move(more to come)", 20, 50, 10, 0, 0, 400, 20)
End If
```
what are these kiddy errors ??!!?? -
i ve been writeing games and scripting for a while useing te and ee but then ive never tryied eclipse source so i have some questions
1\. is there much of a difference i know eclipse source has more files but do they mean anything
2\. if i want to script more should i use eclipse sourceor stick with ee that has all the npc bugs? -
Ee 2.2 help
in Q & A
well ive read about everything i can on this (dont get mad because i tryied looking for all the things i could i used the search button and everthing) but i eed help on two things
1\. whenever i kill a npc my server messes up
2\. call settimer doesnot set a timer whats up with that? -
how come nobody is posting as often is at least been 15 mins from the time somebodys posted to the time i made this whats up with that
-
[tv-links.co.uk](http://tv-links.co.uk)
it has like every show and movie -
```
my ee server wont work anyomore after i added a code it just frezes at the stage inalizing plz help this is the section[code]'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' This sub is run when a scripted item is used or double clicked.
Sub ScriptedItem(index, Script)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Select Case Script
Case 0
Call PlayerMsg(index, "This item has no apparent use", 15)
Exit Sub
Case Else
'No script found
Call playermsg(index, "No script found. Please contact an admin to solve this problem.", 15)
Exit Sub
Case 1
Call playerquerybox(index, "Who do you want to send a message?", 1)
Exit Sub
End Select
End Sub[/code]
this is the part i added
[code]Case 1
Call playerquerybox(index, "Who do you want to send a message?", 1)
Exit Sub
[/code]
please help me
``` -
-
does anyone know how to evn work this script i can get it to work until i step on the dock and it doesent warp but it says the 20 min thing and doesnt show a destination so i use /warpto 3 witch is my ship map and i step on the tile where you go back to docks and it does nothing the ship desent land i i dont know how to make time shorter plese read this script and tell me wut iam missing [http://www.freemmorpgmaker.com/smf/index.php/topic,5550.0.html](http://www.freemmorpgmaker.com/smf/index.php/topic,5550.0.html)
-
ok so i used te and it worked perfectly scripting and all but i doenloaded ee and when i open the server right away it shows a not enough memory error i checked the error fix page and it says delete all your maps but i dont have any please help if you know the problem
-
i know this sounds stupid but how to you download and use a tileset from the resourses page
-
could some one please tell me how to give people your game file and how to get your game online useing a wierless router
Helping wish
in Discussion
Posted
1.portforwarding was actually stated somewhere instead of people asking everyday mabe like in a readme or something
2.no one post maps that arent even their's
3.dont flame newbs ya i used to do it but now i am a major helper
mabe not that major…but everyone was a newb at one time
and thats about it