« anterior próximo »
Páginas: [1]   Ir Abajo

Autor Tema: [Script.Ini] Script de clanes para tu server.  (Leído 1555 veces)

0 Usuarios y 1 Visitante están viendo este tema.

xBʟᴜᴇ

  • I feel blue~
  • Usuario de honor
  • Pokéxperto Omega
  • *
  • Mensajes: 11365
  • Karma: +29/-11
    • Ver Perfil

    • Total Badges: 44
    Badges: (View All)
    Décimo aniversario Noveno aniversario Nivel 7
[Script.Ini] Script de clanes para tu server.
« en: 10 de Enero de 2010, 11:19:56 pm »
Aquí traigo este aporte el cual contiene el [#Source] es decir el script completo junto a las values.
Es un script de clanes que contiene:

-- Variables
-- SaveValue Edita bles
-- Todos los coman dos con notas
-- No lleva stopevents así que se los ponéis u,u
-- Battle Over contador de puntos.
-- Else sources
es un script muy completo totalmente echo por my así que si lo usáis espero que deis los correspondientes créditos.
Evitad los errores noob por que lo ize todo corriendo y no lo eh actualizado demasiado.
También decir que hay 5 clanes disponibles y edita bles por server sin necesidad de cambiarlo manualmente todo es automático.
Se aceptan ideas o.o
En línea



xBʟᴜᴇ

  • I feel blue~
  • Usuario de honor
  • Pokéxperto Omega
  • *
  • Mensajes: 11365
  • Karma: +29/-11
    • Ver Perfil

    • Total Badges: 44
    Badges: (View All)
    Décimo aniversario Noveno aniversario Nivel 7
Re:[Script.Ini] Script de clanes para tu server.
« Respuesta #1 en: 11 de Enero de 2010, 09:12:28 am »
Cita de: ~/Kysei Secand en 10 de Enero de 2010, 11:19:56 pm
Aquí traigo este aporte el cual contiene el [#Source] es decir el script completo junto a las values.
Es un script de clanes que contiene:

-- Variables
-- SaveValue Edita bles
-- Todos los coman dos con notas
-- No lleva stopevents así que se los ponéis u,u
-- Battle Over contador de puntos.
-- Else sources
es un script muy completo totalmente echo por my así que si lo usáis espero que deis los correspondientes créditos.
Evitad los errores noob por que lo ize todo corriendo y no lo eh actualizado demasiado.
También decir que hay 5 clanes disponibles y edita bles por server sin necesidad de cambiarlo manualmente todo es automático.
Se aceptan ideas o.o
Código: [Seleccionar]
//Clan Script By ~/Kysei Secand
//Values USED
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Cone" <-Cone,Ctwo,Ctres,Cfor,Cfive
///SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "1" <-- 1,2,3,4,5
///SaveValue "Cone_Members", #GetValue("Cone_Members") + 1 <-- Cone,Ctwo,Ctres,Cfour,Cfive
////
///If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" <-- Cone,Ctwo,Ctres,Cfour,Cfive
///If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 1 <-- 1,2,3,4,5
/// 1 = Cone 2 = Ctwo 3 =Ctres 4 = Cfour 5 = Cfive
///
///Set $ClanUno, "~/Kyseum's Team"
///Set $ClanDos, "~/Jenny's Team"
///Set $ClanTres, "~/O,O Team"
///Set $ClanCuatro, "~/¬¬ team"
///Set $ClanCinco, "~/Joder que de clanes."
////SaveValue "ClanLider: " & $SID(#Source) & "_Cone, $Name(#Source)
/// " & $GetValue(ClanLider: " & $SID(#Source) & "_Cone))
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////

IF $Message = "/Set"
/Set $ClanUno, "!~/Kyseum's Team"
/Set $ClanDos, "!~/Jenny's Team"
/Set $ClanTres, "!~/O,O Team"
/Set $ClanCuatro, "!~/¬¬ team"
/Set $ClanCinco, "!~/Joder que de clanes."
/Set $Bot, "~/Kysei: "
/Exit
Endif

If $Left($Message, 9) = "/Clanuno " OR $Left($Message, 9) = "!ClanUno "
/Set $ClanUno, $right($Message, #Len($Message) - 9)
/SendPM #Source,""
/SendPM #Source, $Bot & "*** Acabas de cambiar el nombre del clan uno a " & $ClanUno
/SendPM #Source,""
/Exit
Endif
If $Left($Message, 9) = "/Clandos " OR $Left($Message, 9) = "!ClanDos "
/Set $ClanDos, $right($Message, #Len($Message) - 9)
/SendPM #Source,""
/SendPM #Source, $Bot & "*** Acabas de cambiar el nombre del clan #dos a " & $ClanDos
/SendPM #Source,""
/Exit
Endif
If $Left($Message, 10) = "/Clantres " OR $Left($Message, 10) = "!ClanTres "
/Set $ClanTres, $right($Message, #Len($Message) - 10)
/SendPM #Source,""
/SendPM #Source, $Bot & "*** Acabas de cambiar el nombre del clan #tres a " & $ClanTres
/SendPM #Source,""
/Exit
Endif
If $Left($Message, 12) = "/ClanCuatro " OR $Left($Message, 12) = "!ClanCuatro "
/Set $ClanCuatro, $right($Message, #Len($Message) - 12)
/SendPM #Source,""
/SendPM #Source, $Bot & "*** Acabas de cambiar el nombre del clan uno a " & $ClanCuatro
/SendPM #Source,""
/Exit
Endif
If $Left($Message, 11) = "/ClanCinco " OR $Left($Message, 11) = "!ClanCinco "
/Set $ClanCinco, $right($Message, #Len($Message) - 11)
/SendPM #Source,""
/SendPM #Source, $Bot & "*** Acabas de cambiar el nombre del clan uno a " & $ClanCinco
/SendPM #Source,""
/Exit
Endif

If $Left($Message, 14) = "!ClanUnoLider " OR $Left($Message, 14) = "/ClanUnoLider "
/Set #T, #PNumber($Right($Message, #Len($Message) - 14))
If #T = 0
/SendPM #Source, $Bot & " Lo siento pero " & $Name(#T) & " no se encuentra en el servidor."
Else
/SendPM #Source, $Bot & " A partir de ahora el lider del clan " & $ClanUno & " Será " & $Name(#T) & "."
/SendAll " ¡Atención! " & $Name(#Source) & " acaba de convertir a " & $Name(#T) & " En lider del clan " & $ClanUno
/SaveValue "ClanLider: " & $SID(#Source) & "_Cone", $Name(#T)
/Unset #T
Endif
/Exit
Endif

If $Left($Message, 14) = "!ClanDosLider " OR $Left($Message, 14) = "/ClanDosLider "
/Set #T, #PNumber($Right($Message, #Len($Message) - 14))
If #T = 0
/SendPM #Source, $Bot & " Lo siento pero " & $Name(#T) & " no se encuentra en el servidor."
Else
/SendPM #Source, $Bot & " A partir de ahora el lider del clan " & $ClanUno & " Será " & $Name(#T) & "."
/SendAll " ¡Atención! " & $Name(#Source) & " acaba de convertir a " & $Name(#T) & " En lider del clan " & $ClanDos
/SaveValue "ClanLider: " & $SID(#Source) & "_Ctwo", $Name(#T)
/Unset #T
Endif
/Exit
Endif

If $Left($Message, 17) = "!ClanCuatroLider " OR $Left($Message, 17) = "/ClanCuatroLider "
/Set #T, #PNumber($Right($Message, #Len($Message) - 17))
If #T = 0
/SendPM #Source, $Bot & " Lo siento pero " & $Name(#T) & " no se encuentra en el servidor."
Else
/SendPM #Source, $Bot & " A partir de ahora el lider del clan " & $ClanUno & " Será " & $Name(#T) & "."
/SendAll " ¡Atención! " & $Name(#Source) & " acaba de convertir a " & $Name(#T) & " En lider del clan " & $ClanCuatro
/SaveValue "ClanLider: " & $SID(#Source) & "_Ctres", $Name(#T)
/Unset #T
Endif
/Exit
Endif

If $Left($Message, 14) = "!ClanTresLider " OR $Left($Message, 14) = "/ClanTresLider "
/Set #T, #PNumber($Right($Message, #Len($Message) - 14))
If #T = 0
/SendPM #Source, $Bot & " Lo siento pero " & $Name(#T) & " no se encuentra en el servidor."
Else
/SendPM #Source, $Bot & " A partir de ahora el lider del clan " & $ClanUno & " Será " & $Name(#T) & "."
/SendAll " ¡Atención! " & $Name(#Source) & " acaba de convertir a " & $Name(#T) & " En lider del clan " & $ClanTres
/SaveValue "ClanLider: " & $SID(#Source) & "_Cfour", $Name(#T)
/Unset #T
Endif
/Exit
Endif

If $Left($Message, 16) = "!ClanCincoLider " OR $Left($Message, 16) = "/ClanCincoLider "
/Set #T, #PNumber($Right($Message, #Len($Message) - 16))
If #T = 0
/SendPM #Source, $Bot & " Lo siento pero " & $Name(#T) & " no se encuentra en el servidor."
Else
/SendPM #Source, $Bot & " A partir de ahora el lider del clan " & $ClanUno & " Será " & $Name(#T) & "."
/SendAll " ¡Atención! " & $Name(#Source) & " acaba de convertir a " & $Name(#T) & " En lider del clan " & $ClanCinco
/SaveValue "ClanLider: " & $SID(#Source) & "_Cfive", $Name(#T)
/Unset #T
Endif
/Exit
Endif

If $Message = $ClanUno
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, $Bot & " ¡Ya formas parte de un clan!."
Else
/SendAll $Bot & " " & $Name(#Source) & " Se Unió al Clan " & $ClanUno & "!."
/SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Cone"
/SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "1"
/SaveValue "Cone_Members", #GetValue("Cone_Members") + 1
Endif
/Exit
Endif


If $Message = $ClanDos
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, $Bot & " ¡Ya formas parte de un clan!"
Else
/SendAll $Bot & " " & $Name(#Source) & " Se unió al Clan " & $ClanDos & "!."
/SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Ctwo "
/SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "2"
/SaveValue "Ctwo_Members", #GetValue("Ctwo_Members") + 1
Endif
/Exit
Endif

If $Message = $ClanTres
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, $Bot & " ¡Ya formas parte de un clan!."
Else
/SendAll $Bot & " " & $Name(#Source) & " Se Unió al Clan " & $ClanTres & "!."
/SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Ctres"
/SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "3"
/SaveValue "Ctres_Members", #GetValue("Ctres_Members") + 1
Endif
/Exit
Endif

If $Message = $ClanCuatro
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, $Bot & " ¡Ya formas parte de un clan!."
Else
/SendAll $Bot & " " & $Name(#Source) & " Se Unió al Clan " & $ClanCuatro & "!."
/SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Cfour"
/SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "4"
/SaveValue "Cfour_Members", #GetValue("Cfour_Members") + 1
Endif
/Exit
Endif

If $Message = $ClanCinco
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour" OR $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, $Bot & " ¡Ya formas parte de un clan!."
Else
/SendAll $Bot & " " & $Name(#Source) & " Se Unió al Clan " & $ClanCinco & "!."
/SaveValue "Team_" & $GetPlayerInfo(#Source, PSID), "Cfive"
/SaveValue "Equipe_" & $GetPlayerInfo(#Source, PSID), "5"
/SaveValue "Cfive_Members", #GetValue("Cfive_Members") + 1
Endif
/Exit
Endif

If $Message = "/Salir" OR $Message = "!Salir"
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "None"
/SendPM #Source, $Bot & "No estas registrado en ningun Clan."
Else
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 1
/SendAll $Bot & " " & $Name(#Source) & " Se retiro del clan " &  $ClanUno
/SaveValue "Cone_Members", #GetValue("Cone_Members") - 1
/SaveValue "Cone_RetiredM", #GetValue("Cone_RetiredM") + 1
Endif
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 2
/SendAll $Bot & " " & $Name(#Source) & " Se retiro del clan " & $ClanDos
/SaveValue "Ctwo_Members", #GetValue("Ctwo_Members") - 1
/SaveValue "Ctwo_RetiredM", #Getvalue("Ctwo_RetiredM") + 1
Endif
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 3
/SendAll $Bot " " & $Name(#Source) & " Se retiro del clan " & $ClanTres
/SaveValue "Ctres_Members", #GetValue("Ctres_Members") - 1
/SaveValue "Ctres_RetiredM", #Getvalue("Ctres_RetiredM") + 1
Endif
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 4
/SendAll $Bot " " & $Name(#Source) & " Se retiro del clan " & $ClanCuatro
/SaveValue "Cfour_Members", #GetValue("Cfour_Members") - 1
/SaveValue "Cfour_RetiredM", #Getvalue("Cfour_RetiredM") + 1
Endif
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 5
/SendAll $Bot " " & $Name(#Source) & " Se retiro del clan " & $ClanCinco
/SaveValue "Cfive_Members", #GetValue("Cfive_Members") - 1
/SaveValue "Cfive_RetiredM", #Getvalue("Cfive_RetiredM") + 1
Endif
Endif
/Exit
Endif

If $Message = "/TeamCmds" OR $Message = "!TeamCmds"
/StopEvent
/SendPM #Source, ""
/SendPM #Source, $Bot & "!Clanstats : Para ver las victorias y derrotas de tu clan(Para mas información sobre victorias y derrotas por clanes teclea !ClanWinInfo)<--Corto el nombre no? XDD."
/SendPM #Source, $Bot & "!Salir : Para retirarte del clan en el que estas(Necesitas retirarte también visitando el foro y posteando que te retiras)."
/SendPM #Source, ""
EndIf

If $Message = "!ClanStats" OR $Message = "/ClanStats"
/SendPM #Source, ""
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cone"
/SendPM #Source, "***Clan : «" & $ClanUno & "!» ***"
/SendPM #Source, ""
/SendPM #Source, " *** Tu eres de este clan ****"
/SendPM #Source, ""
/SendPM #Source, "           -=- Lider del Clan:" & $GetValue("ClanLider: " & $SID(#Source) & "_Cone")
/SendPM #Source, "           -=- Miembros Registrados: " & $Str(#GetValue("Cone_Members"))
/SendPM #Source, "           -=- Wins: " & $Str(#GetValue("Cone_Wins"))
/SendPM #Source, "           -=- Losses: " & $Str(#GetValue("Cone_Losses"))
/SendPM #Source, "           -=- Puntos: " & $Str(#GetValue("Cone_Points"))
/SendPM #Source, "           -=- Miembros Retirados: " & $Str(#GetValue("Cone_RetiredM"))
/SendPM #Source, ""
/SendPM #Source, ""
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctwo"
/SendPM #Source, "***Clan : «" & $ClanDos & "!» ***"
/SendPM #Source, " *** Tu eres de este clan ****"
/SendPM #Source, ""
/SendPM #Source, "           -=- Lider del Clan:" & $GetValue("ClanLider: " & $SID(#Source) & "_Ctwo")
/SendPM #Source, "           -=- Miembros Registrados: " & $Str(#GetValue("Ctwo_Members"))
/SendPM #Source, "           -=- Wins: " & $Str(#GetValue("Ctwo_Wins"))
/SendPM #Source, "           -=- Losses: " & $Str(#GetValue("Ctwo_Losses"))
/SendPM #Source, "           -=- Puntos: " & $Str(#GetValue("Ctwo_Points"))
/SendPM #Source, "           -=- Miembros Retirados: " & $Str(#GetValue("Ctwo_RetiredM"))
/SendPM #Source, ""
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Ctres"
/SendPM #Source, "***Clan : «" & $ClanTres & "!» ***"
/SendPM #Source, " *** Tu eres de este clan ****"
/SendPM #Source, ""
/SendPM #Source, "           -=- Lider del Clan:" & $GetValue("ClanLider: " & $SID(#Source) & "_Ctres")
/SendPM #Source, "           -=- Miembros Registrados: " & $Str(#GetValue("Ctres_Members"))
/SendPM #Source, "           -=- Wins: " & $Str(#GetValue("Ctres_Wins"))
/SendPM #Source, "           -=- Losses: " & $Str(#GetValue("Ctres_Losses"))
/SendPM #Source, "           -=- Puntos: " & $Str(#GetValue("Ctres_Points"))
/SendPM #Source, "           -=- Miembros Retirados: " & $Str(#GetValue("Ctres_RetiredM"))
/SendPM #Source, ""
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfour"
/SendPM #Source, "***Clan : «" & $ClanCuatro & "!» ***"
/SendPM #Source, " *** Tu eres de este clan ****"
/SendPM #Source, ""
/SendPM #Source, "           -=- Lider del Clan:" & $GetValue("ClanLider: " & $SID(#Source) & "_Cfour")
/SendPM #Source, "           -=- Miembros Registrados: " & $Str(#GetValue("Cfour_Members"))
/SendPM #Source, "           -=- Wins: " & $Str(#GetValue("Cfour_Wins"))
/SendPM #Source, "           -=- Losses: " & $Str(#GetValue("Cfour_Losses"))
/SendPM #Source, "           -=- Puntos: " & $Str(#GetValue("Cfour_Points"))
/SendPM #Source, "           -=- Miembros Retirados: " & $Str(#GetValue("Cfour_RetiredM"))
/SendPM #Source, ""
If $GetValue("Team_" & $GetPlayerInfo(#Source, PSID)) = "Cfive"
/SendPM #Source, "***Clan : «" & $ClanCuatro & "!» ***"
/SendPM #Source, " *** Tu eres de este clan ****"
/SendPM #Source, ""
/SendPM #Source, ""
/SendPM #Source, "           -=- Lider del Clan:" & $GetValue("ClanLider: " & $SID(#Source) & "_Cfive")
/SendPM #Source, "           -=- Miembros Registrados: " & $Str(#GetValue("Cfive_Members"))
/SendPM #Source, "           -=- Wins: " & $Str(#GetValue("Cfive_Wins"))
/SendPM #Source, "           -=- Losses: " & $Str(#GetValue("Cfive_Losses"))
/SendPM #Source, "           -=- Puntos: " & $Str(#GetValue("Cfive_Points"))
/SendPM #Source, "           -=- Miembros Retirados: " & $Str(#GetValue("Cfive_RetiredM"))
/SendPM #Source, ""
Endif
Endif
Endif
EndIf
EndIf
/Exit
Endif
EndEvent

Event -BattleOver
If #GetValue("Equipe_" & $GetPlayerInfo(#Target, PSID)) = 1
/SaveValue "Cone_Losses", #GetValue("Cone_Losses") + 1
/SaveValue "Cone_Points", #GetValue("Cone_Points") -  3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Target, PSID)) = 2
/SaveValue "Ctwo_Losses", #GetValue("Ctwo_Losses") + 1
/SaveValue "Ctwo_Points", #GetValue("Ctwo_Points") - 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Target, PSID)) = 2
/SaveValue "Ctres_Losses", #GetValue("Ctres_Losses") + 1
/SaveValue "Ctres_Points", #GetValue("Ctres_Points") - 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Target, PSID)) = 2
/SaveValue "Cfour_Losses", #GetValue("Cfour_Losses") + 1
/SaveValue "Cfour_Points", #GetValue("Cfour_Points") - 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Target, PSID)) = 2
/SaveValue "Cfive_Losses", #GetValue("Cfive_Losses") + 1
/SaveValue "Cfive_Points", #GetValue("Cfive_Points") - 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 1
/SaveValue "Cone_Wins", #GetValue("Cone_Wins") + 1
/SaveValue "Cone_Points", #GetValue("Cone_Points") + 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 2
/SaveValue "Ctwo_Wins", #GetValue("Ctwo_Wins") + 1
/SaveValue "Ctwo_Points", #GetValue("Ctwo_Points") + 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 2
/SaveValue "Ctres_Wins", #GetValue("Ctres_Wins") + 1
/SaveValue "Ctres_Points", #GetValue("Ctres_Points") + 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 2
/SaveValue "Cfour_Wins", #GetValue("Cfour_Wins") + 1
/SaveValue "Cfour_Points", #GetValue("Cfour_Points") + 3
EndIf
If #GetValue("Equipe_" & $GetPlayerInfo(#Source, PSID)) = 2
/SaveValue "Cfive_Wins", #GetValue("Cfive_Wins") + 1
/SaveValue "Cfive_Points", #GetValue("Cfive_Points") + 3
EndIf
EndEvent
En línea

Páginas: [1]   Ir Arriba
« anterior próximo »