Channel whois
By: Guest | Date: Jan 3 2012 14:10 | Format: mIRC Scripting | Expires: never | Size: 1.84 KB | Hits: 1000
- raw 319:*: {
- var %aantal = $numtok($3-,32)
- var %i = 0
- while (%i <= %aantal) {
- unset %tocheck
- var %cur = $gettok($3-,%i,32)
- ; 45 - 33 ! 60 <
- if ($asc($left(%cur,1)) == 45 || $asc($left(%cur,1)) == 33 || $asc($left(%cur,1)) == 60) {
- %tocheck = $mid(%cur,2)
- }
- if ($asc($left(%tocheck,1)) == 45 || $asc($left(%tocheck,1)) == 33 || $asc($left(%tocheck,1)) == 60) {
- %tocheck = $mid(%tocheck,2)
- }
- if ($asc($left(%tocheck,1)) == 45 || $asc($left(%tocheck,1)) == 33 || $asc($left(%tocheck,1)) == 60) {
- %tocheck = $mid(%tocheck,2)
- }
- if (%tocheck) %toshow = %cur
- else {
- %tocheck = %cur
- %toshow = $mid(%cur,2,300)
- }
- var %wchan = $remove(%cur, $gettok(%cur, 1, 35))
- if ($left(%tocheck,1) == @ || $left(%tocheck,2) == :@) {
- var %op = %op %toshow
- }
- elseif ($left(%tocheck,1) == +) {
- var %voice = %voice %toshow
- }
- elseif ($left(%tocheck,1) == %) {
- }
- elseif ($left(%tocheck,1) == &) {
- var %admin = %admin %toshow
- }
- elseif ($left(%tocheck,1) == ~) {
- var %owner = %owner %toshow
- }
- else {
- if ($left(%tocheck,1) == $chr(35)) {
- var %regged = %regged %cur
- }
- }
- inc %i
- }
- halt
- }
Latest pastes
7 minutes ago
7 hours ago
2 days ago
3 days ago
6 days ago