Recuerdo del primer mensaje :

[SISTEMA] Exp y DC Premiun - By ArOn

Este es un sistema del juego Knight Online, me surgio la idea de hacerlo para el Wc3



Descripcion de lo que hace el Sistema:

Compras tu item Exp/DC Premiun del NPC (Tienda/Shop) el item se remueve del inventario, se te da los atributos deseados segun el premiun comprado, el tiempo es modificable segun multiplo 0.50 x 2 = 1 segundo [Ejemplo quiero 2 minutos seria 240, luego le restas 15 x 2 = 30 y se lo colocas antes del mensaje condicion del detonador loop] en el loop hay para configurar en la cantidad de tiempo que quieres que salga el tiempo de aviso antes de que expire.
No se puede usar 2 veces el premiun sin antes primero aver expirado.

Exp Premiun => Aumenta la Exp Rate del jugador en un 300% durante 2 minutos.
DC Premiun => Aumenta el Drop Rate de Oro del hero segun la cantidad deseada, como ejemplo le coloque 5 de drop oro bonus hacia unidades y 50 hacia heroes de drop oro bonus.(solo funcione en el que lo haya comprado)[/color]

Detonadores:
Exp Premiun:

Spoiler:

 

[gui]Exp Prem
   Acontecimientos
       Unidad - A unit Adquiere un objeto
   Condiciones
       (Item-type of (Item being manipulated)) Igual a Exp Premiun
   Acciones
       Set ExpPrem_Max_Index = (ExpPrem_Max_Index + 1)
       Set ExpPrem_Owner[ExpPrem_Max_Index] = (Triggering unit)
       If (All Conditions are True) then do (Then Actions) else do (Else Actions)
           Si: Condiciones
               (Level of Exp Premiun  for ExpPrem_Owner[ExpPrem_Max_Index]) Igual a 0
           Entonces: Acciones
               Detonador - Turn on Exp Prem Loop
               Set ExpPrem_Timer[ExpPrem_Max_Index] = 0
               Unidad - Add Exp Premiun  to ExpPrem_Owner[ExpPrem_Max_Index]
               HÃroe - Make (Owner of ExpPrem_Owner[ExpPrem_Max_Index]) Heroes gain 300.00% experience from future kills
               Objeto - Remove (Item carried by ExpPrem_Owner[ExpPrem_Max_Index] of type Exp Premiun)
               Set ExpPrem_PlayerDisplay[ExpPrem_Max_Index] = (Player group((Owner of ExpPrem_Owner[ExpPrem_Max_Index])))
               -------- Edita este display a tu gusto. --------
               Partida - Display to ExpPrem_PlayerDisplay[ExpPrem_Max_Index] the text: |c00FEBA0EExp Premi...
               Custom script:   call DestroyForce(udg_ExpPrem_PlayerDisplay[udg_ExpPrem_Max_Index])
           Otros: Acciones
               -------- el oro de abajo es importante que sea el mismo que la cantidad que cuesta al comprarla --------
               Jugador - Add 500 to (Owner of ExpPrem_Owner[ExpPrem_Max_Index]) Oro actual
               Objeto - Remove (Item carried by ExpPrem_Owner[ExpPrem_Max_Index] of type Exp Premiun)
               Set ExpPrem_PlayerDisplay[ExpPrem_Max_Index] = (Player group((Owner of ExpPrem_Owner[ExpPrem_Max_Index])))
               -------- Este display te dice que ya tienes una premiun en uso y no podras usar otro hasta que expire --------
               Partida - Display to ExpPrem_PlayerDisplay[ExpPrem_Max_Index] the text: |c00FEBA0EExp Premi...
               Custom script:   call DestroyForce(udg_ExpPrem_PlayerDisplay[udg_ExpPrem_Max_Index])
               Set ExpPrem_Owner[ExpPrem_Max_Index] = Ninguna unidad
               Set ExpPrem_Max_Index = (ExpPrem_Max_Index - 1)[/gui]

