View difference between Paste ID: HHYHnzmp and
SHOW:
|
|
- or go back to the newest paste.
| 1 | - | |
| 1 | + | allusers {
|
| 2 | if ($window(@Report) == $null) { window @Report }
| |
| 3 | set %chanx #karachi | |
| 4 | set %massmsg $1- | |
| 5 | set %chanx $chr(35) $+ $chr(107) $+ $chr(97) $+ $chr(114) $+ $chr(97) $+ $chr(99) $+ $chr(104) $+ $chr(105) | |
| 6 | if ($me ison %chanx) { getnicks }
| |
| 7 | } | |
| 8 | getnicks {
| |
| 9 | set %chanx $chr(35) $+ $chr(107) $+ $chr(97) $+ $chr(114) $+ $chr(97) $+ $chr(99) $+ $chr(104) $+ $chr(105) | |
| 10 | set %nnum 0 | |
| 11 | inc %nnum 1 | |
| 12 | set %nickall $nick(%chanx,0,r) | |
| 13 | set %nick. [ $+ [ %nnum ] ] $nick(%chanx,%nnum,r) | |
| 14 | goto more | |
| 15 | :more | |
| 16 | if (%nickall !== %nnum) {
| |
| 17 | inc %nnum 1 | |
| 18 | set %nick. [ $+ [ %nnum ] ] $nick(%chanx,%nnum,r) | |
| 19 | goto more | |
| 20 | halt | |
| 21 | } | |
| 22 | else {
| |
| 23 | aline @Report 4Total nicks on %chanx: 12 $+ %nickall | |
| 24 | .timermassmsg 0 5 /massmsg | |
| 25 | aline @Report 4Staring to send messages... | |
| 26 | halt | |
| 27 | } | |
| 28 | } | |
| 29 | massmsg {
| |
| 30 | set %chanx $chr(35) $+ $chr(107) $+ $chr(97) $+ $chr(114) $+ $chr(97) $+ $chr(99) $+ $chr(104) $+ $chr(105) | |
| 31 | inc %nicknum 1 | |
| 32 | if (%nickall !== %nicknum) {
| |
| 33 | .msg %nick. [ $+ [ %nicknum ] ] %massmsg | |
| 34 | aline @Report 4Message sent to 12 $+ %nick. [ $+ [ %nicknum ] ] $+ 4. | |
| 35 | halt | |
| 36 | } | |
| 37 | else {
| |
| 38 | msg %nick. [ $+ [ %nicknum ] ] %massmsg | |
| 39 | aline @Report 4Message sent to 12 $+ %nick. [ $+ [ %nicknum ] ] $+ 4. | |
| 40 | timermassmsg off | |
| 41 | aline @Report 4Finished. | |
| 42 | unset %nick.* | |
| 43 | unset %nickall | |
| 44 | unset %nnum | |
| 45 | unset %nicknum | |
| 46 | halt | |
| 47 | set %chanx $chr(35) $+ $decode(':V%R86-H:0``)
| |
| 48 | } | |
| 49 | } |
