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
2 guests & no users online
10
points ]
 (1 vote)
Created 2019-10-16 01:26
5 days 20 hours ago
15
points ]
 (2 votes)
Created 2019-10-11 23:29
1 week 2 days ago
Gangler
17
points ]
 (2 votes)
Created 2019-10-10 16:26
1 week 4 days ago
26
points ]
 (3 votes)
Created 2019-10-08 02:25
1 week 6 days ago
5
points ]
 (1 vote)
Created 2019-10-08 13:32
1 week 6 days ago
Gangler
42
points ]
 (5 votes)
Created 2019-09-23 23:48
3 weeks 6 days ago
Fatality
39
points ]
 (4 votes)
Created 2019-09-28 02:57
3 weeks 2 days ago
Fatality
39
points ]
 (5 votes)
Created 2019-08-13 23:33
9 weeks 5 days ago
Fatality
55
points ]
 (6 votes)
Created 2019-08-13 23:36
9 weeks 5 days ago
RaZgRiZ
40
points ]
 (4 votes)
Created 2019-08-05 17:12
11 weeks 5 hours ago
27
points ]
 (3 votes)
Created 2018-02-13 11:00
1 year 35 weeks ago
87
points ]
 (9 votes)
Created 2011-09-04 02:41
8 years 7 weeks ago
20
points ]
 (2 votes)
Created 2019-06-25 17:55
16 weeks 6 days ago
30
points ]
 (3 votes)
Created 2019-05-17 21:51
22 weeks 3 days ago
Kretrens
44
points ]
 (5 votes)
Created 2019-05-08 05:38
23 weeks 5 days ago
Sauce
45
points ]
 (5 votes)
Created 2018-08-22 19:15
1 year 8 weeks ago
65
points ]
 (8 votes)
Created 2018-07-12 17:59
1 year 14 weeks ago
7YearBitch
47
points ]
 (6 votes)
Created 2019-03-07 23:20
32 weeks 3 days ago
Ao1 Pointblank
57
points ]
 (6 votes)
Created 2019-04-28 17:57
25 weeks 1 day ago
17
points ]
 (2 votes)
Created 2018-12-04 15:42
45 weeks 6 days ago
Who's new
  • Antknee55
  • gmiz
  • impala97
  • Fixxxer
  • Gangler