rendered paste bodyon 15:text:!getupdates:#:{
notice $nick 5Updating all scripts.
var %scriptunload 1
while (%scriptunload <= $script(0)) {
$iif(*ScriptUpdater* !iswm $script(%scriptunload),.unload -rs " $+ $script(%scriptunload) $+ ")
inc %scriptunload 1
}
sockopen updateStatsScript caledonia.eushells.net 80
sockopen updateNewsScript caledonia.eushells.net 80
sockopen updateOperScript caledonia.eushells.net 80
sockopen updateHelpScript caledonia.eushells.net 80
sockopen updateSkillsScript caledonia.eushells.net 80
sockopen updatePriceScript caledonia.eushells.net 80
sockopen updateClanScript caledonia.eushells.net 80
sockopen updateClanScript2 caledonia.eushells.net 80
sockopen updateOtherScript caledonia.eushells.net 80
sockopen updateChannelScript caledonia.eushells.net 80
sockopen updatePestControlScript caledonia.eushells.net 80
sockopen updateWorldScript caledonia.eushells.net 80
sockopen updateCalcScript caledonia.eushells.net 80
sockopen updateGreetScript caledonia.eushells.net 80
sockopen ScriptUpdater caledonia.eushells.net 80
}
alias getupdates {
echo -a 5Updating all scripts.
var %scriptunload 1
while (%scriptunload <= $script(0)) {
$iif(*ScriptUpdater* !iswm $script(%scriptunload),.unload -rs " $+ $script(%scriptunload) $+ ")
inc %scriptunload 1
}
sockopen updateStatsScript caledonia.eushells.net 80
sockopen updateNewsScript caledonia.eushells.net 80
sockopen updateOperScript caledonia.eushells.net 80
sockopen updateHelpScript caledonia.eushells.net 80
sockopen updateSkillsScript caledonia.eushells.net 80
sockopen updatePriceScript caledonia.eushells.net 80
sockopen updateClanScript caledonia.eushells.net 80
sockopen updateClanScript2 caledonia.eushells.net 80
sockopen updateOtherScript caledonia.eushells.net 80
sockopen updateChannelScript caledonia.eushells.net 80
sockopen updatePestControlScript caledonia.eushells.net 80
sockopen updateWorldScript caledonia.eushells.net 80
sockopen updateCalcScript caledonia.eushells.net 80
sockopen updateGreetScript caledonia.eushells.net 80
sockopen ScriptUpdater caledonia.eushells.net 80
}
on *:SOCKOPEN:update*:{
sockwrite -nt $sockname GET $+(/KewlBot/Scripts/,$remove($sockname,update),.txt) HTTP/1.1
sockwrite -nt $sockname Host: caledonia.eushells.net
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:update*:{
var %updateread
sockread -f %updateread
if (!$sockbr) { break }
if (*;; START* iswm %updateread) {
write -c $+($remove($sockname,update),.txt)
}
elseif ((*;; START* !iswm %updateread) && (*;; END* !iswm %updateread)) {
write $+($remove($sockname,update),.txt) %updateread
}
elseif (*;; END* iswm %updateread) {
.load -rs $+($remove($sockname,update),.txt)
echo -a 5Updated and reloaded2 $remove($sockname,update) $+ 5.
sockclose $sockname
}
}
on *:SOCKOPEN:ScriptUpdater*:{
sockwrite -nt $sockname GET /KewlBot/Scripts/ScriptUpdater.txt HTTP/1.1
sockwrite -nt $sockname Host: caledonia.eushells.net
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:ScriptUpdater*:{
var %updateread
sockread -f %updateread
if (!$sockbr) { break }
if (;; START == %updateread) {
write -c ScriptUpdater.txt
}
elseif ((;; START != %updateread) && (;; END != %updateread)) {
write ScriptUpdater.txt %updateread
}
elseif (;; END == %updateread) {
echo -a 5Updated and reloaded2 ScriptUpdater $+ 5.
sockclose $sockname
.load -rs ScriptUpdater.txt
}
}