login  Naam:   Wachtwoord: 
Registreer je!
 Scripts:
Scripts > Overige > Mirc > Vlaggen

Vlaggen

Auteur: stuifie - 25 juni 2005 - 11:41 - Gekeurd door: Mokka - Hits: 4780 - 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
php code - Bekijk de code zonder highlighting - Klap code in 
  1. %flag random AL AM AR AT AZ BO BG BW BY CO DE EG ES EC HR KH MX NL SV


remote
php code - Bekijk de code zonder highlighting - Klap code in 
  1. on *:TEXT:*:#:{
  2.   if ($1 == !vlag) {
  3.     if (%flagstatus) { halt }
  4.     if ($2 == random) {
  5.       var %c = 0 | while (%c < 3) {
  6.         inc %c | var %a = $rand(00,15) | var %b = $rand(00,15)
  7.         if (%a < 10) {
  8.           if (%b < 10) { set %c $+ %c $+($chr(48),%a,$chr(44),$chr(48),%b) }
  9.           else { set %c $+ %c $+($chr(48),%a,$chr(44),%b) }
  10.         }
  11.         elseif (%b < 10) { set %c $+ %c $+(%a,$chr(44),$chr(48),%b) }
  12.       }
  13.     }
  14.     if ($2 == AL) { set %c1 01,04 | set %c2 01,04 | set %c3 01,04 }
  15.     if ($2 == AM) { set %c1 00,04 | set %c2 00,02 | set %c3 00,07 }
  16.     if ($2 == AR) { set %c1 00,11 | set %c2 08,00 | set %c3 00,11 }
  17.     if ($2 == AT) { set %c1 00,04 | set %c2 01,00 | set %c3 01,04 }
  18.     if ($2 == AZ) { set %c1 00,02 | set %c2 00,04 | set %c3 00,03 }
  19.     if ($2 == BO) { set %c1 00,04 | set %c2 04,08 | set %c3 00,03 }
  20.     if ($2 == BG) { set %c1 03,00 | set %c2 00,03 | set %c3 00,04 }
  21.     if ($2 == BW) { set %c1 00,12 | set %c2 00,01 | set %c3 00,12 }
  22.     if ($2 == BY) { set %c1 00,04 | set %c2 00,04 | set %c3 00,03 }
  23.     if ($2 == CO) { set %c1 14,08 | set %c2 00,02 | set %c3 08,04 }
  24.     if ($2 == DE) { set %c1 00,01 | set %c2 00,04 | set %c3 00,07 }
  25.     if ($2 == EG) { set %c1 00,04 | set %c2 08,00 | set %c3 00,01 }
  26.     if ($2 == ES) { set %c1 00,04 | set %c2 04,08 | set %c3 00,04 }
  27.     if ($2 == EC) { set %c1 01,08 | set %c2 08,02 | set %c3 00,04 }
  28.     if ($2 == HR) { set %c1 00,04 | set %c2 04,00 | set %c3 00,02 }
  29.     if ($2 == KH) { set %c1 15,02 | set %c2 00,04 | set %c3 15,02 }
  30.     if ($2 == MX) { set %c1 00,03 | set %c2 05,00 | set %c3 00,04 }
  31.     if ($2 == NL) { set %c1 00,04 | set %c2 07,00 | set %c3 00,02 }
  32.     if ($2 == SV) { set %c1 00,12 | set %c2 01,00 | set %c3 00,12 }
  33.  
  34.     if (!$istok(%flag,$2,32)) { .notice $nick 12Choose a nation: 10 $+ %flag $+ . | halt }
  35.     elseif ($6) { .notice $nick 12Te veel worden (max 4). | halt }
  36.     else {
  37.       set %flen $len($strip($3))
  38.       if ($len($4) > %flen) { set %flen $len($strip($4)) } | if ($len($5) > %flen) { set %flen $len($strip($5)) }
  39.       if (%flen < 10) { if (2 // %flen) { set %flen 10 } | else { set %flen 9 } }
  40.       var %r = $calc($calc(%flen - $len($strip($3))) /2) | var %r1 = $calc($int(%r) + 1) | var %r2 = $calc($round(%r,0) + 1)
  41.       var %b = $calc($calc(%flen - $len($strip($4))) /2) | var %b1 = $calc($int(%b) + 1) | var %b2 = $calc($round(%b,0) + 1)
  42.       var %g = $calc($calc(%flen - $len($strip($5))) /2) | var %g1 = $calc($int(%g) + 1) | var %g2 = $calc($round(%g,0) + 1)
  43.       .msg # $+(,%c1,$str( ,%r1),$3,$str( ,%r2))
  44.       .msg # $+(,%c2,$str( ,%b1),$4,$str( ,%b2))
  45.       .msg # $+(,%c3,$str( ,%g1),$5,$str( ,%g2))
  46.     }
  47.     set -u10 %flagstatus on
  48.   }
  49. }
Download code! Download code (.txt)

 Bekijk een voorbeeld van dit script!
 Stemmen
Niet ingelogd.

 Reacties
Post een reactie
Lees de reacties (2)
© 2002-2024 Sitemasters.be - Regels - Laadtijd: 0.036s