on $*:text:/^[!@.]pcw|world/Si:#: {
if (!%pc) notice $nick The pc-world is not set
elseif (%flooods. [ $+ [ $nick ] ] == 1) notice $nick You just queried the pc-world. Please wait 5 seconds.
else {
set %flooods. [ $+ [ $nick ] ] 1
timer 1 2 notice $nick The current pc-world is: %pc - Last update: $duration($calc($ctime - %pcc)) ago
timer 1 5 unset %flooods. [ $+ [ $nick ] ]
}
}
on $*:text:/^[!@.]set pcw */Si:#: {
if ($nick isop #) || ($nick ishop #) {
set %pcc $ctime
set %pc $3-
notice $nick The new pc-world has been set as %pc
if (%pcstop. [ $+ [ $chan ] ] == 1) halt
else {
/amsg [4Pc-World Update1] New world: $3-
topic #propc 4,5/5,4\4,5/5,4\4,5/5,4\1,5W1,4e1,5l1,4c1,5o1,4m1,5e1,4 1,5t1,4o1,5 1,4P1,5r1,4o1,5 1,4P1,5c1,4,1,5 1,4C1,5u1,4r1,5r1,4e1,5n1,4t1,5 1,4w1,5o1,4r1,5l1,4d1,5:1,4 1,0| $+ $3 $+ |4,5/5,4\4,5/5,4\4,5/5,4\1,0 Commands = "!pcw" or "!world
notice $nick 4You have changed the ProPC Channel Topic to World $3
topic #pq-hq 1Welcome to 4#pc-hq 1¤ 12http://pc-hq.tk 1¤1 1Current PC World -4 651. ¤ Use 4/topic #pc-hq1 or 4!pcw1 (not loaded 24/7) to get the current world. Check out our affilates channel 4#hq. Founder: 4I__Drew__I.
notice $nick 4You have changed th e PcHQ Channel Topic to World $3
}
}
}