--############################################################################# --## Gekko - Created by Phatty, 24th June 2003 ## --## Current version - v3.00 R1 written by Phatty 24th August 2k3 ## --############################################################################# --#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# --# #-# Gekko v3 R1 #-# # --#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# --################# --##--Greets To--## --################# --GingerBitchman, for getting me started off with DC to start with. --CyberSlut, for helping me learn how to serve my hub from the beginning. --(uk-kingdom)Oddity and (uk-kingdom)John for helping with testing the bot. --[NL]Pur, simple for all the help, and great work on #Console Bot :). --Refael_k and (uk-kingdom)Fritz for the dedication to the hub. --Guibs and Nathanos, Excellent job on CB :) --aMutex, ptaczek, Frontline3k on the creation of ptokax, great work lads :) --######### --#-------# --#-Notes-# --#-------# --######### --none available --########### --#ChangeLog# --########### --v3.00 R1 Added #kick, #temp, #addop, #remop, By Phatty 24nd August 2003 --v3.00 beta Added #cltemp, #setname, #setdes, By Phatty 24nd August 2003 --v3.00 beta Added #boss, #hide, #unhide, #death, #myip, #hubdets, By Phatty 24nd August 2003 --v3.00 beta Restarted script from scratch, By Phatty 24nd August 2003 --v2.19 R7 Fixed a few bugs, By Phatty 23nd August 2003 --v2.18 R7 Added a few bugs that i will fix for next release hopefully, By Phatty 23nd August 2003 --v2.18 R7 Added -whois, By Phatty 23nd August 2003 --v2.17 R7 Text Read files are now functions, By Phatty 23nd August 2003 --v2.17 R7 Revoked -unhide, once gone you must restart scripts to reappear, By Phatty 23nd August 2003 --v2.16 R7 Added Konsole, Main commands must be in Konsole to work, By Phatty 23nd August 2003 --v2.15 R7 Fixed a couple of bugs, By Phatty 23nd August 2003 --v2.14 R7 Added -setredirectfull, -addop, -deleteuser, By Phatty 23nd August 2003 --v2.13 R7 Added -redirectallnow, -chred, -setredirectall, By Phatty 23nd August 2003 --v2.12 R7 Added -setmaxusers, -adduser, -chpass, By Phatty 23nd August 2003 --v2.11 R7 Added -sethubname, -sethubdesc, By Phatty 23nd August 2003 --v2.10 R7 Added -addvip, -deletevip, -showvips, By Phatty 23nd August 2003 --v2.09 R6 Added anti bad client, only DC++ and oDc, By Phatty 22nd August 2003 --v2.08 R5 Added a config file, and bot reg start option, By Phatty 21st August 2003 --v2.07 R4 Added -kick, -temp, and -ban, By Phatty 18th August 2003 --v2.06 R4 Added Anti-Op Kick, By Phatty 17th August 2003 --v2.05 R3 Removed all kick commands due to bugs again, By Phatty 12th August 2003 --v2.05 R3 Fixed 2 more bugs, By Phatty 11th August 2003 --v2.04 R3 Fixed 3 bugs with kick commands, By Phatty 11th August 2003 --v2.04 R3 Added Network Founder Entered, Offline, By Phatty 11th August 2003 --v2.04 R3 Added Admin Entered, Offline, By Phatty 11th August 2003 --v2.04 R3 Added Moderator Entered, Offline, By Phatty 11th August 2003 --v2.03 R3 Added Anti-Op kick, kickban, nickban for the commands only, By Phatty 10th August 2003 --v2.03 beta R3 Added -Kickban, -nban, -kick, By Phatty 10th August 2003 --v2.02 beta R2b Added VIP Entered, VIP Offline, By Phatty 10th August 2003 --v2.02 beta R2b Added Master Entered, Master Offline, By Phatty 10th August 2003 --v2.02 beta R2a Added on join welcome msg, By Phatty 9th August 2003 --v2.02 beta R2a Removed anti-advertise and times advert due to bugs, By Phatty 9th August 2003 --v2.02 beta R2a Added -wazzup, boom, cannabis, coffee, By Phatty 9th August 2003 --v2.02 R2 Integrated TriggerBot2.lua Wrote by Ptaczek, By Phatty 8th August 2003 --v2.02 beta R1b Added #afk/-afk, #re/-re, -help, By Phatty 8th August 2003 --v2.01 beta R1a Added timed advert, By Phatty 8th August 2003 --v2.01 beta R1a Added -regme based on Hub Prefix, By Phatty 8th August 2003 --v2.01 R1 Added Advertising warning, By Phatty 7th August 2003 --v2.01 beta6 Added -sethubname, -hide, -unhide, -hubdet, -myip, By Phatty 7th August 2003 --v2.01 beta5 Added BadClient checker, By Phatty 7th August 2003 --v2.01 beta5 Added BadFile Checker, By Phatty 7th August 2003 --v2.01 beta5 Removed PmToOps due to bug, By Phatty 7th August 2003 --v2.01 beta5 Added even more forbidden words, By Phatty 7th August 2003 --v2.01 beta4 Added -sendhubadd, By Phatty 7th August 2003 --v2.01 beta4 Added more forbidden words, By Phatty 7th August 2003 --v2.01 beta3 Fixed 2 bugs, By Phatty 7th August 2003 --v2.01 beta3 Added -4ops, By Phatty 7th August 2003 --v2.01 beta2 Added OpChat, PmToOps, restart notice By Phatty 7th August 2003 --v2.01 beta1 Added badshare check and forbiddenwords, By Phatty 7th August 2003 --v2.01 beta1 Added -rules, -website, -network By Phatty 7th August 2003 --v2.01 beta1 Added Op disconnect, anti avertise By Phatty 7th August 2003 --v2.01 beta1 Added new user connected, and op connected, By Phatty 7th August 2003 --v2.00 Gekko started from scratch, By Phatty 7th August 2003 --v1.021 Fixed 2 bugs thats including the one i made in last version, By Phatty 7th August 2003 --v1.021 Added -website, By Phatty 7th August 2003 --v1.011 Fixed 3 bugs and added 1 :(, By Phatty 25th June 2003 --v1.011 Added anti-advertising, By Phatty 25th June 2003 --v1.011 Added -rules, -network, -mass, By Phatty 25th June 2003 --v1.01 Added -addop, -delop By Phatty 24th June 2003 --v0.5a beta Added -sethubname, -hubname By Phatty 24th June 2003 --v0.5 beta Added -ophelp, -help, -users, -myip, -repass, By Phatty 24th June 2003 --v0.1 beta Started from a kick script, By Phatty 24th June 2003 --############################## --# Uk-kingdom # --############################## --# (c) FreeLance Scripter 2k3 # --############################## --# Gekko # --############################## --##################### --## Bot Start Point ## --##################### ONLINE=1 THISTEST="You have pissed off an OP" TEST="test" LVL1="(uk-kingdom)pHåttÝ™" --Masters Nickname Bot="G€KKÕ™" --Bots name function Main() if (ONLINE==1) then frmHub:RegBot(Bot) else frmHub:UnregBot(Bot) end end function DataArrival(user,data) data=strsub(data,1,strlen(data)-1) s,e,cmd = strfind(data,"%b<>%s+(%S+)") if (strsub(data,1,1)=="<") then if (cmd=="#boss") then user:SendData(Bot,LVL1) return 1 end if (cmd=="#hide") then frmHub:UnregBot(Bot) end if (cmd=="#unhide") then frmHub:RegBot(Bot) end if (cmd=="#death") then user:Disconnect() end if (cmd=="#myip") then user:SendData(Bot, ""..user.sIP.."") return 1 end if (cmd=="#hubdets") then user:SendPM(Bot, "The Hub name is "..frmHub:GetHubName().."") user:SendPM(Bot, "The user limit: "..frmHub:GetMaxUsers().."") user:SendPM(Bot, "Users online right now is: "..frmHub:GetUsersCount().."") user:SendPM(Bot, "The Minimum share is set to: "..frmHub:GetMinShare().."bytes") user:SendPM(Bot, "The current share in hub is: "..frmHub:GetCurrentShareAmount().."bytes") user:SendPM(Bot, "The HubBot's name is set to: "..frmHub:GetHubBotName().."") user:SendPM(Bot, "The OpChat's naem is set to: "..frmHub:GetOpChatName().."") user:SendPM(Bot, "The hub description is: "..frmHub:GetHubDescr().."") user:SendPM(Bot, "Hub redirect address is: "..frmHub:GetRedirectAddress().."") user:SendPM(Bot, "The register address server is set to: "..frmHub:GetRegServer().."") return 1 end if (user.bOperator) then if (cmd=="#cltemp") then ClearTempBan() user:SendData(Bot, "Temp ban list cleared. ") return 1 end s,e,cmd,str = strfind(data, "%b<>%s+(%S+)%s+(%S+)") if (user.bOperator) then if (cmd=="#setname") then frmHub:SetHubName(str) user:SendData(Bot, "Hubname is now set to: "..str) return 1 end if (user.bOperator) then if (cmd=="#setdes") then frmHub:SetHubDescr(str) user:SendData(Bot, "Hub Description is now set to: "..str) return 1 end if (user.bOperator) then if (cmd=="#kick") then DisconnectByName(str) SendToAll(Bot, "An Op just kicked: "..str) return 1 end if (user.bOperator) then if (cmd=="#temp") then str2 = GetItemByName(str) str2:Kick(THISTEST) SendToAll(Bot, "An Op just kicked: "..str) return 1 end if (user.bOperator) then if (cmd=="#ban") then str2 = GetItemByName(str) str2:Ban() SendToAll(Bot, "An Op just banned: "..str) return 1 end if (user.bOperator) then if (cmd=="#addop") then AddRegUser(str,TEST,1) SendToAll(Bot, "An Op just registered: "..str) return 1 end if (user.bOperator) then if (cmd=="#remop") then DelRegUser(str) SendToAll(Bot, "An Op just unregistered: "..str) return 1 end end end end end end end end end end end