napa182 commented on a Page, Umbreon Attacker Mini Rpg  -  Aug 23, 2007

here..

On *:Load: {
  set %Level 1
  set %PP 8
  set %Exp 0
}
Menu Nicklist,Query {
  .Umbreon Attacker 
  ..Shadowball {
    if (%Exp > $Calc( %Level * 150) ) && (%PP > 0) && ($1 != $Me) {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      inc %Level
      set %Exp 0
      me 15,1Creates a shadow ball comming out of his mouth and fires it at $1 doing ( %Damage ) Damage!  He also gains ( %Gained ) exp!
      .timer.Level^1 1 1 set %Exp 0
      .timer.Level^2 1 2 inc %Level
      .timer.Level^3 1 3 me  12,1( $+ 7Level up! $+ 12) has leveled up to level ( %Level )! 12,1( $+ 7Level up! $+ 12)
    }
    if (%Exp < $Calc( %Level * 150) ) && (%PP > 0) && ($1 != $Me)  {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      me 15,1creates a shadow ball comming out of his mouth and shoots it at $1 doing ( %Damage ) Damage!  He also gains ( %Gained ) exp!
    }
    if (%PP <= 0) && ($1 != $Me)  {
      echo -a You are out of PP!
      halt
    }
    if ($1 = $Me) {
      echo -a You cannot Attack yourself!
    }
  }
  ..Quick-attack {
    if (%Exp > $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me) {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      inc %Level
      set %Exp 0
      me 15,1quickly attacks 41 doing  ( %Damage ) Damage!  He also gains ( %Gained ) exp!
      .timer.Level^1 1 1 set %Exp 0
      .timer.Level^2 1 2 inc %Level
      .timer.Level^3 1 3 me  12,1( $+ 7Level up! $+ 12) has leveled up to level ( %Level )! 12,1( $+ 7Level up! $+ 12)
    }
    if (%Exp < $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me)  {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      me 15,1Quickly attacks $1 doing ( %Damage ) Damage!  He also gains ( %Gained ) exp!
    }
    if (%pp <= 0) && ($1 != $Me)  {
      echo -a You are out of PP!
      halt
    }
    if ($1 = $Me) {
      echo -a You cannot Attack yourself!
    }
  }
  ..Bite {
    if (%Exp > $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me) {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      inc %Level
      set %Exp 0
      me bites $1 doing ( %Damage ) Damage!  He also gains ( %Gained ) exp!
      .timer.Level^1 1 1 set %Exp 0
      .timer.Level^2 1 2 inc %Level
      .timer.Level^3 1 3 me  12,1( $+ 7Level up! $+ 12) has leveled up to level ( %Level )! 12,1( $+ 7Level up! $+ 12)
    }
    if (%Exp < $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me)  {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      me 15,1bites $1 doing ( %Damage ) Damage!  He also gains ( %Gained ) exp!
    }
    if (%pp <= 0) && ($1 != $Me)  {
      echo -a You are out of PP!
      halt
    }
    if ($1 = $Me) {
      echo -a You cannot Attack yourself!
    }
  }
  ..Take Down {
    if (%Exp > $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me) {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      inc %Level
      set %Exp 0
      me 15,1take downs $1 really hard doing( %Damage ) Damage!  They also gain ( %Gained ) exp!
      .timer.Level^1 1 1 set %Exp 0
      .timer.Level^2 1 2 inc %Level
      .timer.Level^3 1 3 me  12,1( $+ 7Level up! $+ 12) has leveled up to level ( %Level )! 12,1( $+ 7Level up! $+ 12)
    }
    if (%Exp < $Calc( %Level * 150) ) && (%pp > 0) && ($1 != $Me)  {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %pp
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      me Take 15,1downs $1 really hard doing ( %Damage ) Damage!  He  also gains ( %Gained ) exp!
    }
    if (%pp <= 0) && ($1 != $Me)  {
      echo -a You are out of PP!
      halt
    }
    if ($1 = $Me) {
      echo -a You cannot Attack yourself!
    }
  }
  .Giant-Oran-Berry {
    .timer.Reload1 1 30 set %pp 8
    .timer.Reload2 1 2 me 15,1eats a giant oran berry
    .timer.Reload3 1 31 me 15,1is done eating it and is refreshed as ever!
  }
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.