Esse tutorial modifica apenas o servidor, o autor do tutorial não conseguiu abrir o client para modificá-lo.
Basicamente funciona fazendo cair todos os seus itens se você é um Assassino (Playerkiller) quando você morre.
Esta é uma edição no servidor muito, muito simples.
Primeiramente vá até o modPlayer e encontre isso:
Créditos
Elbereth
Legolas Td (Por criar o tutorial)
Valentine (Por Traduzir e trazer para a Aldeia RPG)
Basicamente funciona fazendo cair todos os seus itens se você é um Assassino (Playerkiller) quando você morre.
Esta é uma edição no servidor muito, muito simples.
Primeiramente vá até o modPlayer e encontre isso:
- Código:
' Drop all worn items
For i = 1 To Equipment.Equipment_Count - 1
If GetPlayerEquipment(index, i) > 0 Then
PlayerMapDropItem index, GetPlayerEquipment(index, i), 0
End If
Next
- Código:
'Drop inventory items, Will make this only apply to player killers.
If GetPlayerPK(index) = YES Then
For i = 1 To MAX_INV
PlayerMapDropItem index, i, GetPlayerInvItemValue(index, i)
Next
'Send all equiped items to the inventory to be dumped.
For i = 1 To Equipment.Equipment_Count - 1
If GetPlayerEquipment(index, i) > 0 Then
PlayerMapDropItem index, GetPlayerEquipment(index, i), 0
End If
'Send Weapon
GiveInvItem index, GetPlayerEquipment(index, Weapon), 0
SetPlayerEquipment index, 0, Weapon
'Send Armor
GiveInvItem index, GetPlayerEquipment(index, Armor), 0
SetPlayerEquipment index, 0, Armor
'Send Shield
GiveInvItem index, GetPlayerEquipment(index, Shield), 0
SetPlayerEquipment index, 0, Shield
'Send Helmet
GiveInvItem index, GetPlayerEquipment(index, Helmet), 0
SetPlayerEquipment index, 0, Helmet
Next
'Drop *equipped* inventory items
For i = 1 To MAX_INV
PlayerMapDropItem index, i, 0
Next
End If
Créditos
Elbereth
Legolas Td (Por criar o tutorial)
Valentine (Por Traduzir e trazer para a Aldeia RPG)
Última edição por Valentine em Sex Jun 08, 2012 10:22 am, editado 9 vez(es)