Leetex | 2013-05-25 17:13
Hashtagger (fun script)
Hashtagger (fun script)

Hello,

this script adds hashtags (like on Twitter) to your chat messages. The way how it works, it picks randomly some words out of your written message and adds a hashtag. It is a pure fun script without any deeper sense.

The default binds will be taken, T for chat, Y for team chat. If you press one of those buttons, something like "/t " or "/tt " will appear in your chat line. This is absolutely required, because those are the commands for picking hashtags. You can also perform a command (for example, "/t /setmaster 1" would work). If you don't want to add hashtags, just delete the "/t ".

If you want to reset the binds, use:

/bind T [saycommand];
/bind Y [sayteamcommand];

I know, the way with the "/t " commands isn't very proper, but I had no idea how I could do it otherwise. If you have a better way, please tell me.

t = [
	alias original "";
	
	loop i $numargs [
		original = (concatword $original (getalias (concatword "arg" (+ $i 1))) " ");
	];
	
	translate_and_say_text 1 $original;
];

tt = [
	alias original "";
	
	loop i $numargs [
		original = (concatword $original (getalias (concatword "arg" (+ $i 1))) " ");
	];
	
	translate_and_say_text 0 $original;
];

translate_and_say_text = [
	if (> $numargs 1) [
		if (= (strcmp (substr $arg2 0 1) "/") 1) [
			perform_command (substr $arg2 1 (- (strlen $arg2) 1));
		] [
			alias words "";
			
			loop i (rnd (div (listlen $arg2) 2)) [
				alias word (at $arg2 (rnd (- (listlen $arg2) 1)));
				
				if (= (strstr $words $word) -1) [
					words = (concatword $words $word " ");
				];
			];
			
			alias text $arg2;
			
			looplist i $words [
				text = (concatword $text "#" $i " ");
			];
			
			if (= $arg1 1) [
				say $text;
			] [
				sayteam $text;
			];
		];
	];
];

perform_command = [
	if ($numargs > 0) [
		do $arg1;
	];
];

bind T [
	saycommand "/t ";
];

bind Y [
	saycommand "/tt ";
];
hashtagger.cfg (1.07 KB)
0
points
 (0 votes)
User login
Users on Quadropolis
1 guest & 1 user online
MisanthropX
55
points ]
 (6 votes)
Created 2019-12-05 20:57
5 days 4 hours ago
Redon
95
points ]
 (10 votes)
Created 2019-10-24 21:41
6 weeks 5 days ago
Created 2019-10-26 11:09
6 weeks 3 days ago
25
points ]
 (3 votes)
Created 2019-10-11 23:29
8 weeks 4 days ago
10
points ]
 (1 vote)
Created 2019-10-16 01:26
8 weeks 11 min ago
Gangler
17
points ]
 (2 votes)
Created 2019-10-10 16:26
8 weeks 5 days ago
34
points ]
 (4 votes)
Created 2019-10-08 02:25
9 weeks 23 hours ago
5
points ]
 (1 vote)
Created 2019-10-08 13:32
9 weeks 12 hours ago
Gangler
42
points ]
 (5 votes)
Created 2019-09-23 23:48
11 weeks 1 day ago
Fatality
39
points ]
 (4 votes)
Created 2019-09-28 02:57
10 weeks 3 days ago
Fatality
39
points ]
 (5 votes)
Created 2019-08-13 23:33
17 weeks 2 hours ago
Fatality
55
points ]
 (6 votes)
Created 2019-08-13 23:36
17 weeks 2 hours ago
RaZgRiZ
40
points ]
 (4 votes)
Created 2019-08-05 17:12
18 weeks 1 day ago
27
points ]
 (3 votes)
Created 2018-02-13 11:00
1 year 42 weeks ago
87
points ]
 (9 votes)
Created 2011-09-04 02:41
8 years 14 weeks ago
20
points ]
 (2 votes)
Created 2019-06-25 17:55
24 weeks 7 hours ago
30
points ]
 (3 votes)
Created 2019-05-17 21:51
29 weeks 4 days ago
Kretrens
44
points ]
 (5 votes)
Created 2019-05-08 05:38
30 weeks 6 days ago
Sauce
54
points ]
 (6 votes)
Created 2018-08-22 19:15
1 year 15 weeks ago
65
points ]
 (8 votes)
Created 2018-07-12 17:59
1 year 21 weeks ago
Who's new
  • Antknee55
  • gmiz
  • impala97
  • Fixxxer
  • Gangler