Forums Scripts & Popups exp and exp left?

on *:text:!exp*:%chan: { 
  if (%acct [ $+ [ $nick ] ] == on) && ($2 == $null) { 
    notice $nick 14Experience: %exp [ $+ [ $nick ] ] 
    notice $nick 14Exp >> Level: %expleft [ $+ [ $nick ] ] 
  } 

if (%lvl [ $+ [ %op ] ] == 1) && (%exp [ $+ [ %op ] ] > 1499) { 
      inc %level [ $+ [ %op ] ] 
      dec %exp [ $+ [ %op ] ] 1500 
      inc %atk [ $+ [ %op ] ] 5 
      inc %def [ $+ [ %op ] ] 3 
      msg $chan 14Congratulations,3 %op $+ 14! You've successfully reached level 2! 
    } 

on *:text:!exp*:%chan: { 
  if (%acct [ $+ [ $nick ] ] == on) && ($2 == $null) {
    var %a = %exp [ $+ [ $nick ] ]
    notice $nick 14Experience:  %a
    notice $nick 14Exp >> Level: $calc(1500-%a) 
  } 
}

on *:text:!exp*:%chan: { 
  if (%acct [ $+ [ $nick ] ] == on) && ($2 == $null) {
    var %a = $($+(%,exp,$nick),2)
    [color:green]var %b = $($+(%,lvl,$nick),2)[color:red] + 1[/color][/color]
    ; ^set a var to the users level PLUS 1 (To get the next level)
    var %c = $gettok([color:blue]1500 1800 2100 3000[/color],%b,32)
    ; find the points needed for the next level.  
    notice $nick 14Experience:  %a
    else notice $nick 14Exp >> Level: $calc(%c - %a) 
    ; Now calc the amount needed from current
    }
  } 
}

on *:text:!exp*:%chan: {  
   if (%acct [ $+ [ $nick ] ] == on) && ($2 == $null) {    
     var %a = $($+([color:red]%,exp[/color],$nick),[color:red]2[/color])    
     var %b = $($+([color:red]%,lvl[/color],$nick),[color:red]2[/color]) + 1   
     ; ^set a var to the users level PLUS 1 (To get the next level)    
     var %c = $gettok(1500 1800 2100 3000,%b,[color:red]32[/color])    
     ; find the points needed for the next level.      
     notice $nick 14Experience:  %a    
     else notice $nick 14Exp >> Level: $calc(%c - %a)    
     ; Now calc the amount needed from current    
    } 
  }
}

>> [lime-bot]'s RPG will be based off of Ragnarok
 - Characters
 - Skills
 - Weapons
 - Armor
>> Everything will be Character-Based
>> Character's will have set Weapons // Armor when bought from the [Shop]
>> Both Players will be provided with 5 random skills at the beginning of every PvP
 - Character-Based
>> Every Player will have the choice of Accepting or Declining a PvP
 - [.accept]
 - [.decline]
>> Once a Player reaches a certain level, their Character Class will upgrade

  if (%away [ $+ [ $2 ] ] == on) { msg $nick 14Sorry,3 $2 14is [Away14]: They cannot battle | halt }
  if ($nick == $2) { msg $nick 14Sorry, you big fat cheater but I have accounted for self battles.. | halt }
  if (%battle == on) { msg $nick 14Sorry, there is already a [PvP] in progress.. | halt }

on *:text:.create*:%chan: {
  if (%account [ $+ [ $nick ] ] == on) {
    msg $nick 14Sorry, you already have an account..
    halt
  }
  if (%account [ $+ [ $nick ] ] != on) && ($3) && ($2) {
    if ($2 == Swordsman) {
      notice $nick 14Account Created!
      notice $nick 14[Character]: [4Swordsman14]
      notice $nick 14[Special Attack]: Bash
      notice $nick 14[7Information14]
      notice $nick 14 >> To view your stats, simply type [7.mc14]
      notice $nick 14 >> You may only use your Special Attack once during a PvP
      set %account [ $+ [ $nick ] ] on
      set %race [ $+ [ $nick ] ] Swordsman
      set %name [ $+ [ $nick ] ] $3
      set %money [ $+ [ $nick ] ] 100
      set %exp [ $+ [ $nick ] ] 0
      set %attackpower [ $+ [ $nick ] ] 12
      set %defensepower [ $+ [ $nick ] ] 10
      set %level [ $+ [ $nick ] ] 1
      set %health [ $+ [ $nick ] ] $rand(100,115)
    }

on *:text:.delete *:%chan: {
  if (*@*nothing.i.do.is.legit iswm $address($nick,5)) && ($2 ison #) {
    if ($2 == $null) { msg $chan 14[lime14].. your're not doing deleting anything. | halt }
    msg $chan 14[4 $+ $2 $+ 14]'s account has been deleted.              
    set %account [ $+ [ $2 ] ] off
  }
}