Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on $*:text:/^!sv (\d+(\.\d+)?|\S+(\.\S+)?)$/:*: {
- if ($me == charm) {
- var %s 1
- :start
- if (%s <= $numtok($regml(1),46)) tokenize 32 !sv $gettok($regml(1),%s,46)
- if ($remove($regml(1),.) isnum) {
- var %search 1
- while (%search <= $var(%sv*,0)) {
- if ($2 == $gettok($var(%sv*,%search).value,1,32)) {
- msg $iif(#,#,$nick) $right($var(%sv*,%search).name,-3) $chr(124) $2 $chr(124) $gettok($var(%sv*,%search).value,2-,32)
- var %matches yes
- }
- inc %search
- }
- }
- else {
- if (%sv [ $+ [ $2 ] ] != $null) msg $iif(#,#,$nick) $2 $chr(124) $gettok(%sv [ $+ [ $2 ] ],1,32) $chr(124) $gettok(%sv [ $+ [ $2 ] ],2-,32)
- else msg $iif(#,#,$nick) No matches were found.
- }
- if (%s < $numtok($regml(1),46)) {
- inc %s
- goto start
- }
- elseif (%search > $var(%sv*,0) && %matches != yes) msg $iif(#,#,$nick) No matches were found.
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement