Esse script Faz Nada Menos Que Quando Você Matar Um Player Normal
Você Virará Killer,Caso Um Jogador Normal Mate
Um Jogador Killer,Ele Virará Arcanjo,
e Seu Um Normal Matar Um Arcanjo Virará Killer .
Descrição
Quando você matar um "Player Killer" se tornar "Player Guardian" eo seu nome fica azul.
Se você matar um jogador normal ou um "Player Guardian" você se torna "Player Killer" e seu nome ficará vermelho.
Faça um comando "/rankpoints"
Este comando irá mostrar o quanto os pontos que você tem.
Se você é PK Pkpoints você ganha e perde PGPoint.
Se você estiver PG PGpoints você ganha e perde PKpoint.
Em Sub OnPVPDeath, acrescentar:
Em Sub OnPVPDeath, nos termos:
Adicionar:
Em Sub Comandos Adicionar:
Creditos: evilbunnie
Morenoo
Você Virará Killer,Caso Um Jogador Normal Mate
Um Jogador Killer,Ele Virará Arcanjo,
e Seu Um Normal Matar Um Arcanjo Virará Killer .
Descrição
Quando você matar um "Player Killer" se tornar "Player Guardian" eo seu nome fica azul.
Se você matar um jogador normal ou um "Player Guardian" você se torna "Player Killer" e seu nome ficará vermelho.
Faça um comando "/rankpoints"
Este comando irá mostrar o quanto os pontos que você tem.
Se você é PK Pkpoints você ganha e perde PGPoint.
Se você estiver PG PGpoints você ganha e perde PKpoint.
Em Sub OnPVPDeath, acrescentar:
Código:
1
Dim PK
2
Dim PGEm Sub OnPVPDeath, nos termos:
Código:
1
Call GlobalMsg(GetPlayerName(vítima) e "foi morto por" & GetPlayerName(atacante), BRIGHTRED)
Adicionar:
Código:
01
'script Evilbunnie do PVP
02
PG = getvar("Vars.dll", GetPlayerNameAttacker (), "PG")
03
PK = getvar("Vars.dll", GetPlayerNameAttacker (), PK ")
04
Se getvar("Vars.dll", GetPlayerNameVítima (), PK ") = 1 then
05
Call PutVar("Vars.dll", GetPlayerNameAttacler (), "PG", 1)
06
Call PutVar("Vars.dll", GetPlayerNameVítima (), "PK", 0)
07
Call SetPlayerNameColor(atacante, AZUL)
08
Call SendPlayerData(atacante)
09
if PK = 1 then
10
Call PutVar("Vars.dll", GetPlayerNameAttacker (), "PK", 0)
11
End if
12
Call GlobalMsg(GetPlayerName(atacante) e "é agora um jogado Arcanjo!", AZUL)
13
other
14
if PG = 1 then
15
Call PutVar("Vars.dll", GetPlayerNameAttacker (), "PG", 0)
16
End if
17
Call PutVar("Vars.dll", GetPlayerNameAttacker (), "PK", 1)
18
Call GlobalMsg(GetPlayerName(atacante) e "é agora um jogador Demoniaco!", RED)
19
Call SetPlayerNameColor(atacante, BRIGHTRED)
20
Call SendPlayerData(atacante)
21
End If
22'script Evilbunnie do PVPEm Sub Comandos Adicionar:
Código:
1
Case "/rankpoints"
2
Dim PG
3
'script Evilbunnie do PVP
4
PK = getvar("Vars.dll", GetPlayerNameIndex (), PK ")
5
If PK = 1 Then
6
Call BattleMsg(Index, "Agora você é um Player Assasino!", RED, 0)
7
other
8
Call BattleMsg(Index, "Agora você é um Player Protetor!", AZUL, 0)
9
Exit SubCreditos: evilbunnie
Morenoo