Color frames by XxX[[805]]XxX

By XxX[[CE]]GaNgStA[[CE]]XxX on Mar 11, 2007

With this script you can add color frames to your msgs in any channel, just save it as whatevername.mrc and then load it to your mirc and type in your status window [ /types ] and thats it!!!

Like Page Follow Author

Comments

Sign in to comment.

F*U*R*B*Y* - Mar 16, 2007

LOL

Respond

Lindrian - Mar 16, 2007

I see no use for this, although the comments did make me laugh, so i suppose it wasnt that bad ;D

Respond

F*U*R*B*Y* - Mar 16, 2007

:) LOL Zab at the (Lamer is probably what you mean.)

Respond

ZabuzaMomochi - Mar 16, 2007

Gangsta, if you didn\'t know, he trying to help you out. So before you call someone a Stupid \'Lammer\'(Lamer is probably what you mean.) You should actually READ what the person is saying. So calm the hell down, and use that brain I know you might have.

Respond

Korvin - Mar 15, 2007

seriously, you should change it..

Respond

Korvin - Mar 11, 2007

actually delete that last one.. use this:

leters on

on :input:: {
if ($left($1-,1) != /) {
if (%pes == 1) /say 14,1:15,2:0,12:15,2:14,1: 0,1 $1- 14,1:15,2:0,12:15,2:14,1: 0,1
if (%pes == 2) /say 14,1-15,1=(0 $1- )=14,1-
if (%pes == 3) /say 15,1514,148,2 $1- 14,14-15,15
if (%pes == 4) /say 0 0,4(5)4,5(1)5,1(4,1 [15 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 4] 5,1)1,5(4)5,4(0)
if (%pes == 5) /say 1,4-4,1||15,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 4,1|1,4-
if (%pes == 6) /say 12-[0,12[2,1[0,1 - $1- - 2,1]2,12]0,12]12]-
if (%pes == 7) /say 4,4|1,1|4,4| 14,1+4T14+15 $1- 14,1+4T14+4,4|1,1|4,4|
if (%pes == 9) /say 1,7- $1- -=椺
if (%pes == 10) /say 1,1 1,41,1 0,4 $replace($1-,s,z) 1,1 1,41,1
if (%pes == 11) /say 0,215}14^15( 0 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 15)14^15{
if (%pes == 12) /say $replace($1-,c,k,s,z)
if (%pes == 13) /say 0,1 14-=4<15,1 $replace($1-,a,a,e,e,i,i,o,o,u,u) 4,1>14=-
if (%pes == 14) /say 1,19,1(0,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 9)1,1
if (%pes == 15) /say 14!9-14[12 $1- 14]9-14!
if (%pes == 16) /say 1,18,1(0,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 8)1,1
if (%pes == 17) /say 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 $1- 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
if (%pes == 18) /say 12,1( 14,1 $1- 12,1)
if (%pes == 19) /say 9,1(-<14 $1- 9>-)
if (%pes == 20) /say 15,1x14,1X15,1x4,1[ $1- ]15,1x14,1X15,1x
if (%pes == 21) /say 4,1{12x4}14 $1- 4{12x4}
if (%pes == 22) /say 4,1(<-(15,1 $1- 4,1)->)
if (%pes == 23) /say 9,1}4,1=8,1< $1- >4,1=9,1{
if (%pes == 24) /say 14,1x4,1(14 $1- 4)14,1x
if (%pes == 25) /say 8,1(-4,1V14,1m4,1P8,1-)14,1 $1- 8,1(-4,1V14,1m4,1P8,1-)
if (%pes == 26) { set %tx $1- | dice }
halt
}
}

leters end

