Aldeia RPG

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte ao desenvolvimento de jogos


    [Sistema] Play PK

    Hayashi
    Hayashi
    Iniciante
    Iniciante


    Mensagens : 33
    Créditos : 1

    Ficha do personagem
    Nível: 1
    Experiência:
    [Sistema] Play PK  Left_bar_bleue0/0[Sistema] Play PK  Empty_bar_bleue  (0/0)
    Vida:
    [Sistema] Play PK  Left_bar_bleue30/30[Sistema] Play PK  Empty_bar_bleue  (30/30)

    [Sistema] Play PK  Empty [Sistema] Play PK

    Mensagem por Hayashi Qui Jun 05, 2014 12:38 pm

    Va na Pasta Servedor e depois scripts, depois abra "Princial.Txt"
    Procure Por:
    TextSay = GetVar("Scripts\Comandos.ini", "TEMP", "Text" & index)

    Abaixo Adicione:
    If Lcase(Trim(TextSay)) = "/pkon" Then
    If GetPlayerPK(index) = 1 Then
    Call SetPlayerPK(index, 0)
    Call PalyerMsg(index, "Você Saiu Do Modo PK!", 14)
    Call GlobalMsg(GetPlayerName(index) & " Saiu Do Modo PK! ", 4)
    Call SavePlayer(index)
    Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
    Exit Sub
    End If
    End If


    If Lcase(Trim(TextSay)) = "/pkoff" Then
    If GetPlayerPK(index) = 0 Then
    Call SetPlayerPK(index, 1)
    Call PlayerMsg(index, "Você Entrou Em Modo PK!", 14)
    Call GlobalMsg(GetPlayerName(index) & " Entrou Em Modo PK! ", 4)
    Call SavePlayer(index)
    Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
    Exit Sub
    End If
    End If
    -----------------------------------------------------------------------------------
    Creditos a min por postar

      Data/hora atual: Qui Mar 28, 2024 11:12 pm