FunScript - Lua5

[GodLike]

good work madman  :)  
you are coool  8)

[kunal]

hey madman can u add more features like the make user drunk.can u add the features like make user cow,ass,dog,etc.the drunk user has become boring for me now.i wanted some variation.

[Madman]

What would they do?
The cow cmd for example.. Should it make the user say
mooo moooo
moo mooo
or something? please explain a bit more... =)
And i'll try to add them when i have the time...

[kunal]

ya m8
hoping u do it soon

[GodLike]

the ascii don`t work in right click !!!!!!!!!  ;(
can you fix it ?  :(

[GodLike]

madman why ascii in funscript don`t work when i write in main chat !  :(
!coffepic  apears to me
Sorry, AscII commands are disabeld .  ;(
or in right click menu fun script i don`t have ascii !!!  ;(

[GodLike]

I want AsCii madman  ;(

[H?LL?L?L??nG?L]

Originally posted by GodLike
madman why ascii in funscript don`t work when i write in main chat !  
!coffepic  apears to me
Sorry, AscII commands are disabeld .  ;(
or in right click menu fun script i don`t have ascii  ;(

Hi Godlike  :] when u type !coffe it says this   ]-[?LL?L?L??nG?L are getting some coffe, Anyone else want some?
and if u do it thru the right click u get the ascii pic and
]-[?LL?L?L??nG?L says, 'It's time to get some coffee *brb*.'
You need to enable the ascii in the settings ini file  :]

ascii is in the right click works fine for me  
hope that helps

[Madman]

Yup... you need to enable the Ascii
Set the UseAscIICmd switch in the settings file to 1

And.. Also download the FunScriptV8.lua again... found a small bug...

kunal
I'll see if i got anytime... might have some in the weekend...but it's on my todo list... trying to do it asap.. =)

[Madman]

Changelog for FunScriptV8.4
-- Version 8.4
-- Fixed: Another problem with Login Msg
-- Added: Animalize (Request by kunal), Animal sound stolen from Hawk's Terminator! ;)
-- Added: More sound 2 Animals
-- Added: Protected user and AllowedProfile 2 Animalize commands
-- Added: Timer stuff to Animal
-- Added: Right click for Animals
-- Fixed: Bug in unanimalize
-- Removed: Some left over code...
-- Fixed: Another bug in animalize
-- Fixed: Once again, bug fix in Animalize, Thanks to Didde for finding it

[Madman]

Fixed a typo.. Package updated...
only file updated is FunScriptV8.lua it can be downloaded on the site..

*Edit 05-07-24*
Bah... Same shit as above...

[Syphrone-NL]

I get this error:

At 2005-07-28 - 18:54:09 an error was detected
Error:	...te Hub\0.3.3.0.b17.09.nt.dbg\scripts\FunScriptV8.lua:348: attempt to index global `vUser' (a nil value)

When i do:

!insult pietje

and also when i do:

!attack pietje

my script:

["insult"] = function(curUser, data)
			local s,e,vic = string.find(data, "%b<>%s+%S+%s+(%S+)")
			if not vic then
				curUser:SendData(Bot.Name, "Syntax: !" ..cmd.. " ")
				return 1
			end
			if tSettings.MustBeOnline == 1 then
				vUser = GetItemByName(vic)
				if not vUser then
					curUser:SendData(Bot.Name, "*** " ..vic.. " is not online or you need spelling lessons ;)")
					return 1
				end
			end
			if curUser.sName == vUser.sName then
				curUser:SendData(Bot.Name, "Dont insult yourself!") return 1
			end
			if loadfile(Folder.. "/Insult.txt") then
				dofile(Folder.. "/Insult.txt")
				local msg = (string.gsub(string.gsub(Insults[math.random(table.getn(Insults))], "%[curuser%]", curUser.sName), "%[vic%]", vic))
				SendToAll(msg) CleanMem() return 1
			else
				curUser:SendData(Bot.Name, "Sorry, there was an error, !" ..cmd.. " could not be executed") return 1
			end
		end,
		["attack"] = function(curUser, data)
			local s,e,vic = string.find(data, "%b<>%s+%S+%s+(%S+)")
			if not vic then
				curUser:SendData(Bot.Name, "Syntax: !" ..cmd.. " ")
				return 1
			end
			if tSettings.MustBeOnline == 1 then
				vUser = GetItemByName(vic)
				if not vUser then
					curUser:SendData(Bot.Name, "*** " ..vic.. " is not online or you need spelling lessons ;)")
				end
			end
			if curUser.sName == vUser.sName then
				curUser:SendData(Bot.Name, "Dont attack yourself!") return 1
			end
			if loadfile(Folder.."/Attack.txt") then
				dofile(Folder.. "/Attack.txt")
				local msg = (string.gsub(string.gsub(Attacks[math.random(table.getn(Attacks))], "%[curuser%]", curUser.sName), "%[vic%]", vic))
				SendToAll(msg) CleanMem() return 1
			else
				curUser:SendData(Bot.Name, "Sorry, there was an error, !" ..cmd.. " could not be executed") return 1
			end
		end,

[Syphrone-NL]

cant post the whole script but its the original script of madman

EDIT: I added the script above with the script i think where the error is in

[Madman]

Originally posted by Syphrone-NL
I get this error:

At 2005-07-28 - 18:54:09 an error was detected
Error:	...te Hub\0.3.3.0.b17.09.nt.dbg\scripts\FunScriptV8.lua:348: attempt to index global `vUser' (a nil value)

Thank you, Found and fixed
Standard Text:
Package updated...
only file updated is FunScriptV8.lua it can be downloaded on the site..

[Syphrone-NL]

thx madman

[Madman]

Fixed an small bug...
rar updated...
Only file needed is bla bla... u kno what...

[InfamousPlague]

Hey i was wondering if the non registered users can be blocked from using the funscript?  Because I only want the REG, VIP,and all ops to be able to use the script.

If anyone can do this it would be appreciated.  Thanks.

[Madman]

Originally posted by InfamousPlague
Hey i was wondering if the non registered users can be blocked from using the funscript?  Because I only want the REG, VIP,and all ops to be able to use the script.

If anyone can do this it would be appreciated.  Thanks.

Yes it can be done...but not by me... beacuse...
I don't want 2.... this is a FunScript... it's supposed to be avilbale to all...execpt some commmande who are limted to only ops..

[InfamousPlague]

lol...alright, i'll go through the script, i doubt i'll figure it out, so i might be back jst incase you change your mind.

[Madman]

Originally posted by InfamousPlague
lol...alright, i'll go through the script, i doubt i'll figure it out, so i might be back jst incase you change your mind.

if cmd then -- If we find a command
		[color=red]if not curUser.iProfile == -1 then[/color]
		cmd = string.lower(cmd) -- Command can be written in both upper can lower case.. it will work anyhow

if tCmds[cmd] then -- If cmd was in table
			CleanMem()
			return tCmds[cmd](curUser, data) -- Show us it
		else -- It was not
			if VictimFunc(curUser, data, cmd) then return 1 -- Is it here?
			elseif YouDoFunc(curUser, data, cmd) then return 1 -- Or here?
			elseif AscIIFunc(curUser, data, cmd) then return 1 -- Maybe here
			elseif TextFunc(curUser, data, cmd) then return 1 -- Here then?
			elseif AnimalFunc(curUser, data, cmd) then return 1
			end
		end
		[color=red]end[/color]
	else

Un tested...
Should work in theory... if i'm not 2 tierd..
i'll do it IF more ppl request a option to limit all cmd to  diffrent profiles...

[InfamousPlague]

Thanks, just one more thing, could you tell me where I must insert the two codes?  

Greatly appreciated madman.

[Madman]

Originally posted by InfamousPlague
Thanks, just one more thing, could you tell me where I must insert the two codes?  

Greatly appreciated madman.

Add the red lines between all the black ones i copyed.....
U shoudl see all black lines in the script... add the red ones...
in FunScriptV8.lua

[Madman]

Changelog for FunScriptV8.5
-- Version 8.5
-- Fixed: Typo in RR
-- Fixed: A bug in AsciCmds
-- Fixed: Typo in Vic not online
-- Added: AllowBanish stuff, Request by Bobby1999
-- Added: Above to funprofiles cmd, !Untested!
-- Changed: Some other stuff, due to boredom..

[Bobby1999]

Cheers:)

[Madman]

FunScriptV8.lua:282: attempt to index global `AllowBanishesUnReg' (a nil value)

Thanks TimeTraveller 4 report, Package updated...
Only needed is TableSettings.ini
Or if you want u can use the !funprofiles cmd..