Print Page - Script

Title: Script
Post by: Intel on 22 January, 2004, 16:20:00

Hello guys,
I need a script which can clear the main chat for all, is that possible in anyways ?

Title:
Post by: [T-G-T]M@sto on 22 January, 2004, 16:40:08

QuoteOriginally posted by Intel
Hello guys,
I need a script which can clear the main chat for all, is that possible in anyways ?

I just made a trigger called Clear and added 60 empty lines. When i need to clear mainchat i just type !clear

Title:
Post by: pHaTTy on 22 January, 2004, 16:43:45

QuoteOriginally posted by [T-G-T]M@sto
QuoteOriginally posted by Intel
Hello guys,
I need a script which can clear the main chat for all, is that possible in anyways ?
I just made a trigger called Clear and added 60 empty lines. When i need to clear mainchat i just type !clear

60!!! LOL :)))

Title:
Post by: [T-G-T]M@sto on 22 January, 2004, 17:39:21

just to make sure the screen is clear LOL
Who want to scroll 60 lines back - Not me

Title:
Post by: Intel on 22 January, 2004, 22:28:40

nice cant u post the script here ?

Title:
Post by: Intel on 23 January, 2004, 14:36:12

how can i do so that !modt then it will show the modt and in that way the screen gets clear too, cause people will think they have got reconnected to the hub :P
phatty help me buddy

Title:
Post by: plop on 24 January, 2004, 04:36:03

i'll try 2 be phatty in this post. lol

Code Select

Bot = "I'm_phatty"

function DataArrival(user, data)
   data=strsub(data,1,strlen(data)-1) 
   if( strsub(data, 1, 1) == "<" ) then
      s,e,cmd = strfind(data,"%b<>%s+(%S+)") 
      if cmd=="!motd" then
         showtext(user)
         return 1
      end
   end
end

function showtext(user)
	local handle = openfile("../motd.txt", "r")
	local contents = gsub(read(handle, "*a"),strchar(10), "\r\n")
	closefile (handle)
	user:SendData(Bot, "\r\n"..contents.."\r\n|")
end

plop eeeehm phatty (damn nearly made a mistake @ the end)

Title:
Post by: pHaTTy on 24 January, 2004, 04:46:38

LOL hahahahaha :p

no you dont pass, ur tabbing is differ to mine :P

Title:
Post by: pHaTTy on 24 January, 2004, 04:48:45

my tabbing

Code Select


Bot = "I'm_Plop"

function showtext(user)
	local handle = openfile("../motd.txt", "r")
	local contents = gsub(read(handle, "*a"),strchar(10), "\r\n")
	closefile (handle)
	user:SendData(Bot, "\r\n"..contents.."\r\n|")
end

function DataArrival(user, data)
	data=strsub(data,1,strlen(data)-1) 
	if( strsub(data, 1, 1) == "<" ) then
		local s,e,cmd = strfind(data,"%b<>%s+(%S+)") 

		if cmd == "!motd" then
			showtext(user)
		return 1
		end
	end
end

Title:
Post by: plop on 24 January, 2004, 15:35:31

QuoteOriginally posted by (uk-kingdom)pH?tt?
LOL hahahahaha :p

no you dont pass, ur tabbing is differ to mine :P

damn. lol
your using something else then titmouse then.
that tabs with 3 spaces.

plop

Title:
Post by: pHaTTy on 24 January, 2004, 16:04:15

QuoteOriginally posted by plop
QuoteOriginally posted by (uk-kingdom)pH?tt?
LOL hahahahaha :p

no you dont pass, ur tabbing is differ to mine :P
damn. lol
your using something else then titmouse then.
that tabs with 3 spaces.

plop

i always use the ptokax script box ;)

PtokaX forum

Archive => Archived 4.0 boards => Request for Lua 4 scripts => Topic started by: Intel on 22 January, 2004, 16:20:00