menu @types {
dclick {
if ($1 == 4) { .disable #leters }
if ($1 == 5) { .enable #leters | set %pes 1 }
if ($1 == 6) { .enable #leters | set %pes 2 }
if ($1 == 7) { .enable #leters | set %pes 3 }
if ($1 == 8) { .enable #leters | set %pes 4 }
if ($1 == 9) { .enable #leters | set %pes 5 }
if ($1 == 10) { .enable #leters | set %pes 6 }
if ($1 == 11) { .enable #leters | set %pes 7 }
if ($1 == 12) { .enable #leters | set %pes 8 }
if ($1 == 13) { .enable #leters | set %pes 9 }
if ($1 == 14) { .enable #leters | set %pes 10 }
if ($1 == 15) { .enable #leters | set %pes 11 }
if ($1 == 16) { .enable #leters | set %pes 12 }
if ($1 == 17) { .enable #leters | set %pes 13 }
if ($1 == 18) { .enable #leters | set %pes 14 }
if ($1 == 19) { .enable #leters | set %pes 15 }
if ($1 == 20) { .enable #leters | set %pes 16 }
if ($1 == 21) { .enable #leters | set %pes 17 }
if ($1 == 22) { .enable #leters | set %pes 18 }
if ($1 == 23) { .enable #leters | set %pes 19 }
if ($1 == 24) { .enable #leters | set %pes 20 }
if ($1 == 25) { .enable #leters | set %pes 21 }
if ($1 == 26) { .enable #leters | set %pes 22 }
if ($1 == 27) { .enable #leters | set %pes 23 }
if ($1 == 28) { .enable #leters | set %pes 24 }
if ($1 == 29) { .enable #leters | set %pes 25 }
}
}

alias types {
if (%typelanguageset == $null) { /dialog -m chl chl }
if (%typelanguageset != $null) {
if (%typeslanguage == spanish) {
window -l @types 60 30 290 435 @types
clear @types
aline @types 12Da Doble click en el tipo
aline @types 12que te guste:
aline @types 12-
aline @types Normal
aline @types 14,1:15,2:0,12:15,2:14,1: 0,1 muestra 14,1:15,2:0,12:15,2:14,1: 0,1
aline @types 14,1-15,1=(0 muestra )=14,1-
aline @types 15,1514,148,2 muestra 14,14-15,15
aline @types 0 0,4(5)4,5(1)5,1(4,1 [15 Muestra 4] 5,1)1,5(4)5,4(0)
aline @types 0 1,4-4,1||15,1 Muestra 4,1|1,4-
aline @types 12-[0,12[2,1[0,1 - Muestra - 2,1]2,12]0,12]12]-
aline @types 4,4|1,1|4,4| 14,1+4T14+15 Muestra 14,1+4T14+4,4|1,1|4,4|
aline @types 0,2 :.+ .: Muestra .:..+
aline @types 1,7-Muestra -=椺
aline @types 1,1 1,41,1 0,4 Muestra 1,1 1,41,1
aline @types 0,215}14^15( 0 Muestra 15)14^15{
aline @types MuEsTrA
aline @types 0,1 14-=4<15,1 muestra 4,1>14=-
aline @types 1,1||9,1(0,1 MuEstRa 9)1,1||
aline @types 14!9-14[12 muestra 14]9-14!
aline @types 1,1||8,1(0,1 MuEstRa 8)1,1||
aline @types 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 Muestra 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
aline @types 12,1( 14,1 muestra 12,1)
aline @types 9,1(-<14 muestra 9>-)
aline @types 15,1x14,1X15,1x4,1[ muestra ]15,1x14,1X15,1x
aline @types 4,1{12x4}14 muestra 4{12x4}
aline @types 4,1(<-(15 muestra 4 )->)
aline @types 9,1}4,1=8,1< muestra >4,1=9,1{
aline @types 14,1x4,1( 4,1 muestra 4)14,1x
aline @types 8,1(-4,1V14,1m4,1P8,1-) 14,1Muestra 8,1(-4,1V14,1m4,1P8,1-)
}
if (%typeslanguage == english) {
window -l @types 60 30 290 435 @types
clear @types
aline @types 12Double Click on the type
aline @types 12That You Like:
aline @types 12-
aline @types Normal
aline @types 14,1:15,2:0,12:15,2:14,1: 0,1 It Shows 14,1:15,2:0,12:15,2:14,1: 0,1
aline @types 14,1-15,1=(0 It Shows )=14,1-
aline @types 15,1514,148,2 It Shows 14,14-15,15
aline @types 0 0,4(5)4,5(1)5,1(4,1 [15 It Shows 4] 5,1)1,5(4)5,4(0)
aline @types 0 1,4-4,1||15,1 It Shows 4,1|1,4-
aline @types 12-[0,12[2,1[0,1 - It Shows - 2,1]2,12]0,12]12]-
aline @types 4,4|1,1|4,4| 14,1+4T14+15 It Shows 14,1+4T14+4,4|1,1|4,4|
aline @types 0,2 :.+ .: It Shows .:..+
aline @types 1,7-It Shows -=椺
aline @types 1,1 1,41,1 0,4 It Shows 1,1 1,41,1
aline @types 0,215}14^15( 0 It Shows 15)14^15{
aline @types It Shows
aline @types 0,1 14-=4<15,1 It Shows 4,1>14=-
aline @types 1,1||9,1(0,1 It Shows 9)1,1||
aline @types 14!9-14[12 It Shows 14]9-14!
aline @types 1,1||8,1(0,1 It Shows 8)1,1||
aline @types 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 It Shows 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
aline @types 12,1( 14,1 It Shows 12,1)
aline @types 9,1(-<14 It Shows 9>-)
aline @types 15,1x14,1X15,1x4,1[ It Shows ]15,1x14,1X15,1x
aline @types 4,1{12x4}14 It Shows 4{12x4}
aline @types 4,1(<-(15 It Shows 4 )->)
aline @types 9,1}4,1=8,1< It Shows >4,1=9,1{
aline @types 14,1x4,1( 4,1 It Shows 4)14,1x
aline @types 8,1(-4,1V14,1m4,1P8,1-) 14,1It Shows 8,1(-4,1V14,1m4,1P8,1-)
}
}
}
alias resetlanguage {
/dialog -m chl chl
}
dialog chl {
title \"Choose Language\"
size -1 -1 88 72
option dbu
button \"Spanish\", 1, 15 4 37 12
button \"English\", 2, 15 21 37 12
button \"Cancel\", 5, 15 54 37 12, ok
}
on 1:dialog:chl:sclick:1: /set %typeslanguage spanish | echo Set To Spanish. | set %typelanguageset on | dialog -k chl chl | types
on 1:dialog:chl:sclick:2: /set %typeslanguage english | echo Set To English. | set %typelanguageset on | dialog -k chl chl | types

Respond

Korvin - Mar 11, 2007

=] thats both languages.

Respond

Korvin - Mar 11, 2007

leters on

on :input:: {
if ($left($1-,1) != /) {
if (%pes == 1) /say 14,1:15,2:0,12:15,2:14,1: 0,1 $1- 14,1:15,2:0,12:15,2:14,1: 0,1
if (%pes == 2) /say 14,1-15,1=(0 $1- )=14,1-
if (%pes == 3) /say 15,1514,148,2 $1- 14,14-15,15
if (%pes == 4) /say 0 0,4(5)4,5(1)5,1(4,1 [15 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 4] 5,1)1,5(4)5,4(0)
if (%pes == 5) /say 1,4-4,1||15,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 4,1|1,4-
if (%pes == 6) /say 12-[0,12[2,1[0,1 - $1- - 2,1]2,12]0,12]12]-
if (%pes == 7) /say 4,4|1,1|4,4| 14,1+4T14+15 $1- 14,1+4T14+4,4|1,1|4,4|
if (%pes == 9) /say 1,7- $1- -=椺
if (%pes == 10) /say 1,1 1,41,1 0,4 $replace($1-,s,z) 1,1 1,41,1
if (%pes == 11) /say 0,215}14^15( 0 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 15)14^15{
if (%pes == 12) /say $replace($1-,c,k,s,z)
if (%pes == 13) /say 0,1 14-=4<15,1 $replace($1-,a,a,e,e,i,i,o,o,u,u) 4,1>14=-
if (%pes == 14) /say 1,19,1(0,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 9)1,1
if (%pes == 15) /say 14!9-14[12 $1- 14]9-14!
if (%pes == 16) /say 1,18,1(0,1 $replace($1-,a,a,b,B,c,C,d,D,e,e,f,F,g,G,h,H,i,i,j,J,k,K,l,L,m,M,n,N,o,o,p,P,q,Q,r,R,s,S,t,T,u,u,v,V,w,W,x,X,y,Y,z,Z) 8)1,1
if (%pes == 17) /say 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 $1- 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
if (%pes == 18) /say 12,1( 14,1 $1- 12,1)
if (%pes == 19) /say 9,1(-<14 $1- 9>-)
if (%pes == 20) /say 15,1x14,1X15,1x4,1[ $1- ]15,1x14,1X15,1x
if (%pes == 21) /say 4,1{12x4}14 $1- 4{12x4}
if (%pes == 22) /say 4,1(<-(15,1 $1- 4,1)->)
if (%pes == 23) /say 9,1}4,1=8,1< $1- >4,1=9,1{
if (%pes == 24) /say 14,1x4,1(14 $1- 4)14,1x
if (%pes == 25) /say 8,1(-4,1V14,1m4,1P8,1-)14,1 $1- 8,1(-4,1V14,1m4,1P8,1-)
if (%pes == 26) { set %tx $1- | dice }
halt
}
}

leters end

menu @types {
dclick {
if ($1 == 4) { .disable #leters }
if ($1 == 5) { .enable #leters | set %pes 1 }
if ($1 == 6) { .enable #leters | set %pes 2 }
if ($1 == 7) { .enable #leters | set %pes 3 }
if ($1 == 8) { .enable #leters | set %pes 4 }
if ($1 == 9) { .enable #leters | set %pes 5 }
if ($1 == 10) { .enable #leters | set %pes 6 }
if ($1 == 11) { .enable #leters | set %pes 7 }
if ($1 == 12) { .enable #leters | set %pes 8 }
if ($1 == 13) { .enable #leters | set %pes 9 }
if ($1 == 14) { .enable #leters | set %pes 10 }
if ($1 == 15) { .enable #leters | set %pes 11 }
if ($1 == 16) { .enable #leters | set %pes 12 }
if ($1 == 17) { .enable #leters | set %pes 13 }
if ($1 == 18) { .enable #leters | set %pes 14 }
if ($1 == 19) { .enable #leters | set %pes 15 }
if ($1 == 20) { .enable #leters | set %pes 16 }
if ($1 == 21) { .enable #leters | set %pes 17 }
if ($1 == 22) { .enable #leters | set %pes 18 }
if ($1 == 23) { .enable #leters | set %pes 19 }
if ($1 == 24) { .enable #leters | set %pes 20 }
if ($1 == 25) { .enable #leters | set %pes 21 }
if ($1 == 26) { .enable #leters | set %pes 22 }
if ($1 == 27) { .enable #leters | set %pes 23 }
if ($1 == 28) { .enable #leters | set %pes 24 }
if ($1 == 29) { .enable #leters | set %pes 25 }
}
}

alias types {
if (%typelanguageset == $null) { /dialog -m chl chl }
if (%typelanguageset != $null) {
if (%typeslanguage == spanish) {
window -l @types 60 30 290 435 @types
clear @types
aline @types 12Da Doble click en el tipo
aline @types 12que te guste:
aline @types 12-
aline @types Normal
aline @types 14,1:15,2:0,12:15,2:14,1: 0,1 muestra 14,1:15,2:0,12:15,2:14,1: 0,1
aline @types 14,1-15,1=(0 muestra )=14,1-
aline @types 15,1514,148,2 muestra 14,14-15,15
aline @types 0 0,4(5)4,5(1)5,1(4,1 [15 Muestra 4] 5,1)1,5(4)5,4(0)
aline @types 0 1,4-4,1||15,1 Muestra 4,1|1,4-
aline @types 12-[0,12[2,1[0,1 - Muestra - 2,1]2,12]0,12]12]-
aline @types 4,4|1,1|4,4| 14,1+4T14+15 Muestra 14,1+4T14+4,4|1,1|4,4|
aline @types 0,2 :.+ .: Muestra .:..+
aline @types 1,7-Muestra -=椺
aline @types 1,1 1,41,1 0,4 Muestra 1,1 1,41,1
aline @types 0,215}14^15( 0 Muestra 15)14^15{
aline @types MuEsTrA
aline @types 0,1 14-=4<15,1 muestra 4,1>14=-
aline @types 1,1||9,1(0,1 MuEstRa 9)1,1||
aline @types 14!9-14[12 muestra 14]9-14!
aline @types 1,1||8,1(0,1 MuEstRa 8)1,1||
aline @types 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 Muestra 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
aline @types 12,1( 14,1 muestra 12,1)
aline @types 9,1(-<14 muestra 9>-)
aline @types 15,1x14,1X15,1x4,1[ muestra ]15,1x14,1X15,1x
aline @types 4,1{12x4}14 muestra 4{12x4}
aline @types 4,1(<-(15 muestra 4 )->)
aline @types 9,1}4,1=8,1< muestra >4,1=9,1{
aline @types 14,1x4,1( 4,1 muestra 4)14,1x
aline @types 8,1(-4,1V14,1m4,1P8,1-) 14,1Muestra 8,1(-4,1V14,1m4,1P8,1-)
}
if (%typeslanguage == english) {
window -l @types 60 30 290 435 @types
clear @types
aline @types 12Double Click on the type
aline @types 12That You Like:
aline @types 12-
aline @types Normal
aline @types 14,1:15,2:0,12:15,2:14,1: 0,1 It Shows 14,1:15,2:0,12:15,2:14,1: 0,1
aline @types 14,1-15,1=(0 It Shows )=14,1-
aline @types 15,1514,148,2 It Shows 14,14-15,15
aline @types 0 0,4(5)4,5(1)5,1(4,1 [15 It Shows 4] 5,1)1,5(4)5,4(0)
aline @types 0 1,4-4,1||15,1 It Shows 4,1|1,4-
aline @types 12-[0,12[2,1[0,1 - It Shows - 2,1]2,12]0,12]12]-
aline @types 4,4|1,1|4,4| 14,1+4T14+15 It Shows 14,1+4T14+4,4|1,1|4,4|
aline @types 0,2 :.+ .: It Shows .:..+
aline @types 1,7-It Shows -=椺
aline @types 1,1 1,41,1 0,4 It Shows 1,1 1,41,1
aline @types 0,215}14^15( 0 It Shows 15)14^15{
aline @types It Shows
aline @types 0,1 14-=4<15,1 It Shows 4,1>14=-
aline @types 1,1||9,1(0,1 It Shows 9)1,1||
aline @types 14!9-14[12 It Shows 14]9-14!
aline @types 1,1||8,1(0,1 It Shows 8)1,1||
aline @types 2,1|6,2|13,6|0,13|13,6|6,2|2,1|13,1[0,1 It Shows 13,1]2,1|6,2|13,6|0,13|13,6|6,2|2,1|
aline @types 12,1( 14,1 It Shows 12,1)
aline @types 9,1(-<14 It Shows 9>-)
aline @types 15,1x14,1X15,1x4,1[ It Shows ]15,1x14,1X15,1x
aline @types 4,1{12x4}14 It Shows 4{12x4}
aline @types 4,1(<-(15 It Shows 4 )->)
aline @types 9,1}4,1=8,1< It Shows >4,1=9,1{
aline @types 14,1x4,1( 4,1 It Shows 4)14,1x
aline @types 8,1(-4,1V14,1m4,1P8,1-) 14,1It Shows 8,1(-4,1V14,1m4,1P8,1-)
}
}
}
alias resetlanguage {
unset %typeslanguage
/dialog -m chl chl }
dialog chl {
title \"Choose Language\"
size -1 -1 88 72
option dbu
button \"Spanish\", 1, 15 4 37 12
button \"English\", 2, 15 21 37 12
button \"Cancel\", 5, 15 54 37 12, ok
}
on 1:dialog:chl:sclick:1: /set %typeslanguage spanish | echo Set To Spanish. | set %typelanguageset on | dialog -k chl chl
on 1:dialog:chl:sclick:2: /set %typeslanguage english | echo Set To English. | set %typelanguageset on | dialog -k chl chl

Respond

Teh Maestro - Mar 11, 2007

Ok, I tried them and they all work except #9 (the one with a solid dark blue background).

Respond

Teh Maestro - Mar 11, 2007

Very well done, great effect. Just one thing, perhaps you should make the @window close after you chose one of the styles, and include an English translation next to the Spanish.

Respond

Are you sure you want to unfollow this person?

Are you sure you want to delete this?

Click "Unsubscribe" to stop receiving notices pertaining to this post.

Click "Subscribe" to resume notices pertaining to this post.