viesty

No, I do not need it to make maps. I just need it for a concept, but I do not want to install full game and then open up the editor. I hope you understood me.

Hello, as I have been a long-term member, I remember that there was a Java-based map editor? Is it still available or is there new or better version? Thanks. ;)

Okay guys, Huge thanks to Ballie, we are updating all the maps constantly, so we will take your suggestions ;) Thanks again.

These are some of maps for my online project, how do you like them? :huh:   

bump :)

I can host 2 servers for free but third for money. I am hosting 24/6.5 (because 0.5 is for rest :cheesy:) _Computer specs_: **Operating system**: Windows XP Professional. **CPU**: 2x Intel Xeon 4-core 2.9GHz **HD**: 1TB **RAM**: 2GB **Internet speed**:  You can trust me. I know that I am not active at forums, but not everybody with small post count and 0% popularity is untrustable.

Wooot wooot woot, thanks Admiral it worked :)

Thanks, ill try it out. I am lazy now, could u give me vista fix?

This is a really serious problem for me. I have reinstalled Direct X, my DirectDraw is enabled.  :cry: :cry: :cry: :cry: :cry: :cry: Please, please, please help me! :icon_alabanza:

Nope.. it has got no problem.

Hello everyone! I have big problem with npc attack. I can hurt npc's with weapons (bows,swords) BUT i can't hurt them with my fists (without any weapon). This is my whole attack sub.. Is there something wrong? ``` '######### ATTACK AND DEATH ######### '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Sub OnAttack(Index, Damage, Hit) '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Dim SkillCheck Dim Weapon Dim Dir Dim RequiredWeapon Dim Target Weapon = GetPlayerInvItemNum(Index, GetPlayerWeaponSlot(Index)) Dir = GetPlayerDir(Index) If Int(Hit) = 1 Then If Int(Damage) > 0 Then If Int(GetPlayerTarget(Index)) > 0 Then Target = GetPlayerTarget(Index) Call DamagePlayer(Index, Target, Damage) Else Target = GetPlayerTargetNPC(Index) Call DamageNPC(Index, Target, Damage) End If End If End If Select Case Int(Dir) Case 0 'Up SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index) - 1) Case 1 'Down SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index) + 1) Case 2 'Left SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index) - 1, GetPlayerY(Index)) Case 3 'Right SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index) + 1, GetPlayerY(Index)) Case Else Call PlayerMsg(Index, "BUGGER!", 4) End Select RequiredWeapon = GetVar("Scripts\Skill\Skill" & SkillCheck & ".ini", "General", "Item") 'end sub If Cint(SkillCheck) > 0 Then If CInt(RequiredWeapon) = CInt(Weapon) Then Call SkillDo(Int(Index), Int(SkillCheck)) End If End If End Sub ```

And.. does it hurt you?

 Rofl, i took the picture in my class. boy to the right is just fooling around. XD XD XD XD

my entire sub: ``` '######### ATTACK AND DEATH ######### '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Sub OnAttack(Index, Damage, Hit) '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Dim SkillCheck Dim Weapon Dim Dir Dim RequiredWeapon Dim Target Weapon = GetPlayerInvItemNum(Index, GetPlayerWeaponSlot(Index)) Dir = GetPlayerDir(Index) If Int(Hit) = 1 Then If Int(Damage) > 0 Then If Int(GetPlayerTarget(Index)) > 0 Then Target = GetPlayerTarget(Index) Call DamagePlayer(Index, Target, Damage) Else Target = GetPlayerTargetNPC(Index) Call DamageNPC(Index, Target, Damage) End If End If End If Select Case Int(Dir) Case 0 'Up SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index) - 1) Case 1 'Down SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index) + 1) Case 2 'Left SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index) - 1, GetPlayerY(Index)) Case 3 'Right SkillCheck = CheckSkill(GetPlayerMap(Index), GetPlayerX(Index) + 1, GetPlayerY(Index)) Case Else Call PlayerMsg(Index, "BUGGER!", 4) End Select RequiredWeapon = GetVar("Scripts\Skill\Skill" & SkillCheck & ".ini", "General", "Item") 'end sub If Cint(SkillCheck) > 0 Then If CInt(RequiredWeapon) = CInt(Weapon) Then Call SkillDo(Int(Index), Int(SkillCheck)) End If End If End Sub ```

``` '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Sub OnAttack(Index, Damage, Hit) '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Dim SkillCheck Dim Weapon Dim Dir Dim RequiredWeapon Dim Target Weapon = GetPlayerInvItemNum(Index, GetPlayerWeaponSlot(Index)) Dir = GetPlayerDir(Index) If Int(Hit) = 1 Then If Int(Damage) > 0 Then If Int(GetPlayerTarget(Index)) > 0 Then Target = GetPlayerTarget(Index) Call DamagePlayer(Index, Target, Damage) Else Target = GetPlayerTargetNPC(Index) Call DamageNPC(Index, Target, Damage) End If End If End If ``` soo is there something wrong?

@ÅÐмiядζ: > Have you tried setting the NPC's defense to zero yet? Yeah..still nothing. @AdrianC: > You can't attack the first NPC you create. Just make another one and you should be ok. Nope…still nothing

3.0 hasn't came out jet, because Bill Gates..ummmm why B. Gates…I mean Barrack Obama pissed off while making his game on eclipse, so he putted a law- No Further More Eclipse Versions!

#14 about script modification….. what can i modify to delete attacking without weapon?!?!

@Ezmek: > yeah, the monsters need to have at least one of each stat to be functional. i cant put all stats 1 because I cant edit it's speed and magic…

I tried to make other acc, but still no damage all my stats are 5, but monsters defence is 1

@Ezmek: > are you sure the melee weapon is set to the weapon attribute? I am not even using a melee weapon, just my fists.

Yeah, pretty realistic :) Go alpha!

if it would have high def damage would do like -2 or -5 but it doesnt show ANYTHING

When i try to attack npc it doesn't do damage :huh: BUT when i try to attack it with bow it does damage npc :lipsrsealed:

I am using Fulou's main.txt