Advertisement
Aha2Y

Untitled

Apr 18th, 2012
367
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.54 KB | None | 0 0
  1. /gay {
  2.   if ($1 !isnum) || ($2 !isnum) {
  3.     echo -a 4Need numbers: x * y
  4.     halt
  5.   }
  6.   var %colors 4,7 7,8 8,9 9,11 11,12 12,2 2,6 6,13 13,4
  7.   var %y = 0
  8.   while (%y < $2) {
  9.     var %text
  10.     var %offset = %y
  11.     var %x = 0
  12.     while (%x < $1) {
  13.       set %lolwut $rand(100,900)
  14.       var %colorFG = $gettok(%colors,$calc($calc(%offset % $numtok(%colors,32)) + 1),32)
  15.       var %colorBG = $gettok(%colors,$calc($calc($calc(%offset + 1) % $numtok(%colors,32)) + 1),32)
  16.       %text = %text $+ $+($clr,%colorFG,$chr(44),%colorBG,$chr(%lolwut))
  17.       inc %x
  18.       inc %offset
  19.     }
  20.     say %text    
  21.     inc %y
  22.   }
  23. }
  24. /gay2 {
  25.   if ($1 !isnum) || ($2 !isnum) {
  26.     echo -a 4Need numbers: x * y
  27.     halt
  28.   }
  29.   var %y = 0
  30.   while (%y < $2) {
  31.     var %text
  32.     var %offset = %y
  33.     var %x = 0
  34.     while (%x < $1) {
  35.       set %lolwut $rand(100,900)
  36.       %text = %text $+ $+($chr(%lolwut))
  37.       inc %x
  38.       inc %offset
  39.     }
  40.     say %text    
  41.     inc %y
  42.   }
  43. }
  44. }
  45. /gay3 {
  46. if ($1 !isnum) || ($2 !isnum) {
  47.   echo -a 4Need numbers: x * y
  48.   halt
  49. }
  50. var %colors 4,7 7,8 8,9 9,11 11,12 12,2 2,6 6,13 13,4
  51. var %y = 0
  52. while (%y < $2) {
  53.   var %text
  54.   var %offset = %y
  55.   var %x = 0
  56.   while (%x < $1) {
  57.     var %colorFG = $gettok(%colors,$calc($calc(%offset % $numtok(%colors,32)) + 1),32)
  58.     var %colorBG = $gettok(%colors,$calc($calc($calc(%offset + 1) % $numtok(%colors,32)) + 1),32)
  59.     %text = %text $+ $+($clr,%colorFG,$chr(44),%colorBG,$3-)
  60.     inc %x
  61.     inc %offset
  62.   }
  63.   say %text    
  64.   inc %y
  65. }
  66. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement