|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
So I'm trying to make a script for my bot that spits out colorbars. I usually make them myself, but since this has become tedious, I decided that I'd automate the process. It's supposed to work where you specify the colors and your name, IE !colorbar 1 2 3 4 Mpot. Any ideas why it's not working? on 1:text:!colorbar*:#: msg $chan $$1,0"¼0,$$1¼»$$2,$$1"¼$$1,$$2¼»$$3,$$2"¼$$2,$$3¼»$$3,$$3"¼$$3,$$3¼»$$4,$$3"¼$$3,$$4¼»1,1%%%%%%0 $$5 $$4,$$4%%%%%%$$3,$$4"¼$$4,$$3¼»$$3,$$3"¼$$3,$$3¼»$$2,$$3"¼$$3,$$2¼»$$1,$$2"¼$$2,$$1¼»0,$$1"¼$$1,0¼»
The ¼ is part of the bar itself, makes it look pretty. Say I picked colors 11, 12, 2, and 10. And my name is Mpot. I'd go !colorbar 11 12 2 10 Mpot and I should get something back looking like this:
Last edited by Mpot; 18/09/07 10:10 PM.
|
|
|
|
Joined: Dec 2002
Posts: 503
Fjord artisan
|
Fjord artisan
Joined: Dec 2002
Posts: 503 |
You can't squish things like this against the $ symbols. You need to $+ things together (or $+()). i.e.
on 1:text:!colorbar*:#: msg $chan $+ $$1,0"¼0, $+ $$1 $+ ¼»...
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I'm still a little confused. Could you edit the entire script in that manner? I think I might be able to study it a little better in a completed fashion.
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
on 1:text:!colorbar *:#: {
if (!$5) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 nick | return }
msg $chan $+(,$1,$chr(44),0"¼0,$chr(44),$1¼»,$2,$chr(44),$1"¼,$1,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$3,$chr(44),$3"¼,$3,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4,------,0 $5,,$4,$chr(44),$4,-----,,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$3,$chr(44),$3"¼,$3,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2¼»,$1,$chr(44),$2"¼,$2,$chr(44),$1,¼»0,$chr(44),$1"¼,$1,$chr(44),0¼»)
}
There you are.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
Wait, we've got a problem. I just loaded up the script and tried it, and was returned: Edit: I'm heading to sleep. I'll check through tomorrow.
Last edited by Mpot; 18/09/07 11:25 PM.
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
Fixed it. Just had to up the value of the $ by one. IE, $4 became $5 on 1:text:!colorbar *:#: {
if (!$5) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$5,$chr(44),$5,------,0,$6-,,$5,$chr(44),$5, -------,,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
There should be a simple edit to make it to where the color of the name text can be specified in the middle, but I can't seem to figure it out. Help?
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
on 1:text:!colorbar *:#: {
if (!$5) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$5,$chr(44),$5,------,$6,$7,,$5,$chr(44),$5,-----,,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
You may want to adjust the "error" line to use !$6 instead of !$5 now that there is another color. Up to you.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I don't exactly understand what that line does, but if you think it'll help, I shall. Thanks.
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I did that, and now it doesn't work when I use 0(white) as the name color. I changed it back to 5, worked fine again.
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
Nevermind, I was able to figure it out myself.
Last edited by Mpot; 19/09/07 11:02 PM.
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
Here's a rewrite that will avoid problems when the last item is 0.
on 1:text:!colorbar *:#: {
if ($7 == $null) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 color5 nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$5,$chr(44),$5,------,$6,$7,,$5,$chr(44),$5,-----,,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I was able to get everything working fine, I've got !colorbar4 and !colorbar5. Everything seemed to work fine with !$5, so I left it. Here they are: on 1:text:!colorbar4 *:#: {
if (!$5) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 nickcolor nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$5,$chr(44),$5,------,$6,$7-,,$5,$chr(44),$5,-----,,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
on 1:text:!colorbar5 *:#: {
if (!$5) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 color5 nickcolor nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$6,$chr(44),$5"¼,$5,$chr(44),$6¼»,$6,$chr(44),$6,-------,$7,$8-,,$6,$chr(44),$6,-------,,$5,$chr(44),$6"¼,$6,$chr(44),$5¼»,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I want to be able to add colorbars for callup to IcyBot's script with !addbar colorbargoeshere callupcommand
So !addbar 11,0"¼0,11¼»12,11"¼11,12¼»2,12"¼12,2¼»2,2"¼2,2¼»10,2"¼2,10¼»10,10%%%%%%0 Master Mpot 10,10%%%%%%2,10"¼10,2¼»2,2"¼2,2¼»12,2"¼2,12¼»11,12"¼12,11¼»0,11"¼11,0¼» -mpot and the bot would write
on 1:TEXT:-mpot:#:msg $chan 11,0"¼0,11¼»12,11"¼11,12¼»2,12"¼12,2¼»2,2"¼2,2¼»10,2"¼2,10¼»10,10%%%%%%0 Master Mpot 10,10%%%%%%2,10"¼10,2¼»2,2"¼2,2¼»12,2"¼2,12¼»11,12"¼12,11¼»0,11"¼11,0¼» halt to the last line of the file. If there's text on the last line, it'd need to create a new line on the bottom and write that one in. The .mrc is called Callup Banners.mrc and is located in C:\IcyBot\Scripts Also, can you write it as a on TEXT, with the access level instead of one being addbar? Thanks! (I could probably do it myself, but I can't seem to figure out hte command. I know one if $read, but I tried /help $write and got nothing.) d EDIT: Tinkered some, is it: on addbar:TEXT:!addbar*:#: /write C:\IcyBot\Scripts on 1:text:- $+ $$2:#:msg $chan $$1 | halt
halt ?
Last edited by Mpot; 19/09/07 11:58 PM.
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
/help /write Anyhow, you really should adjust those IFs like I mentioned. $6 for the first one and $7 for the second one and check if they're == $null rather than !$___ as shown in what I gave you. It's up to you though. You don't have to use error checking at all. It will work without that line in there. If you're going to include the error checking, you should have it valid.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
I looked at the help /write, could you tell me if my attempt is vaild? Edit: on 1:text:!colorbar_how:#:/notice $nick To make a colorbar with five colors, you can type !colorbar5 color1 color2 color3 color4 color5 nickcolor nick. To make one with four colors, you may type !colorbar4 color1 color2 color3 color4 nickcolor nick. To access the list of colors, type -colors.
on 1:text:!colorbar4 *:#: {
if ($6 == $null) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 nickcolor nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$5,$chr(44),$5,------,$6,$7-,,$5,$chr(44),$5,-----,,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$4,$chr(44),$4"¼,$4,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
on 1:text:!colorbar5 *:#: {
if($7 == $null) { msg $chan Invalid Format. Use: !colorbar color1 color2 color3 color4 color5 nickcolor nick | return }
msg $chan $+(,$2,$chr(44),0"¼0,$chr(44),$2¼»,$3,$chr(44),$2"¼,$2,$chr(44),$3¼»,$4,$chr(44),$3"¼,$3,$chr(44),$4¼»,$5,$chr(44),$4"¼,$4,$chr(44),$5¼»,$6,$chr(44),$5"¼,$5,$chr(44),$6¼»,$6,$chr(44),$6,-------,$7,$8-,,$6,$chr(44),$6,-------,,$5,$chr(44),$6"¼,$6,$chr(44),$5¼»,$4,$chr(44),$5"¼,$5,$chr(44),$4¼»,$3,$chr(44),$4"¼,$4,$chr(44),$3¼»,$2,$chr(44),$3"¼,$3,$chr(44),$2,¼»0,$chr(44),$2"¼,$2,$chr(44),0¼»)
}
? Also, if I wanted to add the /write line to the top of my colorbar script, would the correct parentheses format be { on addbar:TEXT:!addbar*:#: { /write C:\IcyBot\Scripts\test.mrc on 1:text:$$2:#:{ msg $chan $$1 | halt } } | /notice $nick Bar added. | halt }
Last edited by Mpot; 20/09/07 12:22 AM.
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
Your edit of those is correct. For the writing...
on addbar:TEXT:!addbar *:#: {
write C:\IcyBot\Scripts\test.mrc $2-
notice $nick Bar added.
}
Note that you don't need /'s in a script. Also, I have no idea what you were trying to do with that line. You cannot put 2 on TEXT events on the same line. I'm not quite sure what you were trying to do there. Anyhow, this will add the text after !addbar to that test.mrc file for you. I don't know that .mrc is the best ending for that file, though. .txt would probably make more sense as you're not adding lines of a script to that file... just text.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Apr 2007
Posts: 228
Fjord artisan
|
OP
Fjord artisan
Joined: Apr 2007
Posts: 228 |
Let me explain why I need the on text: ;Call-Up Banners
on *:TEXT:-mpot:#:msg $chan 11,0"¼0,11¼»12,11"¼11,12¼»2,12"¼12,2¼»2,2"¼2,2¼»10,2"¼2,10¼»10,10%%%%%%0 Master Mpot 10,10%%%%%%2,10"¼10,2¼»2,2"¼2,2¼»12,2"¼2,12¼»11,12"¼12,11¼»0,11"¼11,0¼» | halt
on *:TEXT:-colors:#:msg $chan 0,1 1 0,2 2 0,3 3 0,4 4 0,5 5 0,6 6 0,7 7 0,8 8 0,9 9 0,10 10 0,11 11 0,12 12 0,13 13 0,14 14 0,15 15 | halt
on *:TEXT:-duncan:#:msg $chan 9,0"¼0,9¼»10,9"¼9,10¼»2,10"¼10,2¼»2,2"¼2,2¼»3,2"¼2,3¼»3,3%%%%%%8 Duncan007 3,3%%%%%%2,3"¼3,2¼»2,2"¼2,2¼»10,2"¼2,10¼»9,10"¼10,9¼»0,9"¼9,0¼» | halt
on *:TEXT:-ichban:#:msg $chan 4,0"¼0,4¼»10,4"¼4,10¼»2,10"¼10,2¼»2,2"¼2,2¼»1,2"¼2,1¼»1,1%%%%%%0 IchbanRyushi 1,1%%%%%%2,1"¼1,2¼»2,2"¼2,2¼»10,2"¼2,10¼»4,10"¼10,4¼»0,4"¼4,0¼» | halt
on *:TEXT:-kuros:#:msg $chan 4,0"¼0,4¼»6,4"¼4,6¼»13,6"¼6,13¼»13,13"¼13,13¼»11,13"¼13,11¼»11,11%%%%%%0 Kuros 11,11%%%%%%13,11"¼11,13¼»13,13"¼13,13¼»6,13"¼13,6¼»4,6"¼6,4¼»0,4"¼4,0¼» | halt
on *:TEXT:-ekal:#:msg $chan 11,0"¼0,11¼»12,11"¼11,12¼»2,12"¼12,2¼»2,2"¼2,2¼»10,2"¼2,10¼»10,10%%%%%%0 Ekal 10,10%%%%%%2,10"¼10,2¼»2,2"¼2,2¼»12,2"¼2,12¼»11,12"¼12,11¼»0,11"¼11,0¼» | halt
on *:TEXT:-lunaki:#:msg $chan 13,0"¼0,13¼»1,13"¼13,1¼»2,1"¼1,2¼»2,2"¼2,2¼»6,2"¼2,6¼»6,6%%%%%%0 Lunaki 6,6%%%%%%2,6"¼6,2¼»2,2"¼2,2¼»1,2"¼2,1¼»13,1"¼1,13¼»0,13"¼13,0¼» | halt
on *:TEXT:-marajah:#:msg $chan 3,0"¼0,3¼»1,3"¼3,1¼»5,1"¼1,5¼»5,5"¼5,5¼»2,5"¼5,2¼»2,2%%%%%%15 Marajah 2,2%%%%%%5,2"¼2,5¼»5,5"¼5,5¼»1,5"¼5,1¼»3,1"¼1,3¼»0,3"¼3,0¼» | halt
on *:TEXT:-kuro:#:msg $chan 6,0"¼0,6¼»2,6"¼6,2¼»12,2"¼2,12¼»12,12"¼12,12¼»1,12"¼12,1¼»1,1------13Kuro-Sakura1,1-----12,1"¼1,12¼»12,12"¼12,12¼»2,12"¼12,2¼»6,2"¼2,6¼»0,6"¼6,0¼» | halt
on *:TEXT:-peth:#:msg $chan 14,0"¼0,14¼»15,14"¼14,15¼»1,15"¼15,1¼»1,1"¼1,1¼»7,1"¼1,7¼»7,7------0Penguin7,7-----1,7"¼7,1¼»1,1"¼1,1¼»15,1"¼1,15¼»14,15"¼15,14¼»0,14"¼14,0¼» | halt
on *:TEXT:-vrixis:#:msg $chan 4,0"¼0,4¼»5,4"¼4,5¼»4,5"¼5,4¼»4,4"¼4,4¼»5,4"¼4,5¼»5,5------4Vrixis5,5-----4,5"¼5,4¼»4,4"¼4,4¼»5,4"¼4,5¼»4,5"¼5,4¼»0,4"¼4,0¼» | halt
I need the !addbar to add the inputed stuff (the bar and the callup code) to the end of that script, in an on text like the above...
|
|
|
|
|