C1ark

Untitled

Mar 24th, 2013
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.37 KB | None | 0 0
  1. alias remNickID {
  2.   if ($left($right($1,3),-2) == $chr(40)) {
  3.     return $left($1,-3)
  4.   }
  5.   elseif ($left($right($1,3),-2) == $chr(41)) {
  6.     return $left($1,-5)
  7.   }
  8.   else {
  9.     return $left($1,-4)
  10.   }
  11. }
  12.  
  13. ;Money Gained: $12
  14. ;Nick: $remNickID($3)
  15.  
  16. on *:LOAD:{
  17.   if (%ingamenick == $null) { set %ingamenick $$?="Enter your ingame nickname!" }
  18. }
  19.  
  20. on *:TEXT:*:#ECNR:{
  21.   if ( $nick == ECNR1 || $nick == ECNR2 ) {
  22.     if (%ingamenick == $null) { set %ingamenick $$?="Enter your ingame nickname!" }
  23.     if ( if ($4 == money && $5 == has && $6 == increased && $7 == from && $remNickID($3) == %ingamenick) {) {
  24.       set %currentmoney 0
  25.       if ($readini(Achievments.ini, np, Money, Money) != $null) { set %currentmoney $readini(Achievments.ini, np, Money, Money) }
  26.       /writeini -n Achievments.ini Money Money $calc(%currentmoney + $12)
  27.       if ($readini(Achievments.ini, np, Money, 1Million) == $null && $calc(%currentmoney,$readini(Achievments.ini, np, Money, Money) > 1000000) {
  28.         /msg #ECNR !say [Achievment Get] 1 Million Dollars
  29.         /writeini -n Achievments.ini Money 1Million Done
  30.       }
  31.     }
  32.     if ($2 == has && $6 == from && $8 == backpack. && $remNickID($9) == %ingamenick) {
  33.       set %currentmoney $readini(Achievments.ini, np, Money, Money)
  34.       /writeini -n Achievments.ini Money Money $calc(%currentmoney - $right($5,-1))
  35.     }
  36.   }
  37. }
Advertisement
Add Comment
Please, Sign In to add comment