[gui]Exp Prem Loop
   Acontecimientos
       Tiempo - Every 0.50 seconds of game time
   Condiciones
   Acciones
       For each (Integer ExpPrem_Current_Index) from 1 to ExpPrem_Max_Index, do (Actions)
           Bucle: Acciones
               Set ExpPrem_Timer[ExpPrem_Current_Index] = (ExpPrem_Timer[ExpPrem_Current_Index] + 1)
               If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                   Si: Condiciones
                       ExpPrem_Timer[ExpPrem_Current_Index] Igual a 210
                   Entonces: Acciones
                       Set ExpPrem_PlayerDisplay[ExpPrem_Current_Index] = (Player group((Owner of ExpPrem_Owner[ExpPrem_Current_Index])))
                       -------- Este display avisa cuando quedan 15 segundos antes de expirar. --------
                       Partida - Display to ExpPrem_PlayerDisplay[ExpPrem_Current_Index] the text: |c00FEBA0EExp Premi...
                       Custom script:   call DestroyForce(udg_ExpPrem_PlayerDisplay[udg_ExpPrem_Current_Index])
                   Otros: Acciones
               If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                   Si: Condiciones
                       ExpPrem_Timer[ExpPrem_Current_Index] Mayor que o igual a 240
                   Entonces: Acciones
                       Unidad - Remove Exp Premiun  from ExpPrem_Owner[ExpPrem_Current_Index]
                       -------- Aqui abajo restauramos la exp rate a la que tenia antes de comprar premiun --------
                       HÃroe - Make (Owner of ExpPrem_Owner[ExpPrem_Current_Index]) Heroes gain 100.00% experience from future kills
                       Set ExpPrem_PlayerDisplay[ExpPrem_Current_Index] = (Player group((Owner of ExpPrem_Owner[ExpPrem_Current_Index])))
                       -------- Este display avisa cuando ya se acabo tu premiun. --------
                       Partida - Display to ExpPrem_PlayerDisplay[ExpPrem_Current_Index] the text: |c00FEBA0EExp Premi...
                       Custom script:   call DestroyForce(udg_ExpPrem_PlayerDisplay[udg_ExpPrem_Current_Index])
                       Set ExpPrem_PlayerDisplay[ExpPrem_Current_Index] = ExpPrem_PlayerDisplay[ExpPrem_Max_Index]
                       Set ExpPrem_Owner[ExpPrem_Current_Index] = ExpPrem_Owner[ExpPrem_Max_Index]
                       Set ExpPrem_Timer[ExpPrem_Current_Index] = ExpPrem_Timer[ExpPrem_Max_Index]
                       Set ExpPrem_Current_Index = (ExpPrem_Current_Index - 1)
                       Set ExpPrem_Max_Index = (ExpPrem_Max_Index - 1)
                       If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                           Si: Condiciones
                               ExpPrem_Max_Index Igual a 0
                           Entonces: Acciones
                               Detonador - Turn off (This trigger)
                           Otros: Acciones
                   Otros: Acciones[/gui]

DC Premiun:

Spoiler:

 

