Vlaggen
Auteur: stuifie - 25 juni 2005 - 11:41 - Gekeurd door: Mokka - Hits: 4864 - Aantal punten: 1.83 (3 stemmen)
Het eerst gedeelte moet je in variables plaatsen
Het 2de gedeelte plaats je dan in je remote
--
Wat dit script doet:
Hij kan een vlag voor je maken met, Random kleurtjes of verschillende landen:
AL AM AR AT AZ BO BG BW BY CO DE EG ES EC HR KH MX NL SV
zijn landen die je kan gebruiken
Je kan het aanroepen via !vlag NL tekst tekst tekst (NL kan je vervangen door 1 van die andere landen)
dan krijg je:
http://81.70.213.30/sitemasters/vlag.jpg
|
Code: |
variables
%flag random AL AM AR AT AZ BO BG BW BY CO DE EG ES EC HR KH MX NL SV
%flag random AL AM AR AT AZ BO BG BW BY CO DE EG ES EC HR KH MX NL SV
remote
on *:TEXT:*:#:{
if ($1 == !vlag) {
if (%flagstatus) { halt }
if ($2 == random) {
var %c = 0 | while (%c < 3) {
inc %c | var %a = $rand(00,15) | var %b = $rand(00,15)
if (%a < 10) {
if (%b < 10) { set %c $+ %c $+($chr(48),%a,$chr(44),$chr(48),%b) }
else { set %c $+ %c $+($chr(48),%a,$chr(44),%b) }
}
elseif (%b < 10) { set %c $+ %c $+(%a,$chr(44),$chr(48),%b) }
}
}
if ($2 == AL) { set %c1 01,04 | set %c2 01,04 | set %c3 01,04 }
if ($2 == AM) { set %c1 00,04 | set %c2 00,02 | set %c3 00,07 }
if ($2 == AR) { set %c1 00,11 | set %c2 08,00 | set %c3 00,11 }
if ($2 == AT) { set %c1 00,04 | set %c2 01,00 | set %c3 01,04 }
if ($2 == AZ) { set %c1 00,02 | set %c2 00,04 | set %c3 00,03 }
if ($2 == BO) { set %c1 00,04 | set %c2 04,08 | set %c3 00,03 }
if ($2 == BG) { set %c1 03,00 | set %c2 00,03 | set %c3 00,04 }
if ($2 == BW) { set %c1 00,12 | set %c2 00,01 | set %c3 00,12 }
if ($2 == BY) { set %c1 00,04 | set %c2 00,04 | set %c3 00,03 }
if ($2 == CO) { set %c1 14,08 | set %c2 00,02 | set %c3 08,04 }
if ($2 == DE) { set %c1 00,01 | set %c2 00,04 | set %c3 00,07 }
if ($2 == EG) { set %c1 00,04 | set %c2 08,00 | set %c3 00,01 }
if ($2 == ES) { set %c1 00,04 | set %c2 04,08 | set %c3 00,04 }
if ($2 == EC) { set %c1 01,08 | set %c2 08,02 | set %c3 00,04 }
if ($2 == HR) { set %c1 00,04 | set %c2 04,00 | set %c3 00,02 }
if ($2 == KH) { set %c1 15,02 | set %c2 00,04 | set %c3 15,02 }
if ($2 == MX) { set %c1 00,03 | set %c2 05,00 | set %c3 00,04 }
if ($2 == NL) { set %c1 00,04 | set %c2 07,00 | set %c3 00,02 }
if ($2 == SV) { set %c1 00,12 | set %c2 01,00 | set %c3 00,12 }
if (!$istok(%flag,$2,32)) { .notice $nick 12Choose a nation: 10 $+ %flag $+ . | halt }
elseif ($6) { .notice $nick 12Te veel worden (max 4). | halt }
else {
set %flen $len($strip($3))
if ($len($4) > %flen) { set %flen $len($strip($4)) } | if ($len($5) > %flen) { set %flen $len($strip($5)) }
if (%flen < 10) { if (2 // %flen) { set %flen 10 } | else { set %flen 9 } }
var %r = $calc($calc(%flen - $len($strip($3))) /2) | var %r1 = $calc($int(%r) + 1) | var %r2 = $calc($round(%r,0) + 1)
var %b = $calc($calc(%flen - $len($strip($4))) /2) | var %b1 = $calc($int(%b) + 1) | var %b2 = $calc($round(%b,0) + 1)
var %g = $calc($calc(%flen - $len($strip($5))) /2) | var %g1 = $calc($int(%g) + 1) | var %g2 = $calc($round(%g,0) + 1)
.msg # $+(,%c1,$str( ,%r1),$3,$str( ,%r2))
.msg # $+(,%c2,$str( ,%b1),$4,$str( ,%b2))
.msg # $+(,%c3,$str( ,%g1),$5,$str( ,%g2))
}
set -u10 %flagstatus on
}
}
on *:TEXT:*:#:{ if ($1 == !vlag) { if (%flagstatus) { halt } if ($2 == random) { var %c = 0 | while (%c < 3) { inc %c | var %a = $rand(00,15) | var %b = $rand(00,15) if (%a < 10) { if (%b < 10) { set %c $+ %c $+($chr(48),%a,$chr(44),$chr(48),%b) } else { set %c $+ %c $+($chr(48),%a,$chr(44),%b) } } elseif (%b < 10) { set %c $+ %c $+(%a,$chr(44),$chr(48),%b) } } } if ($2 == AL) { set %c1 01,04 | set %c2 01,04 | set %c3 01,04 } if ($2 == AM) { set %c1 00,04 | set %c2 00,02 | set %c3 00,07 } if ($2 == AR) { set %c1 00,11 | set %c2 08,00 | set %c3 00,11 } if ($2 == AT) { set %c1 00,04 | set %c2 01,00 | set %c3 01,04 } if ($2 == AZ) { set %c1 00,02 | set %c2 00,04 | set %c3 00,03 } if ($2 == BO) { set %c1 00,04 | set %c2 04,08 | set %c3 00,03 } if ($2 == BG) { set %c1 03,00 | set %c2 00,03 | set %c3 00,04 } if ($2 == BW) { set %c1 00,12 | set %c2 00,01 | set %c3 00,12 } if ($2 == BY) { set %c1 00,04 | set %c2 00,04 | set %c3 00,03 } if ($2 == CO) { set %c1 14,08 | set %c2 00,02 | set %c3 08,04 } if ($2 == DE) { set %c1 00,01 | set %c2 00,04 | set %c3 00,07 } if ($2 == EG) { set %c1 00,04 | set %c2 08,00 | set %c3 00,01 } if ($2 == ES) { set %c1 00,04 | set %c2 04,08 | set %c3 00,04 } if ($2 == EC) { set %c1 01,08 | set %c2 08,02 | set %c3 00,04 } if ($2 == HR) { set %c1 00,04 | set %c2 04,00 | set %c3 00,02 } if ($2 == KH) { set %c1 15,02 | set %c2 00,04 | set %c3 15,02 } if ($2 == MX) { set %c1 00,03 | set %c2 05,00 | set %c3 00,04 } if ($2 == NL) { set %c1 00,04 | set %c2 07,00 | set %c3 00,02 } if ($2 == SV) { set %c1 00,12 | set %c2 01,00 | set %c3 00,12 } if (!$istok(%flag,$2,32)) { .notice $nick 12Choose a nation: 10 $+ %flag $+ . | halt } elseif ($ 6) { .notice $nick 12Te veel worden (max 4). | halt } else { set %flen $len($strip($3)) if ($len($4) > %flen) { set %flen $len($strip($4)) } | if ($len($5) > %flen) { set %flen $len($strip($5)) } if (%flen < 10) { if (2 // %flen) { set %flen 10 } | else { set %flen 9 } } var %r = $calc($calc(%flen - $len($strip($3))) /2) | var %r1 = $calc($int(%r) + 1) | var %r2 = $calc($round(%r,0) + 1) var %b = $calc($calc(%flen - $len($strip($4))) /2) | var %b1 = $calc($int(%b) + 1) | var %b2 = $calc($round(%b,0) + 1) var %g = $calc($calc(%flen - $len($strip($5))) /2) | var %g1 = $calc($int(%g) + 1) | var %g2 = $calc($round(%g,0) + 1) .msg # $+(,%c1,$str( ,%r1),$3,$str( ,%r2)) .msg # $+(,%c2,$str( ,%b1),$4,$str( ,%b2)) .msg # $+(,%c3,$str( ,%g1),$5,$str( ,%g2)) } set -u10 %flagstatus on } }
Download code (.txt)
|
|
|
Stemmen |
Niet ingelogd. |
|