API tools faq
paste
Advertisement
Wikked

Tiwtch Point(coins) system

Wikked
Nov 9th, 2014
231
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 20.85 KB | None | 0 0
raw download clone embed print report
  1. ON *:JOIN:#:{
  2.   if ($nick == $me) { .timerjac. $+ # $+ . $+ $r(1,99999999999) 1 $r(120,400) jac | return }
  3.   if (bot isin $nick) { return }
  4.   $+(.timercoins.,#,.,$nick) 0 3600 add.pts $+(#,.,$nick)
  5.   add.pts $+(#,.,$nick)
  6. }
  7.  
  8. ON *:PART:#: {
  9.   if ($nick !== $me) {
  10.     $+(.timercoins.,#,.,$nick) off
  11.   }
  12.   elseif ($nick == $me) { .timerjac.* off }
  13. }
  14.  
  15. ON !*:TEXT:!*:#: {
  16.   tokenize 32 $strip($1-,burci)
  17.   if ($1 == !totalrank) {
  18.     var %f = coins.ini
  19.     if (!$isfile(%f)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file not exist! | return }
  20.     if (!$lines(%f)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file is currently empty! | return }
  21.     if (!$ini(%f,0)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file is empty! | return }
  22.     if ($nick !isop $chan) { msg $chan [ $+ $nick $+ ]: You are NOT an channel moderator! | return }
  23.     msg $chan [ $+ $nick $+ ]: There are $qt( $+ $ini(%f,0) $+ ) total nick(s) in the database.
  24.   }
  25.   if ($1 == !coins) {
  26.     if (!$2) { msg $chan [ $+ $nick $+ ]: You have $qt( $+ $iif($readini(coins.ini,$+(#,.,$nick),coins),$v1,0) $+ ) total coin(s). }
  27.     elseif ($2) {
  28.       if ($nick isop #) {
  29.         if ($2) && (!$3) && (!$readini(coins.ini,$+(#,.,$2),coins)) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) has NOT any coin(s) yet! | return }
  30.         if ($2) && (!$3) { msg $chan [ $+ $nick $+ ]: $2 has $qt( $+ $iif($readini(coins.ini,$+(#,.,$2),coins),$v1,0) $+ ) total coin(s). | return }
  31.         if ($0 < 3) { msg # Insufficient parameters: Use !coins [add|del] [user] [number] | return }
  32.         writeini -n coins.ini $+(#,.,$3) coins $calc($readini(coins.ini,$+(#,.,$3),coins) $iif($2 == add,+,-) $iif($4 isnum,$4,1))
  33.         msg $chan [ $+ $nick $+ ]: The $qt($3) now has $qt( $+ $iif($readini(coins.ini,$+(#,.,$3),coins),$v1,0) $+ ) total coin(s).
  34.       }
  35.       else { msg $chan [ $+ $nick $+ ]: You are NOT an channel moderator! }
  36.     }
  37.   }
  38.   if ($1 == !rank) {
  39.     var %f = coins.ini
  40.     if (!$isfile(%f)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file not exist! | return }
  41.     if (!$lines(%f)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file is currently empty! | return }
  42.     if (!$ini(%f,0)) { msg $chan [ $+ $nick $+ ]: Error, There is NOT any user on the database yet, file is empty! | return }
  43.     if ($2) && ($2 == $nick) { goto me }
  44.     if (!$2) {
  45.       :me
  46.       var %cn = $chan $+ . $+ $nick
  47.       var %c = $readini(%f,%cn,coins)
  48.       if (%c <= 9) { msg $chan [ $+ $nick $+ ]: You are Rank1 with $qt(%c) coins. - Earn $qt($calc(10 - %c)) more coins to become a Rank2. }
  49.       if (%c > 9) && (%c <= 19) { msg $chan [ $+ $nick $+ ]: You are Rank2 with $qt(%c) coins. - Earn $qt($calc(20 - %c)) more coins to become a Rank3. }
  50.       if (%c > 19) && (%c <= 29) { msg $chan [ $+ $nick $+ ]: You are Rank3 with $qt(%c) coins. - Earn $qt($calc(30 - %c)) more coins to become a Rank4. }
  51.       if (%c > 29) && (%c <= 39) { msg $chan [ $+ $nick $+ ]: You are Rank4 with $qt(%c) coins. - Earn $qt($calc(40 - %c)) more coins to become a Rank5. }
  52.       if (%c > 39) && (%c <= 49) { msg $chan [ $+ $nick $+ ]: You are Rank5 with $qt(%c) coins. - Earn $qt($calc(50 - %c)) more coins to become a Rank6. }
  53.       if (%c > 49) && (%c <= 59) { msg $chan [ $+ $nick $+ ]: You are Rank6 with $qt(%c) coins. - Earn $qt($calc(60 - %c)) more coins to become a Rank7. }
  54.       if (%c > 59) && (%c <= 69) { msg $chan [ $+ $nick $+ ]: You are Rank7 with $qt(%c) coins. - Earn $qt($calc(70 - %c)) more coins to become a Rank8. }
  55.       if (%c > 69) && (%c <= 79) { msg $chan [ $+ $nick $+ ]: You are Rank8 with $qt(%c) coins. - Earn $qt($calc(80 - %c)) more coins to become a Rank9. }
  56.       if (%c > 79) && (%c <= 89) { msg $chan [ $+ $nick $+ ]: You are Rank9 with $qt(%c) coins. - Earn $qt($calc(90 - %c)) more coins to become a Rank10. }
  57.       if (%c > 89) && (%c <= 99) { msg $chan [ $+ $nick $+ ]: You are Rank10 with $qt(%c) coins. - Earn $qt($calc(100 - %c)) more coins to become a Rank11. }
  58.       if (%c > 99) && (%c <= 109) { msg $chan [ $+ $nick $+ ]: You are Rank11 with $qt(%c) coins. - Earn $qt($calc(110 - %c)) more coins to become a Rank12. }
  59.       if (%c > 109) && (%c <= 119) { msg $chan [ $+ $nick $+ ]: You are Rank12 with $qt(%c) coins. - Earn $qt($calc(120 - %c)) more coins to become a Rank13. }
  60.       if (%c > 119) && (%c <= 129) { msg $chan [ $+ $nick $+ ]: You are Rank13 with $qt(%c) coins. - Earn $qt($calc(130 - %c)) more coins to become a Rank14. }
  61.       if (%c > 129) && (%c <= 139) { msg $chan [ $+ $nick $+ ]: You are Rank14 with $qt(%c) coins. - Earn $qt($calc(140 - %c)) more coins to become a Rank15. }
  62.       if (%c > 139) && (%c <= 149) { msg $chan [ $+ $nick $+ ]: You are Rank15 with $qt(%c) coins. - Earn $qt($calc(150 - %c)) more coins to become a Rank16. }
  63.       if (%c > 149) && (%c <= 159) { msg $chan [ $+ $nick $+ ]: You are Rank16 with $qt(%c) coins. - Earn $qt($calc(160 - %c)) more coins to become a Rank17. }
  64.       if (%c > 159) && (%c <= 169) { msg $chan [ $+ $nick $+ ]: You are Rank17 with $qt(%c) coins. - Earn $qt($calc(170 - %c)) more coins to become a Rank18. }
  65.       if (%c > 169) && (%c <= 179) { msg $chan [ $+ $nick $+ ]: You are Rank18 with $qt(%c) coins. - Earn $qt($calc(180 - %c)) more coins to become a Rank19. }
  66.       if (%c > 179) && (%c <= 189) { msg $chan [ $+ $nick $+ ]: You are Rank19 with $qt(%c) coins. - Earn $qt($calc(190 - %c)) more coins to become a Rank20. }
  67.       if (%c > 189) && (%c <= 199) { msg $chan [ $+ $nick $+ ]: You are Rank20 with $qt(%c) coins. - Earn $qt($calc(200 - %c)) more coins to become a Rank21. }
  68.       if (%c > 199) && (%c <= 209) { msg $chan [ $+ $nick $+ ]: You are Rank21 with $qt(%c) coins. - Earn $qt($calc(210 - %c)) more coins to become a Rank22. }
  69.       if (%c > 209) && (%c <= 219) { msg $chan [ $+ $nick $+ ]: You are Rank22 with $qt(%c) coins. - Earn $qt($calc(220 - %c)) more coins to become a Rank23. }
  70.       if (%c > 219) && (%c <= 229) { msg $chan [ $+ $nick $+ ]: You are Rank23 with $qt(%c) coins. - Earn $qt($calc(230 - %c)) more coins to become a Rank24. }
  71.       if (%c > 229) && (%c <= 239) { msg $chan [ $+ $nick $+ ]: You are Rank24 with $qt(%c) coins. - Earn $qt($calc(240 - %c)) more coins to become a Rank25. }
  72.       if (%c > 239) && (%c <= 249) { msg $chan [ $+ $nick $+ ]: You are Rank25 with $qt(%c) coins. - Earn $qt($calc(250 - %c)) more coins to become a Rank26. }
  73.       if (%c > 249) && (%c <= 259) { msg $chan [ $+ $nick $+ ]: You are Rank26 with $qt(%c) coins. - Earn $qt($calc(260 - %c)) more coins to become a Rank27. }
  74.       if (%c > 259) && (%c <= 269) { msg $chan [ $+ $nick $+ ]: You are Rank27 with $qt(%c) coins. - Earn $qt($calc(270 - %c)) more coins to become a Rank28. }
  75.       if (%c > 269) && (%c <= 279) { msg $chan [ $+ $nick $+ ]: You are Rank28 with $qt(%c) coins. - Earn $qt($calc(280 - %c)) more coins to become a Rank29. }
  76.       if (%c > 279) && (%c <= 289) { msg $chan [ $+ $nick $+ ]: You are Rank29 with $qt(%c) coins. - Earn $qt($calc(290 - %c)) more coins to become a Rank30. }
  77.       if (%c > 289) && (%c <= 299) { msg $chan [ $+ $nick $+ ]: You are Rank30 with $qt(%c) coins. - Earn $qt($calc(300 - %c)) more coins to become a Rank31. }
  78.       if (%c > 299) && (%c <= 309) { msg $chan [ $+ $nick $+ ]: You are Rank31 with $qt(%c) coins. - Earn $qt($calc(310 - %c)) more coins to become a Rank32. }
  79.       if (%c > 309) && (%c <= 319) { msg $chan [ $+ $nick $+ ]: You are Rank32 with $qt(%c) coins. - Earn $qt($calc(320 - %c)) more coins to become a Rank33. }
  80.       if (%c > 319) && (%c <= 329) { msg $chan [ $+ $nick $+ ]: You are Rank33 with $qt(%c) coins. - Earn $qt($calc(330 - %c)) more coins to become a Rank34. }
  81.       if (%c > 329) && (%c <= 339) { msg $chan [ $+ $nick $+ ]: You are Rank34 with $qt(%c) coins. - Earn $qt($calc(340 - %c)) more coins to become a Rank35. }
  82.       if (%c > 339) && (%c <= 349) { msg $chan [ $+ $nick $+ ]: You are Rank35 with $qt(%c) coins. - Earn $qt($calc(350 - %c)) more coins to become a Rank36. }
  83.       if (%c > 349) && (%c <= 359) { msg $chan [ $+ $nick $+ ]: You are Rank36 with $qt(%c) coins. - Earn $qt($calc(360 - %c)) more coins to become a Rank37. }
  84.       if (%c > 359) && (%c <= 369) { msg $chan [ $+ $nick $+ ]: You are Rank37 with $qt(%c) coins. - Earn $qt($calc(370 - %c)) more coins to become a Rank38. }
  85.       if (%c > 369) && (%c <= 379) { msg $chan [ $+ $nick $+ ]: You are Rank38 with $qt(%c) coins. - Earn $qt($calc(380 - %c)) more coins to become a Rank39. }
  86.       if (%c > 379) && (%c <= 389) { msg $chan [ $+ $nick $+ ]: You are Rank39 with $qt(%c) coins. - Earn $qt($calc(390 - %c)) more coins to become a Rank40. }
  87.       if (%c > 389) && (%c <= 399) { msg $chan [ $+ $nick $+ ]: You are Rank40 with $qt(%c) coins. - Earn $qt($calc(400 - %c)) more coins to become a Rank41. }
  88.       if (%c > 399) && (%c <= 409) { msg $chan [ $+ $nick $+ ]: You are Rank41 with $qt(%c) coins. - Earn $qt($calc(410 - %c)) more coins to become a Rank42. }
  89.       if (%c > 409) && (%c <= 419) { msg $chan [ $+ $nick $+ ]: You are Rank42 with $qt(%c) coins. - Earn $qt($calc(420 - %c)) more coins to become a Rank43. }
  90.       if (%c > 419) && (%c <= 429) { msg $chan [ $+ $nick $+ ]: You are Rank43 with $qt(%c) coins. - Earn $qt($calc(430 - %c)) more coins to become a Rank44. }
  91.       if (%c > 429) && (%c <= 439) { msg $chan [ $+ $nick $+ ]: You are Rank44 with $qt(%c) coins. - Earn $qt($calc(440 - %c)) more coins to become a Rank45. }
  92.       if (%c > 439) && (%c <= 449) { msg $chan [ $+ $nick $+ ]: You are Rank45 with $qt(%c) coins. - Earn $qt($calc(450 - %c)) more coins to become a Rank46. }
  93.       if (%c > 449) && (%c <= 459) { msg $chan [ $+ $nick $+ ]: You are Rank46 with $qt(%c) coins. - Earn $qt($calc(460 - %c)) more coins to become a Rank47. }
  94.       if (%c > 459) && (%c <= 469) { msg $chan [ $+ $nick $+ ]: You are Rank47 with $qt(%c) coins. - Earn $qt($calc(470 - %c)) more coins to become a Rank48. }
  95.       if (%c > 469) && (%c <= 479) { msg $chan [ $+ $nick $+ ]: You are Rank48 with $qt(%c) coins. - Earn $qt($calc(480 - %c)) more coins to become a Rank49. }
  96.       if (%c > 479) && (%c <= 489) { msg $chan [ $+ $nick $+ ]: You are Rank49 with $qt(%c) coins. - Earn $qt($calc(490 - %c)) more coins to become a Rank50. }
  97.       if (%c > 499) && (%c >= 500) { msg $chan [ $+ $nick $+ ]: You are MAX Rank50 with $qt(%c) coins. }
  98.     }
  99.     elseif ($2) {
  100.       var %cn = $chan $+ . $+ $2
  101.       if ($2 == $me) { msg $chan [ $+ $nick $+ ]: Error, You cannot use this command to the bot! | return }
  102.       if (!$ini(%f,%cn)) { msg $chan [ $+ $nick $+ ]: Error, The $qt( $+ $2 $+ ) user does NOT exist on the database! | return }
  103.       var %c = $readini(%f,%cn,coins)
  104.       if (%c <= 9) { msg $chan [ $+ $2 $+ ]: The $qt( $+ $2 $+ ) user has Rank1 with $qt(%c) coins. - Earn $qt($calc(10 - %c)) more coins to become a Rank2. }
  105.       if (%c > 9) && (%c <= 19) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank2 with $qt(%c) coins. - Must earn $qt($calc(20 - %c)) more coins to become a Rank3. }
  106.       if (%c > 19) && (%c <= 29) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank3 with $qt(%c) coins. - Must earn $qt($calc(30 - %c)) more coins to become a Rank4. }
  107.       if (%c > 29) && (%c <= 39) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank4 with $qt(%c) coins. - Must earn $qt($calc(40 - %c)) more coins to become a Rank5. }
  108.       if (%c > 39) && (%c <= 49) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank5 with $qt(%c) coins. - Must earn $qt($calc(50 - %c)) more coins to become a Rank6. }
  109.       if (%c > 49) && (%c <= 59) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank6 with $qt(%c) coins. - Must earn $qt($calc(60 - %c)) more coins to become a Rank7. }
  110.       if (%c > 59) && (%c <= 69) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank7 with $qt(%c) coins. - Must earn $qt($calc(70 - %c)) more coins to become a Rank8. }
  111.       if (%c > 69) && (%c <= 79) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank8 with $qt(%c) coins. - Must earn $qt($calc(80 - %c)) more coins to become a Rank9. }
  112.       if (%c > 79) && (%c <= 89) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank9 with $qt(%c) coins. - Must earn $qt($calc(90 - %c)) more coins to become a Rank10. }
  113.       if (%c > 89) && (%c <= 99) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank10 with $qt(%c) coins. - Must earn $qt($calc(100 - %c)) more coins to become a Rank11. }
  114.       if (%c > 99) && (%c <= 109) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank11 with $qt(%c) coins. - Must earn $qt($calc(110 - %c)) more coins to become a Rank12. }
  115.       if (%c > 109) && (%c <= 119) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank12 with $qt(%c) coins. - Must earn $qt($calc(120 - %c)) more coins to become a Rank13. }
  116.       if (%c > 119) && (%c <= 129) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank13 with $qt(%c) coins. - Must earn $qt($calc(130 - %c)) more coins to become a Rank14. }
  117.       if (%c > 129) && (%c <= 139) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank14 with $qt(%c) coins. - Must earn $qt($calc(140 - %c)) more coins to become a Rank15. }
  118.       if (%c > 139) && (%c <= 149) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank15 with $qt(%c) coins. - Must earn $qt($calc(150 - %c)) more coins to become a Rank16. }
  119.       if (%c > 149) && (%c <= 159) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank16 with $qt(%c) coins. - Must earn $qt($calc(160 - %c)) more coins to become a Rank17. }
  120.       if (%c > 159) && (%c <= 169) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank17 with $qt(%c) coins. - Must earn $qt($calc(170 - %c)) more coins to become a Rank18. }
  121.       if (%c > 169) && (%c <= 179) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank18 with $qt(%c) coins. - Must earn $qt($calc(180 - %c)) more coins to become a Rank19. }
  122.       if (%c > 179) && (%c <= 189) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank19 with $qt(%c) coins. - Must earn $qt($calc(190 - %c)) more coins to become a Rank20. }
  123.       if (%c > 189) && (%c <= 199) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank20 with $qt(%c) coins. - Must earn $qt($calc(200 - %c)) more coins to become a Rank21. }
  124.       if (%c > 199) && (%c <= 209) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank21 with $qt(%c) coins. - Must earn $qt($calc(210 - %c)) more coins to become a Rank22. }
  125.       if (%c > 209) && (%c <= 219) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank22 with $qt(%c) coins. - Must earn $qt($calc(220 - %c)) more coins to become a Rank23. }
  126.       if (%c > 219) && (%c <= 229) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank23 with $qt(%c) coins. - Must earn $qt($calc(230 - %c)) more coins to become a Rank24. }
  127.       if (%c > 229) && (%c <= 239) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank24 with $qt(%c) coins. - Must earn $qt($calc(240 - %c)) more coins to become a Rank25. }
  128.       if (%c > 239) && (%c <= 249) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank25 with $qt(%c) coins. - Must earn $qt($calc(250 - %c)) more coins to become a Rank26. }
  129.       if (%c > 249) && (%c <= 259) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank26 with $qt(%c) coins. - Must earn $qt($calc(260 - %c)) more coins to become a Rank27. }
  130.       if (%c > 259) && (%c <= 269) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank27 with $qt(%c) coins. - Must earn $qt($calc(270 - %c)) more coins to become a Rank28. }
  131.       if (%c > 269) && (%c <= 279) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank28 with $qt(%c) coins. - Must earn $qt($calc(280 - %c)) more coins to become a Rank29. }
  132.       if (%c > 279) && (%c <= 289) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank29 with $qt(%c) coins. - Must earn $qt($calc(290 - %c)) more coins to become a Rank30. }
  133.       if (%c > 289) && (%c <= 299) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank30 with $qt(%c) coins. - Must earn $qt($calc(300 - %c)) more coins to become a Rank31. }
  134.       if (%c > 299) && (%c <= 309) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank31 with $qt(%c) coins. - Must earn $qt($calc(310 - %c)) more coins to become a Rank32. }
  135.       if (%c > 309) && (%c <= 319) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank32 with $qt(%c) coins. - Must earn $qt($calc(320 - %c)) more coins to become a Rank33. }
  136.       if (%c > 319) && (%c <= 329) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank33 with $qt(%c) coins. - Must earn $qt($calc(330 - %c)) more coins to become a Rank34. }
  137.       if (%c > 329) && (%c <= 339) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank34 with $qt(%c) coins. - Must earn $qt($calc(340 - %c)) more coins to become a Rank35. }
  138.       if (%c > 339) && (%c <= 349) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank35 with $qt(%c) coins. - Must earn $qt($calc(350 - %c)) more coins to become a Rank36. }
  139.       if (%c > 349) && (%c <= 359) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank36 with $qt(%c) coins. - Must earn $qt($calc(360 - %c)) more coins to become a Rank37. }
  140.       if (%c > 359) && (%c <= 369) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank37 with $qt(%c) coins. - Must earn $qt($calc(370 - %c)) more coins to become a Rank38. }
  141.       if (%c > 369) && (%c <= 379) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank38 with $qt(%c) coins. - Must earn $qt($calc(380 - %c)) more coins to become a Rank39. }
  142.       if (%c > 379) && (%c <= 389) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank39 with $qt(%c) coins. - Must earn $qt($calc(390 - %c)) more coins to become a Rank40. }
  143.       if (%c > 389) && (%c <= 399) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank40 with $qt(%c) coins. - Must earn $qt($calc(400 - %c)) more coins to become a Rank41. }
  144.       if (%c > 499) && (%c <= 409) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank41 with $qt(%c) coins. - Must earn $qt($calc(410 - %c)) more coins to become a Rank42. }
  145.       if (%c > 409) && (%c <= 419) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank42 with $qt(%c) coins. - Must earn $qt($calc(420 - %c)) more coins to become a Rank43. }
  146.       if (%c > 419) && (%c <= 429) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank43 with $qt(%c) coins. - Must earn $qt($calc(430 - %c)) more coins to become a Rank44. }
  147.       if (%c > 429) && (%c <= 439) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank44 with $qt(%c) coins. - Must earn $qt($calc(440 - %c)) more coins to become a Rank45. }
  148.       if (%c > 439) && (%c <= 449) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank45 with $qt(%c) coins. - Must earn $qt($calc(450 - %c)) more coins to become a Rank46. }
  149.       if (%c > 449) && (%c <= 459) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank46 with $qt(%c) coins. - Must earn $qt($calc(460 - %c)) more coins to become a Rank47. }
  150.       if (%c > 459) && (%c <= 469) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank47 with $qt(%c) coins. - Must earn $qt($calc(470 - %c)) more coins to become a Rank48. }
  151.       if (%c > 469) && (%c <= 479) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank48 with $qt(%c) coins. - Must earn $qt($calc(480 - %c)) more coins to become a Rank49. }
  152.       if (%c > 479) && (%c <= 489) { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user has Rank49 with $qt(%c) coins. - Must earn $qt($calc(490 - %c)) more coins to become a Rank50. }
  153.       if (%c > 499) && (%c >= 500 { msg $chan [ $+ $nick $+ ]: The $qt( $+ $2 $+ ) user is MAX Rank50 with $qt(%c) coins. }
  154.     }
  155.   }
  156. }
  157.  
  158. alias -l jac {
  159.   if ($status !== connected) { return }
  160.   var %n = $nick(#,0)
  161.   var %i = 1
  162.   while (%i <= %n) {
  163.     var %z = $nick(#,%i)
  164.     if ($nick(#,$me) = $nick(#,%z)) || (bot isin $nick(#,%i)) { goto next }
  165.     writeini -n coins.ini $nick(#,%i) coins $calc($readini(coins.ini,$nick(#,%i),coins) + 1)
  166.     :next
  167.     inc %i
  168.   }
  169. }
  170.  
  171. alias -l add.pts {
  172.   if ($status !== connected) { return }
  173.   writeini -n coins.ini $1 coins $calc($readini(coins.ini,$1,coins) + 1)
  174. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!