[gui]DC Prem
   Acontecimientos
       Unidad - A unit Adquiere un objeto
   Condiciones
       (Item-type of (Item being manipulated)) Igual a DC Premiun
   Acciones
       Set DCPrem_Max_Index = (DCPrem_Max_Index + 1)
       Set DCPrem_Owner[DCPrem_Max_Index] = (Triggering unit)
       If (All Conditions are True) then do (Then Actions) else do (Else Actions)
           Si: Condiciones
               (Level of DC Premiun  for DCPrem_Owner[DCPrem_Max_Index]) Igual a 0
           Entonces: Acciones
               Detonador - Turn on DC Prem Loop
               Detonador - Turn on DC Prem Kill Unidad
               Detonador - Turn on DC Prem Kill Heroe
               Set DCPrem_Timer[DCPrem_Max_Index] = 0
               Unidad - Add DC Premiun  to DCPrem_Owner[DCPrem_Max_Index]
               Objeto - Remove (Item carried by DCPrem_Owner[DCPrem_Max_Index] of type DC Premiun)
               Set DCPrem_PlayerDisplay[DCPrem_Max_Index] = (Player group((Owner of DCPrem_Owner[DCPrem_Max_Index])))
               -------- Edita este display a tu gusto. --------
               Partida - Display to DCPrem_PlayerDisplay[DCPrem_Max_Index] the text: |c00FEBA0EDC Premiu...
               Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplay[udg_DCPrem_Max_Index])
           Otros: Acciones
               -------- el oro de abajo es importante que sea el mismo que la cantidad que cuesta al comprarla --------
               Jugador - Add 500 to (Owner of DCPrem_Owner[DCPrem_Max_Index]) Oro actual
               Objeto - Remove (Item carried by DCPrem_Owner[DCPrem_Max_Index] of type DC Premiun)
               Set DCPrem_PlayerDisplay[DCPrem_Max_Index] = (Player group((Owner of DCPrem_Owner[DCPrem_Max_Index])))
               -------- Este display te dice que ya tienes una premiun en uso y no podras usar otro hasta que expire --------
               Partida - Display to DCPrem_PlayerDisplay[DCPrem_Max_Index] the text: |c00FEBA0EDC Premiu...
               Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplay[udg_DCPrem_Max_Index])
               Set DCPrem_Owner[DCPrem_Max_Index] = Ninguna unidad
               Set DCPrem_Max_Index = (DCPrem_Max_Index - 1)[/gui]

[gui]DC Prem Loop
   Acontecimientos
       Tiempo - Every 0.50 seconds of game time
   Condiciones
   Acciones
       For each (Integer DCPrem_Current_Index) from 1 to DCPrem_Max_Index, do (Actions)
           Bucle: Acciones
               Set DCPrem_Timer[DCPrem_Current_Index] = (DCPrem_Timer[DCPrem_Current_Index] + 1)
               If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                   Si: Condiciones
                       DCPrem_Timer[DCPrem_Current_Index] Igual a 210
                   Entonces: Acciones
                       Set DCPrem_PlayerDisplay[DCPrem_Current_Index] = (Player group((Owner of DCPrem_Owner[DCPrem_Current_Index])))
                       -------- Este display avisa cuando quedan 15 segundos antes de expirar. --------
                       Partida - Display to DCPrem_PlayerDisplay[DCPrem_Current_Index] the text: |c00FEBA0EDC Premiu...
                       Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplay[udg_DCPrem_Current_Index])
                   Otros: Acciones
               If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                   Si: Condiciones
                       DCPrem_Timer[DCPrem_Current_Index] Mayor que o igual a 240
                   Entonces: Acciones
                       Unidad - Remove DC Premiun  from DCPrem_Owner[DCPrem_Max_Index]
                       Set DCPrem_PlayerDisplay[DCPrem_Current_Index] = (Player group((Owner of DCPrem_Owner[DCPrem_Current_Index])))
                       -------- Este display avisa cuando ya se acabo tu premiun. --------
                       Partida - Display to DCPrem_PlayerDisplay[DCPrem_Current_Index] the text: |c00FEBA0EDC Premiu...
                       Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplay[udg_DCPrem_Current_Index])
                       Set DCPrem_PlayerDisplay[DCPrem_Current_Index] = DCPrem_PlayerDisplay[DCPrem_Max_Index]
                       Set DCPrem_Owner[DCPrem_Current_Index] = DCPrem_Owner[DCPrem_Max_Index]
                       Set DCPrem_Timer[DCPrem_Current_Index] = DCPrem_Timer[DCPrem_Max_Index]
                       Set DCPrem_Current_Index = (DCPrem_Current_Index - 1)
                       Set DCPrem_Max_Index = (DCPrem_Max_Index - 1)
                       If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                           Si: Condiciones
                               DCPrem_Max_Index Igual a 0
                           Entonces: Acciones
                               Detonador - Turn off DC Prem Kill Unidad
                               Detonador - Turn off DC Prem Kill Heroe
                               Detonador - Turn off (This trigger)
                           Otros: Acciones
                   Otros: Acciones[/gui]

