View

Color frames by XxX[[CE]]GaNgStA[[CE]]XxX

Snippet Author: Korvin
Rated:

Snippet Description: I DIDN'T MAKE ALL OF THIS!!! I ONLY MADE THE LANGUAGE INTERFACE

Script origionally made by XxX[[CE]]GaNgStA[[CE]]XxX but he has been inactive, so he will not answer my pms to join the xstatic nation

#leters off
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,15З14,14З8,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,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,4Є1,1 0,4 $replace($1-,s,z) 1,1 1,4Є1,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,1K14,1o4,1R8,1-)14,1 $1- 8,1(-4,1K14,1o4,1R8,1-)
    if (%pes == 26) { set %tx $1- | dice }
    halt
  }
}
#leters end
menu @types {
  dclick {
    if ($1 == 4) { .disable #leters | unset %aline }
    if ($1 == 5) { .enable #leters | set %pes 1 | set %aline on }
    if ($1 == 6) { .enable #leters | set %pes 2 | set %aline on }
    if ($1 == 7) { .enable #leters | set %pes 3 | set %aline on }
    if ($1 == 8) { .enable #leters | set %pes 4 | set %aline on }
    if ($1 == 9) { .enable #leters | set %pes 5 | set %aline on }
    if ($1 == 10) { .enable #leters | set %pes 6 | set %aline on }
    if ($1 == 11) { .enable #leters | set %pes 7 | set %aline on }
    if ($1 == 12) { .enable #leters | set %pes 8 | set %aline on }
    if ($1 == 13) { .enable #leters | set %pes 9 | set %aline on }
    if ($1 == 14) { .enable #leters | set %pes 10 | set %aline on }
    if ($1 == 15) { .enable #leters | set %pes 11 | set %aline on }
    if ($1 == 16) { .enable #leters | set %pes 12 | set %aline on }
    if ($1 == 17) { .enable #leters | set %pes 13 | set %aline on }
    if ($1 == 18) { .enable #leters | set %pes 14 | set %aline on }
    if ($1 == 19) { .enable #leters | set %pes 15 | set %aline on }
    if ($1 == 20) { .enable #leters | set %pes 16 | set %aline on }
    if ($1 == 21) { .enable #leters | set %pes 17 | set %aline on }
    if ($1 == 22) { .enable #leters | set %pes 18 | set %aline on }
    if ($1 == 23) { .enable #leters | set %pes 19 | set %aline on }
    if ($1 == 24) { .enable #leters | set %pes 20 | set %aline on }
    if ($1 == 25) { .enable #leters | set %pes 21 | set %aline on }
    if ($1 == 26) { .enable #leters | set %pes 22 | set %aline on }
    if ($1 == 27) { .enable #leters | set %pes 23 | set %aline on }
    if ($1 == 28) { .enable #leters | set %pes 24 | set %aline on } 
    if ($1 == 29) { .enable #leters | set %pes 25 | set %aline on }
  }
}

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,15З14,14З8,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,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,4Є1,1 0,4 Muestra 1,1 1,4Є1,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 | set %aline on
      aline @types 14,1-15,1=(0 It Shows )=14,1- | set %aline on
      aline @types 15,15З14,14З8,2 It Shows 14,14-15,15З | set %aline on
      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) | set %aline on
      aline @types 0 1,4-4,1||ю15,1 It Shows 4,1ю||1,4- | set %aline on
      aline @types 12-[0,12`[И2,12`[`2,1`[И0,1 - It Shows - 2,1`]2,12`]И0,12`]12`]- | set %aline on
      aline @types 4,4|1,1|4,4| 14,1+4T14+15 It Shows 14,1+4T14+4,4|1,1|4,4|  | set %aline on
      aline @types 0,2 З :.+ .ЗАЗ: It Shows .А:З.З.+ З | set %aline on
      aline @types 1,7ВКЄц=-ААIt Shows АА-=цЄКВ  | set %aline on
      aline @types 1,1 1,4Є1,1 0,4 It Shows 1,1 1,4Є1,1  | set %aline on
      aline @types 0,215}14^15( 0 It Shows 15)14^15{ | set %aline on
      aline @types It Shows | set %aline on
      aline @types 0,1 14-=4<15,1 It Shows 4,1>14=- | set %aline on
      aline @types 1,1||9,1(0,1 It Shows 9)1,1|| | set %aline on
      aline @types 14!9-14[12 It Shows 14]9-14! | set %aline on
      aline @types 1,1||8,1(0,1 It Shows 8)1,1|| | set %aline on
      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| | set %aline on
      aline @types 12,1Ћ( 14,1 It Shows 12,1)Л | set %aline on
      aline @types 9,1(-<14 It Shows 9>-) | set %aline on
      aline @types 15,1x14,1X15,1x4,1[ It Shows ]15,1x14,1X15,1x  | set %aline on
      aline @types 4,1{12x4}14 It Shows 4{12x4} | set %aline on
      aline @types 4,1(<-(15 It Shows 4 )->) | set %aline on
      aline @types 9,1}4,1=8,1< It Shows >4,1=9,1{ | set %aline on
      aline @types 14,1x4,1( 4,1 It Shows 4)14,1x | set %aline on
      aline @types 8,1(-4,1V14,1m4,1P8,1-) 14,1It Shows 8,1(-4,1V14,1m4,1P8,1-) | set %aline on
    }
  }
}
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

Favorite Script -

FURBY

Comments:
you don't need all them / infront of the say

Posted by: FURBY

Hanson

Comments:
Yay I love this quick comment box <3 tysm Furby

Posted by: Hanson

Korvin

Comments:
\n cant see comments

Posted by: Korvin

Smilies	Message:
	Comments:

X-Static Codes

Search

Scripting

Links

Sponsors

Stats

View

Color frames by XxX[[CE]]GaNgStA[[CE]]XxX