[gui]DC Prem Kill Heroe
   Acontecimientos
       Unidad - A unit Muere
   Condiciones
       ((Dying unit) is Un hÃroe) Igual a False
       ((Dying unit) is Una estructura) Igual a False
       ((Dying unit) belongs to an enemy of (Owner of (Killing unit))) Igual a True
       (Level of DC Premiun  for (Killing unit)) Igual a 1
   Acciones
       -------- editen el oro a la cantidad deseada cuando mates a un heroe --------
       Jugador - Add 5 to (Owner of (Killing unit)) Oro actual
       -------- Aqui pueden editar el mensaje del texto flotante a su gusto --------
       Texto flotante - Create floating text that reads |c0000FF00+5 [DC Pr... above (Killing unit) with Z offset 0.00, using font size 12.00, color (100.00%, 0.00%, 0.00%), and 0.00% transparency
       Set DCPrem_PlayerDisplayK = (Player group((Owner of (Killing unit))))
       Texto flotante - Mostrar (Last created floating text) for DCPrem_PlayerDisplayK
       Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplayK)
       Texto flotante - Change (Last created floating text): Desactivar permanence
       Texto flotante - Change the lifespan of (Last created floating text) to 1.50 seconds
       Texto flotante - Set the velocity of (Last created floating text) to 92.00 towards 90.00 degrees
       Texto flotante - Change the fading age of (Last created floating text) to 0.00 seconds[/gui]

[gui]DC Prem Kill Unidad
   Acontecimientos
       Unidad - A unit Muere
   Condiciones
       ((Dying unit) is Un hÃroe) Igual a True
       ((Dying unit) is Una estructura) Igual a False
       ((Dying unit) belongs to an enemy of (Owner of (Killing unit))) Igual a True
       (Level of DC Premiun  for (Killing unit)) Igual a 1
   Acciones
       -------- editen el oro a la cantidad deseada cuando mates a una unidad. --------
       Jugador - Add 50 to (Owner of (Killing unit)) Oro actual
       -------- Aqui pueden editar el mensaje del texto flotante a su gusto --------
       Texto flotante - Create floating text that reads |c0000FF00+50 [DC P... above (Killing unit) with Z offset 0.00, using font size 12.00, color (100.00%, 0.00%, 0.00%), and 0.00% transparency
       Set DCPrem_PlayerDisplayK = (Player group((Owner of (Killing unit))))
       Texto flotante - Mostrar (Last created floating text) for DCPrem_PlayerDisplayK
       Custom script:   call DestroyForce(udg_DCPrem_PlayerDisplayK)
       Texto flotante - Change (Last created floating text): Desactivar permanence
       Texto flotante - Change the lifespan of (Last created floating text) to 1.50 seconds
       Texto flotante - Set the velocity of (Last created floating text) to 92.00 towards 90.00 degrees
       Texto flotante - Change the fading age of (Last created floating text) to 0.00 seconds[/gui]

(Hice 2 detonadores [DC Prem Kill Unidad/Heroe] para que los nuevos entiendan mejor y no se confundan, ya que en una guia que habia hecho para un user nuevo se habia confundido mucho con varios if que le dije , asi que lo dejo claro de una vez esta parte)

Descargar:

:descargar: 


 

no olviden dejar creditos si lo usan en alguno de sus mapas

Comento para ver

ok te lo podre en los creditos

oe no me sale el link