Untitled

alias mario {
  say 2,2######################################1,1########2,2############
  say 2,2######1,1############2,2################1,1####7,7########1,1####2,2########
  say 2,2####1,1##4,4############1,1####2,2##########1,1########7,7####1,1########2,2######
  say 2,2##1,1##4,4##################1,1##2,2##########1,1##15,15##1,1##7,7####1,1##15,15##1,1##2,2########
  say 2,2##1,1######7,7####1,1##7,7##1,1######2,2##########1,1##7,7##15,15####1,1####15,15####7,7##1,1##2,2######
  say 1,1##7,7####1,1####7,7##1,1##7,7########1,1##2,2####1,1####7,7####15,15##1,1##7,7####1,1##15,15##7,7####1,1####2,2##
  say 1,1##7,7####1,1####7,7####1,1##7,7######1,1##2,2##1,1##7,7########15,15##1,1##7,7####1,1##15,15##7,7########1,1##
  say 2,2##1,1####7,7######1,1##########2,2####1,1##7,7############################1,1##
  say 2,2####1,1####7,7##########1,1##2,2######1,1##7,7####15,15##1,1################15,15##7,7####1,1##
  say 2,2##1,1##4,4####1,1####4,4####1,1##2,2##########1,1##7,7##15,15##7,7################15,15##7,7##1,1##2,2##
  say 1,1##4,4########1,1####4,4####1,1##2,2##########1,1########################2,2####
  say 1,1##4,4########1,1##########2,2################1,1##15,15##########1,1##2,2########
  say 2,2##1,1##7,7######1,1####7,7##1,1####2,2########1,1########15,15############7,7##1,1##2,2######
  say 2,2##1,1##7,7####4,4######1,1######2,2######1,1##7,7##1,1########15,15########7,7##1,1########2,2##
  say 2,2####1,1##4,4##########1,1##2,2########1,1############7,7########1,1########7,7##1,1##


}


alias mario1 {
  say 2,2######################################1,1########2,2############
  say 2,2######1,1############2,2################1,1####4,4########1,1####2,2########
  say 2,2####1,1##3,3############1,1####2,2##########1,1########4,4####1,1########2,2######
  say 2,2##1,1##3,3##################1,1##2,2##########1,1##15,15##1,1##4,4####1,1##15,15##1,1##2,2########
  say 2,2##1,1######7,7####1,1##7,7##1,1######2,2##########1,1##4,4##15,15####1,1####15,15####4,4##1,1##2,2######
  say 1,1##7,7####1,1####7,7##1,1##7,7########1,1##2,2####1,1####4,4####15,15##1,1##4,4####1,1##15,15##4,4####1,1####2,2##
  say 1,1##7,7####1,1####7,7####1,1##7,7######1,1##2,2##1,1##4,4########15,15##1,1##4,4####1,1##15,15##4,4########1,1##
  say 2,2##1,1####7,7######1,1##########2,2####1,1##4,4############################1,1##
  say 2,2####1,1####7,7##########1,1##2,2######1,1##4,4####15,15##1,1################15,15##4,4####1,1##
  say 2,2##1,1##3,3####1,1####3,3####1,1##2,2##########1,1##4,4##15,15##4,4################15,15##4,4##1,1##2,2##
  say 1,1##3,3########1,1####3,3####1,1##2,2##########1,1########################2,2####
  say 1,1##3,3########1,1##########2,2################1,1##15,15##########1,1##2,2########
  say 2,2##1,1##7,7######1,1####7,7##1,1####2,2########1,1########15,15############4,4##1,1##2,2######
  say 2,2##1,1##7,7####3,3######1,1######2,2######1,1##4,4##1,1########15,15########4,4##1,1########2,2##
  say 2,2####1,1##3,3##########1,1##2,2########1,1############4,4########1,1########4,4##1,1##


} 


alias <3 {
  say 1,1xxxx0,0x14,14x1,1 1,12,2xxx12,12x1,1x1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1
  say 1,1xx0,0x14,14x1,1xx1,1 1,1xxx2,2x12,12x1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1
  say 0,0x14,14x1,1xxxx1,1 1,1x2,2xx12,12x1,1x1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1
  say 1,1xx0,0x14,14x1,1xx1,1 1,1xxx2,2x12,12x1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1
  say 1,1xxxx0,0x14,14x1,1 1,12,2xxx12,12x1,1x1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1 1,1

} 



alias ascii {
  set %ascii $1-
  %ascii = $replace(%ascii,a,)
  %ascii = $replace(%ascii,b,)
  %ascii = $replace(%ascii,c,)
  %ascii = $replace(%ascii,d,)
  %ascii = $replace(%ascii,e,)
  %ascii = $replace(%ascii,f,f)
  %ascii = $replace(%ascii,g,g)
  %ascii = $replace(%ascii,h,h)
  %ascii = $replace(%ascii,i,)
  %ascii = $replace(%ascii,j,j)
  %ascii = $replace(%ascii,k,K)
  %ascii = $replace(%ascii,l,)
  %ascii = $replace(%ascii,m,m)
  %ascii = $replace(%ascii,n,)
  %ascii = $replace(%ascii,o,)
  %ascii = $replace(%ascii,p,)
  %ascii = $replace(%ascii,q,q)
  %ascii = $replace(%ascii,r,)
  %ascii = $replace(%ascii,s,)
  %ascii = $replace(%ascii,t,t)
  %ascii = $replace(%ascii,u,)
  %ascii = $replace(%ascii,v,v)
  %ascii = $replace(%ascii,w,W)
  %ascii = $replace(%ascii,x,)
  %ascii = $replace(%ascii,y,)
  %ascii = $replace(%ascii,z,z)
  %ascii = $replace(%ascii,?,)
  %ascii = $replace(%ascii,!,)
  say %ascii
  unset %ascii
}
alias asciic {
  %ascii = $1-
  %ascii = $replace(%ascii,1,)
  %ascii = $replace(%ascii,2,)
  %ascii = $replace(%ascii,3,)
  %ascii = $replace(%ascii,1/4,)
  %ascii = $replace(%ascii,1/2,)
  %ascii = $replace(%ascii,3/4,)
  %ascii = $replace(%ascii,AE,)
  %ascii = $replace(%ascii,A,)
  %ascii = $replace(%ascii,B,)
  %ascii = $replace(%ascii,C,)
  %ascii = $replace(%ascii,D,)
  %ascii = $replace(%ascii,E,)
  %ascii = $replace(%ascii,I,)
  %ascii = $replace(%ascii,L,)
  %ascii = $replace(%ascii,N,)
  %ascii = $replace(%ascii,O,)
  %ascii = $replace(%ascii,R,)
  %ascii = $replace(%ascii,S,)
  %ascii = $replace(%ascii,U,)
  %ascii = $replace(%ascii,Y,) { 
    set %ascii1 %ascii
    unset %ascii
    set %ascii 
    set %asciicnumber 1 
    set %asciiccolor 2
    :continue
    if $mid(%ascii1,%asciicnumber,1) != $null {
      ;set %kaaaa7  $+ %asciicolor $+ $mid(%ascii1,%asciinumber,1) $+ 1
      ;set %ascii %ascii [ $+ [ %kaaaa7 ] ]
      set %ascii %ascii $+  $+ %asciiccolor $+ $mid(%ascii1,%asciicnumber,1) $+ 
      inc %asciicnumber
      If ( %asciiccolor == 15 ) set %asciiccolor 1
      inc %asciiccolor
      goto continue
    }
    say %ascii
    unset %ascii 
    unset %ascii1 
    unset %asciiccolor
    unset %asciicnumber
  }
} 


alias asciiblack {
  %ascii = $1-
  %ascii = $replace(%ascii,1,)
  %ascii = $replace(%ascii,2,)
  %ascii = $replace(%ascii,3,)
  %ascii = $replace(%ascii,1/4,)
  %ascii = $replace(%ascii,1/2,)
  %ascii = $replace(%ascii,3/4,)
  %ascii = $replace(%ascii,AE,)
  %ascii = $replace(%ascii,A,)
  %ascii = $replace(%ascii,B,)
  %ascii = $replace(%ascii,C,)
  %ascii = $replace(%ascii,D,)
  %ascii = $replace(%ascii,E,)
  %ascii = $replace(%ascii,I,)
  %ascii = $replace(%ascii,L,)
  %ascii = $replace(%ascii,N,)
  %ascii = $replace(%ascii,O,)
  %ascii = $replace(%ascii,R,)
  %ascii = $replace(%ascii,S,)
  %ascii = $replace(%ascii,U,)
  %ascii = $replace(%ascii,Y,) { 
    set %ascii1 %ascii
    unset %ascii
    set %ascii 
    set %asciicnumber 1 
    set %asciiccolor 2
    :continue
    if $mid(%ascii1,%asciicnumber,1) != $null {
      ;set %kaaaa7  $+ %asciicolor $+ $mid(%ascii1,%asciinumber,1) $+ 1
      ;set %ascii %ascii [ $+ [ %kaaaa7 ] ]
      set %ascii %ascii $+  $+ %asciiccolor $+ ,1 $+ $mid(%ascii1,%asciicnumber,1) $+ 
      inc %asciicnumber
      If ( %asciiccolor == 15 ) set %asciiccolor 1
      inc %asciiccolor
      goto continue
    }
    say %ascii
    unset %ascii 
    unset %ascii1 
    unset %asciiccolor
    unset %asciicnumber
  }
} 

alias brick1 { set %bricknum 1 | unset %brickmsg  | set %brickmsg  | set %brickcolor p
  :start
  if ( %brickcolor == p ) { set %bricknum2 4 | set %bricknum3 1 | set %brickcolor y | goto add }
  if ( %brickcolor == y ) { set %bricknum2 1 | set %bricknum3 4 | set %brickcolor p | goto add }
  :add
  if $mid($1-,%bricknum,1) != $null {
    set %brickmsg %brickmsg $+  $+ %bricknum2 $+ , $+ %bricknum3 $+ $mid($1-,%bricknum,1) $+ 
    inc %bricknum 
  goto start  }
  say %brickmsg
  unset %brick*
}

alias brick2 { set %bricknum 1 | unset %brickmsg  | set %brickmsg  | set %brickcolor p
  :start
  if ( %brickcolor == p ) { set %bricknum2 5 | set %bricknum3 15 | set %brickcolor y | goto add }
  if ( %brickcolor == y ) { set %bricknum2 15 | set %bricknum3 5 | set %brickcolor p | goto add }
  :add
  if $mid($1-,%bricknum,1) != $null {
    %brickmsg = %brickmsg $+   $+ %bricknum2 $+ , $+  %bricknum3 $+ $mid($1-,%bricknum,1) $+     
    inc %bricknum 
  goto start  }
  say %brickmsg
  unset %brick*
}

alias brick3 { set %bricknum 1 | unset %brickmsg  | set %brickmsg  | set %brickcolor p
  :start
  if ( %brickcolor == p ) { set %bricknum2 12 | set %bricknum3 11 | set %brickcolor y | goto add }
  if ( %brickcolor == y ) { set %bricknum2 11 | set %bricknum3 12 | set %brickcolor p | goto add }
  :add
  if $mid($1-,%bricknum,1) != $null {
    %brickmsg = %brickmsg $+   $+ %bricknum2 $+ , $+  %bricknum3 $+ $mid($1-,%bricknum,1) $+     
    inc %bricknum 
  goto start  }
  say %brickmsg
  unset %brick*
}

alias brick4 { set %bricknum 1 | unset %brickmsg  | set %brickmsg  | set %brickcolor p
  :start
  if ( %brickcolor == p ) { set %bricknum2 2 | set %bricknum3 14 | set %brickcolor y | goto add }
  if ( %brickcolor == y ) { set %bricknum2 14 | set %bricknum3 2 | set %brickcolor p | goto add }
  :add
  if $mid($1-,%bricknum,1) != $null {
    %brickmsg = %brickmsg $+   $+ %bricknum2 $+ , $+  %bricknum3 $+ $mid($1-,%bricknum,1) $+     
    inc %bricknum 
  goto start  }
  say %brickmsg
  unset %brick*
}


on *:INPUT:*: {

  if (%color.talker != $null) { if ($chr(47) isin $1) { goto end } | else { msg #  $+ %color.talker $+ $1- | halt } | :end }
  if (%partcaps == on) && ($left($1,1) != /) { msg $active $replace($1-,b,B,c,C,d,D,f,F,g,G,h,H,j,J,k,K,l,L,m,M,n,N,p,P,q,Q,r,R,s,S,t,T,v,V,w,W,x,X,z,Z) | halt }
  if (%elitetext == on) && ($left($1,1) != /) { msg $active $replace($1-,a,,b,,c,,d,,e,,i,,l,,n,,o,,r,,s,,u,,x,,y,,?,) | halt }
  if (%elitecolor.talker != $null) { if ($chr(47) isin $1) { goto end } | else { msg #  $+ %elitecolor.talker $replace($1-,a,,b,,c,,d,,e,,i,,l,,n,,o,,r,,s,,u,,x,,y,,?,) $+ | halt } | :end }


  if (%rainbowonblack == on) && ($left($1,1) != /) {
    set %rainbow1 $replace($1-,$chr(32),) | set %rainbow1 $left(%rainbow1,200) | set %rainbow2 $chr(3) $+ 4,1 | set %rainbow3 1 | set %rainbow4 1
    :loop
    set %rainbow2 %rainbow2 $+ $chr(3) $+ $gettok(4&7&8&9&12&11&13,%rainbow4,38) $+ $mid(%rainbow1,%rainbow3,1) 
    inc %rainbow3
    if ( $mid(%rainbow1,%rainbow3,1) != ) { inc %rainbow4 }
    if ( %rainbow4 > 7 ) { set %rainbow4 1 }
    if ( $mid(%rainbow1,%rainbow3,1) != $null ) { goto loop }
    say %rainbow2
  unset %rainbow1 %rainbow2 %rainbow3 %rainbow4 | halt  } 


  if (%ELITErainbowonblack == on) && ($left($1,1) != /) {

    set %rainbow1 $replace($1-, ,,a,,b,,c,,d,,e,,i,,l,,n,,o,,r,,s,,u,,x,,y,,?,,!,) | set %rainbow1 $left(%rainbow1,200) | set %rainbow2 $chr(3) $+ 4,1 | set %rainbow3 1 | set %rainbow4 1
    :loop
    set %rainbow2 %rainbow2 $+ $chr(3) $+ $gettok(4&7&8&9&12&11&13,%rainbow4,38) $+ $mid(%rainbow1,%rainbow3,1)
    inc %rainbow3
    if ( $mid(%rainbow1,%rainbow3,1) != ) { inc %rainbow4 }
    if ( %rainbow4 > 7 ) { set %rainbow4 1 }
    if ( $mid(%rainbow1,%rainbow3,1) != $null ) { goto loop }
    say %rainbow2
  unset %rainbow1 %rainbow2 %rainbow3 %rainbow4 | halt  } 

  if (%WOWascii == on) && ($left($1,1) != /) { msg $active $replace($1-,?,,!,,0,,a,,b,,c,,d,,e,,f,F,g,G,h,|-|,i,,j,J,k,I<,l,|_,m,M,n,,o,,p,,q,Q,r,,s,,t,T,u,,v,\/,w,\\',x,,y,,z,Z,,,,,,) | halt }  

}


alias bigwords {
  if ($1) {
    var %btxt = $replace($1-,$chr(32),), %txt, %l = $len(%btxt), %p = 0, %cmd = say, %txt.1, %txt.2, %txt.3, %txt.4, %txt.5, %t.1, %t.2, %t.3, %t.4, %t.5,
    while (%p < %l) { inc %p | %txt = %txt $+ $mid(%btxt,%p,1) $+ $iif(%p < %l,$chr(160),$chr(32)) }
    %txt.1 = $replace(%txt,,,,)
    %txt.2 = $replace(%txt,,,,)
    %txt.3 = $replace(%txt,,,,)
    %txt.4 = $replace(%txt,,,,)
    %txt.5 = $replace(%txt,,,,)
    if ($active == Status Window) %cmd = echo -tg

    ; ascii chars :D
    %t.1 = $replace(%txt.1,!,,$chr(34),,$chr(35),,$chr(36),,$chr(37),,$chr(38),,',,$chr(40),,$chr(41),,$chr(42),,+,,$chr(44),,-,,.,,/,,0,,1,,2,,3,,4,,5,,6,,7,,8,,9,,:,,;,,<,,=,,>,,?,,@,,A,,B,,C,,D,,E,,F,,G,,H,,I,,J,,K,,L,,M,,N,,O,,P,,Q,,R,,S,,T,,U,,V,,W,,X,,Y,,Z,,[,,\,,],,^,,_,,`,,$chr(123),,|,,$chr(125),,~,,,,,,,,,,,,,,,,,,,)
    %t.2 = $replace(%txt.2,!,,$chr(34),,$chr(35),,$chr(36),,$chr(37),,$chr(38),,',,$chr(40),,$chr(41),,$chr(42),,+,,$chr(44),,-,,.,,/,,0,,1,,2,,3,,4,,5,,6,,7,,8,,9,,:,,;,,<,,=,,>,,?,,@,,A,,B,,C,,D,,E,,F,,G,,H,,I,,J,,K,,L,,M,,N,,O,,P,,Q,,R,,S,,T,,U,,V,,W,,X,,Y,,Z,,[,,\,,],,^,,_,,`,,$chr(123),,|,,$chr(125),,~,,,,,,,,,,,,,,,,,,,)
    %t.3 = $replace(%txt.3,!,,$chr(34),,$chr(35),,$chr(36),,$chr(37),,$chr(38),,',,$chr(40),,$chr(41),,$chr(42),,+,,$chr(44),,-,,.,,/,,0,,1,,2,,3,,4,,5,,6,,7,,8,,9,,:,,;,,<,,=,,>,,?,,@,,A,,B,,C,,D,,E,,F,,G,,H,,I,,J,,K,,L,,M,,N,,O,,P,,Q,,R,,S,,T,,U,,V,,W,,X,,Y,,Z,,[,,\,,],,^,,_,,`,,$chr(123),,|,,$chr(125),,~,,,,,,,,,,,,,,,,,,,)
    %t.4 = $replace(%txt.4,!,,$chr(34),,$chr(35),,$chr(36),,$chr(37),,$chr(38),,',,$chr(40),,$chr(41),,$chr(42),,+,,$chr(44),,-,,.,,/,,0,,1,,2,,3,,4,,5,,6,,7,,8,,9,,:,,;,,<,,=,,>,,?,,@,,A,,B,,C,,D,,E,,F,,G,,H,,I,,J,,K,,L,,M,,N,,O,,P,,Q,,R,,S,,T,,U,,V,,W,,Y,,X,,Z,,[,,\,,],,^,,_,,`,,$chr(123),,|,,$chr(125),,~,,,,,,,,,,,,,,,,,,,)
    %t.5 = $replace(%txt.5,!,,$chr(34),,$chr(35),,$chr(36),,$chr(37),,$chr(38),,',,$chr(40),,$chr(41),,$chr(42),,+,,$chr(44),,-,,.,,/,,0,,1,,2,,3,,4,,5,,6,,7,,8,,9,,:,,;,,<,,=,,>,,?,,@,,A,,B,,C,,D,,E,,F,,G,,H,,I,,J,,K,,L,,M,,N,,O,,P,,Q,,R,,S,,T,,U,,V,,W,,X,,Y,,Z,,[,,\,,],,^,,_,,`,,$chr(123),,|,,$chr(125),,~,,,,,,,,,,,,,,,,,,,)

    ; amis chars :(
    %cmd $replace(%t.1,, ,, ,, ,,   )
    %cmd $replace(%t.2,,  ,, ,,      ,,  )
    %cmd $replace(%t.3,,,, ,,     ,,  )
    %cmd $replace(%t.4,,,, ,,     ,,  )
    %cmd $replace(%t.5,,,, ,,     ,,  )

    ;         
  }
}




alias color_ {
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
}

alias color2_ {
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
}

alias box_ {
  set %text $$?="Message"
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  unset %text
}

alias stair_ {
  set %text $$?="Message"
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text $+  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ %text
}

alias smallstair_ {
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) 
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160) $+   $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
  say  $+ $rand(0,15) $+ , $+ $rand(0,15) $+ $chr(0160)
}

alias checker_ {
  set %color1 $$?="Color1"
  set %color2 $$?="Color2"
  say  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
  say  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color2 $+ , $+ %color2 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+  $+ %color1 $+ , $+ %color1 $+ $chr(0160) $+ $chr(0160) $+ $chr(0160) $+ $chr(0160)
}

alias nice_ {
  say that's nice
  say like i care
  say if i cared
  say i would say
  say i care
  say k thx
}



alias big_ {
  unset %big.*
  if ($1 = ^^@) {
    set %ba.2 yes
    set %ba.1 $2-
    goto start
  }
  set %ba.1 $1-
  set %ba.2 no
  :start
  :nextba
  if (($left(%ba.1,1) = $null) || ($left(%ba.1,1) = $chr(32))) {
    if ($len(%ba.1) <= 1) {
      if (%ba.2 = yes) {
        goto opers
      }
      goto say
    }
    set %big.1 %big.1 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0
    set %big.3 %big.3 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = a) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0,1 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = b) {
    set %big.1 %big.1 0,0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0 0 0 0,1 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = c) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = d) {
    set %big.1 %big.1 0,0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = e) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = f) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = g) {
    set %big.1 %big.1 0,1 0,0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0,1 0,0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.5 %big.5 0,1 0,0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = h) {
    set %big.1 %big.1 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0,1 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = i) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0,0 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0,0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = J) {
    set %big.1 %big.1 0,1 0,0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 0,0 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0,0 0 0,1 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = k) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.3 %big.3 0,0 0 0 0 0,1 0 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = l) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = m) {
    set %big.1 %big.1 0,0 0 0 0 0,1 0 0 0,0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0,0 0 0 0 0 0,1 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0 0,0 0 0 0,1 0 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0,1 0 0 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = n) {
    set %big.1 %big.1 0,0 0 0 0,1 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0 0 0,1 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0,0 0,1 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0,0 0 0 0 0,1 0
    set %big.5 %big.5 0,0 0 0,1 0 0,0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = o) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = p) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = q) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0,0 0 0,1 0 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0,0 0 0,1 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0 0,1 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = r) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,0 0 0,1 0 0,0 0 0 0,1 0
    set %big.3 %big.3 0,0 0 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = s) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0 0,0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = t) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %big.3 %big.3 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = u) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = v) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,1 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0,0 0 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = w) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0 0 0 0 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0 0 0 0,0 0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,1 0,0 0 0,1 0 0,0 0 0 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0,0 0 0,0 0 0,1 0 0 0,0 0 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0,0 0 0,1 0 0 0 0 0,0 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = x) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,1 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.3 %big.3 0,1 0 0,0 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = y) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,1 0,0 0 0,1 0 0,0 0 0,1 0 0
    set %big.3 %big.3 0,1 0 0,0 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = z) {
    set %big.1 %big.1 0,0 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 0 0 0,0 0 0,1 0 0
    set %big.3 %big.3 0,1 0 0 0,0 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1 0,0 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5 0,0 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = -) {
    set %big.1 %big.1 0,1 0 0 0 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0 0 0 0
    set %big.3 %big.3 0,0 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ?) {
    set %big.1 %big.1 0,0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,1 0 0 0 0,0 0 0,1 0
    set %big.3 %big.3 0,1 0 0,0 0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0,0 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = !) {
    set %big.1 %big.1 0,1 0,0 0 0,1 0 0
    set %big.2 %big.2 0,0 0 0 0 0,1 0
    set %big.3 %big.3 0,1 0,0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1 0,0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ') {
    set %big.1 %big.1 0,0 0 0,1 0
    set %big.2 %big.2 0,1 0,0 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = :) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2 0,0 0 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,0 0 0,1 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(41)) {
    set %big.1 %big.1 0,0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0,0 0,1 0
    set %big.3 %big.3 0,1 0 0,0 0,1 0
    set %big.4 %big.4 0,1 0 0,0 0,1 0
    set %big.5 %big.5 0,0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(124)) {
    set %big.1 %big.1 0,0 0 0,1 0
    set %big.2 %big.2 0,0 0 0,1 0
    set %big.3 %big.3 0,0 0 0,1 0
    set %big.4 %big.4 0,0 0 0,1 0
    set %big.5 %big.5 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = <) {
    set %big.1 %big.1 0,1 0 0 0 0,0 0 0,1 0
    set %big.2 %big.2 0,1 0 0,0 0 0,1 0 0 0
    set %big.3 %big.3 0,0 0 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = >) {
    set %big.1 %big.1 0,0 0 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0,0 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0 0,0 0 0,1 0
    set %big.4 %big.4 0,1 0 0,0 0 0,1 0 0 0
    set %big.5 %big.5 0,0 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = .) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5 0,0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  set %ba.1 $mid(%ba.1,2,5000)
  goto nextba
  :opers
  notice @ $+ $chan %big.1
  notice @ $+ $chan %big.2
  notice @ $+ $chan %big.3
  notice @ $+ $chan %big.4
  notice @ $+ $chan %big.5
  goto end
  :say
  say %big.1
  say %big.2
  say %big.3
  say %big.4
  say %big.5
  :end
}

alias bigcolor_ {
  unset %big.*
  if ($1 = ^^@) {
    set %ba.2 yes
    set %ba.1 $2-
    goto start
  }
  set %ba.1 $1-
  set %ba.2 no
  :start
  :nextba
  if (($left(%ba.1,1) = $null) || ($left(%ba.1,1) = $chr(32))) {
    if ($len(%ba.1) <= 1) {
      if (%ba.2 = yes) {
        goto opers
      }
      goto say
    }
    set %big.1 %big.1 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0
    set %big.3 %big.3 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = a) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = b) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = c) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = d) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = e) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = f) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = g) {
    set %big.1 %big.1 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = h) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = i) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = J) {
    set %big.1 %big.1 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = k) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = l) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = m) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = n) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = o) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = p) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = q) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = r) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = s) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15)  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = t) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %big.3 %big.3 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = u) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = v) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = w) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0 0 0 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = x) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = y) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = z) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = -) {
    set %big.1 %big.1 0,1 0 0 0 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ?) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = !) {
    set %big.1 %big.1 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0 0,1 0
    set %big.3 %big.3 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ') {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2 0,1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = :) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(41)) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0
    set %big.2 %big.2 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0,1 0
    set %big.3 %big.3 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0,1 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(124)) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = <) {
    set %big.1 %big.1 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.2 %big.2 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.3 %big.3  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = >) {
    set %big.1 %big.1  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %big.4 %big.4 0,1 0  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = .) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5  $+ $rand(2,15) $+ , $+ $rand(2,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  set %ba.1 $mid(%ba.1,2,5000)
  goto nextba
  :opers
  notice @ $+ $chan %big.1
  notice @ $+ $chan %big.2
  notice @ $+ $chan %big.3
  notice @ $+ $chan %big.4
  notice @ $+ $chan %big.5
  goto end
  :say
  say %big.1
  say %big.2
  say %big.3
  say %big.4
  say %big.5
  :end
}


alias ctext {
  set %wort $replace($1-,$chr(32),$chr(160)) | set %ct $chr(3) | set %lg $len(%wort) | set %ls 1 | set %a  $+ $chr(3) $+ 3,1 | set %fr 03
  :loop1
  %a = %a $+ %ct $+ %fr $+ $mid(%wort,%ls,1)
  inc %ls
  inc %fr | if (%fr = 5) set %fr 7
  if (%fr = 10) set %fr 11
  if (%fr = 12) set %fr 13
  if (%fr < 10) %fr = 0 $+ %fr
  if (%fr > 13) set %fr 03
  if (%ls <= %lg) { goto loop1 }
  /say %a
}


alias rainbow {
  var %x = 1,%rb,%c1 = $chr(2),%c2 = $chr(32),%y = 1

  ;let's loop through the text and rainbowize!
  while ($mid($1-,%x,1) != $null) {
    var %c = $ifmatch

    ;if the letter is not a space, apply a color to it
    if (%c != %c2) {

      ;call $rc to get the color we're on
      var %rb = $+(%rb,$rc(%y),%c)

      ;%y is increased each time until we've gone through the colors, then we start again with red
      if (%y < 7) { inc %y }
      else var %y = 1
    }

    ;we got us a space! don't apply color.
    else var %rb = $+(%rb,%c1,%c2,%c1)

    ;next letter
    inc %x
  }
  if ($isid) return %rb
  else msg $active %rb
}

alias -l rc {
  ;this just returns the rainbow color that we're on.
  var %r = return,%a = $1
  if (%a = 1) %r 04,1
  elseif (%a = 2) %r 07,1
  elseif (%a = 3) %r 08,1
  elseif (%a = 4) %r 03,1
  elseif (%a = 5) %r 11,1
  elseif (%a = 6) %r 12,1
  elseif (%a = 7) %r 13,1
}


alias cm {
  var %msg $replace($1-,$chr(32),_)
  var %x 1
  while (%x < $calc($len(%msg) + 1)) {
    if (%x == 1) {
      set %out  $+ $rand(2,15) $+ $upper($left(%msg,1))
    }
    else {
      if ($int($calc(%x / 2)) == $calc(%x / 2)) {
        set %out %out $+  $+ $rand(2,15) $+ $lower($right($left(%msg,%x),1))
      }
      else {
        set %out %out $+  $+ $rand(2,15) $+ $upper($right($left(%msg,%x),1))
      }
    }
    inc %x
  }
  if ($isid == $true) { return $replace(%out,_,$chr(32)) }
  else { say $replace(%out,_,$chr(32)) }
}



alias xwned { /say  $+ $r(1,15) $+ Y $+ $r(1,15) $+ O $+ $r(1,15) $+ U  $+ $r(1,15) $+ H $+ $r(1,15) $+ A $+ $r(1,15) $+ V $+ $r(1,15) $+ E  $+ $r(1,15) $+ B $+ $r(1,15) $+ E $+ $r(1,15) $+ E $+ $r(1,15) $+ N  $+ $r(1,15) $+ P $+ $r(1,15) $+ U $+ $r(1,15) $+ T  $+ $r(1,15) $+ I $+ $r(1,15) $+ N  $+ $r(1,15) $+ T $+ $r(1,15) $+ H $+ $r(1,15) $+ E  $+ $r(1,15) $+ $r(A,Z) $+ W $+ $r(1,15) $+ N  } 


alias glowstick { 
  /say  
  /say 1,9[ $chr(9)   $1-    ] 

}

menu channel,query {
  -
  -= 1 & 1 1K =-
  .-= Color Talk =-
  ;;;;  ..Rainbow (back):/rb $$?="Text To Say?"
  ..Ascii (colour):/asciic $$?="Text To Say?"
  ..Ascii (no colour):/ascii $$?="Text To Say?"
  ..Ascii (colors on black):/asciiblack $$?="Text To Say?"
  ..Brick Colors
  ...Black/Red:/brick1 $$?="Text To Say?"
  ...Grey/Brown:/brick2 $$?="Text To Say?"
  ...Blue/Aqua:/brick3 $$?="Text To Say?"
  ...Blue/Grey:brick4 $$?="Text To Say?"
  ..Show Colors:/say These Are The Colors: | /say 1,0 0 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  
  ..Boxes
  ...Blue:/me 11,12@~12,12 $$? 11,12~@ | /me 11,12{15,15 $! 11,12}15,15 | /me 12,1215,1512,0 $! 12,1215,15 | /me 11,12{15,1515,0 $! 11,12}15,15 | /me 11,12@~12,12 $! 11,12~@15,15 | /me 15,15 $! 
  ...Green:/me 9,3@~3,3 $$? 9,3~@ | /me 9,3{15,15 $! 9,3}15,15 | /me 3,315,153,0 $! 3,315,15 | /me 9,3{15,1515,0 $! 9,3}15,15 | /me 9,3@~3,3 $! 9,3~@15,15 | /me 15,15 $! 
  ...Yellow:/me 7,8@~8,8 $$? 7,8~@ | /me 7,8{15,15 $! 7,8}15,15 | /me 7,815,157,0 $! 8,815,15 | /me 7,8{15,1515,0 $! 7,8}15,15 | /me 7,8@~8,8 $! 7,8~@15,15 | /me 15,15 $! 
  ...Red:/me 8,4@~4,4 $$? 8,4~@ | /me 8,4{15,15 $! 8,4}15,15 | /me 8,415,154,0 $! 4,415,15 | /me 8,4{15,1515,0 $! 8,4}15,15 | /me 8,4@~4,4 $! 8,4~@15,15 | /me 15,15 $! 
  ...Purple:/me 13,6@~6,6 $$? 13,6~@ | /me 13,6{15,15 $! 13,6}15,15 | /me 6,615,156,0 $! 6,615,15 | /me 13,6{15,1515,0 $! 13,6}15,15 | /me 13,6@~6,6 $! 13,6~@15,15 | /me 15,15 $! 
  ...Grey:/me 1,14@~14,14 $$? 1,14~@ | /me 1,14{15,15 $! 1,14}15,15 | /me 14,1415,151,0 $! 14,1415,15 | /me 1,14{15,1515,0 $! 1,14}15,15 | /me 1,14@~14,14 $! 1,14~@15,15 | /me 15,15 $! 

  .-= Color Talker =-
  ..Navy Blue:set %color.talker 2
  ..Green:set %color.talker 3
  ..Red:set %color.talker 4
  ..Maroon:set %color.talker 5
  ..Purple:set %color.talker 6
  ..Orange:set %color.talker 7
  ..Yellow:set %color.talker 8
  ..Light Green:set %color.talker 9
  ..Teal:set %color.talker 10
  ..Cyan:set %color.talker 11
  ..Blue:set %color.talker 12
  ..Pink:set %color.talker 13
  ..Silver:set %color.talker 15
  .-= Disable Color Talker =-:unset %color.talker
  .-= 1 1 1K =-
  ..Navy Blue:set %elitecolor.talker 2
  ..Green:set %elitecolor.talker 3
  ..Red:set %elitecolor.talker 4
  ..Maroon:set %elitecolor.talker 5
  ..Purple:set %elitecolor.talker 6
  ..Orange:set %elitecolor.talker 7
  ..Yellow:set %elitecolor.talker 8
  ..Light Green:set %elitecolor.talker 9
  ..Teal:set %elitecolor.talker 10
  ..Cyan:set %elitecolor.talker 11
  ..Blue:set %elitecolor.talker 12
  ..Pink:set %elitecolor.talker 13
  ..Silver:set %elitecolor.talker 15
  .-= Disable 1 1 1K =-:unset %elitecolor.talker


  .$iif(%rainbowonblack == on,-= Rainbow on Black -  =-,-= Rainbow on Black - FF =-) { if (%rainbowonblack == on) { unset %rainbowonblack } | else { set %rainbowonblack on } }
  .$iif(%ELITErainbowonblack == on,-= 1 Rainbow on Black -  =-,-= 1 Rainbow on Black - FF =-) { if (%ELITErainbowonblack == on) { unset %ELITErainbowonblack } | else { set %ELITErainbowonblack on } }

  .$iif(%elitetext == on,-= 1  -  =-,-= 1  - FF =-) { if (%elitetext == on) { unset %elitetext } | else { set %elitetext on } }
  .$iif(%WOWascii == on,-= WW  -  =-,-= WW  - FF =-) { if (%WOWascii == on) { unset %WOWascii } | else { set %WOWascii on } }
  .$iif(%partcaps == on,-= PaRTiaL CaPS - ON =-,-= PaRTiaL CaPS - OFF =-) { if (%partcaps == on) { unset %partcaps } | else { set %partcaps on } }

  .AscIITalk: { 
    set %ascii $$?="Enter Text To Say In AscII Talk?" | %ascii = $replace(%ascii,?,) | %ascii = $replace(%ascii,!,)
    %ascii = $replace(%ascii,0,) | %ascii = $replace(%ascii,a,) | %ascii = $replace(%ascii,b,) | %ascii = $replace(%ascii,c,)
    %ascii = $replace(%ascii,d,) | %ascii = $replace(%ascii,e,) | %ascii = $replace(%ascii,f,F) | %ascii = $replace(%ascii,g,G)
    %ascii = $replace(%ascii,h,|-|) | %ascii = $replace(%ascii,i,) | %ascii = $replace(%ascii,j,J) | %ascii = $replace(%ascii,k,I<)
    %ascii = $replace(%ascii,l,|_) | %ascii = $replace(%ascii,m,M) | %ascii = $replace(%ascii,n,) | %ascii = $replace(%ascii,o,)
    %ascii = $replace(%ascii,p,) | %ascii = $replace(%ascii,q,Q) | %ascii = $replace(%ascii,r,) | %ascii = $replace(%ascii,s,)
    %ascii = $replace(%ascii,t,T) | %ascii = $replace(%ascii,u,) | %ascii = $replace(%ascii,v,\/) | %ascii = $replace(%ascii,w,\\')
    %ascii = $replace(%ascii,x,) | %ascii = $replace(%ascii,y,) | %ascii = $replace(%ascii,z,Z) | %ascii = $replace(%ascii,,)
    %ascii = $replace(%ascii,,) | %ascii = $replace(%ascii,,) | say %ascii | unset %ascii
  }  

  .RainbowTalk: {
    set %rainbow.msg $$?="Enter Your Rainbow Text? (no numbers):"
    if ($len(%rainbow.msg) >= 52) { echo 4 *** %sd Your Rainbow Text Was Too Long ! Max 52 Characters ! | halt }
    else { set %length $len(%rainbow.msg) } | set %cycles 1
    :next
    if ($mid(%rainbow.msg,%cycles,1) == $null) { goto done }
    if ($mid(%rainbow.msg,%cycles,1) == $chr(32)) { set %rainbow.str $chr(3) $+ $r(1,9) $+ $chr(160) $+ $chr(3) }
    else { set %rainbow.str $chr(3) $+ $r(1,9) $+ $mid(%rainbow.msg,%cycles,1) $+ $chr(3) }
    set %rainbow %rainbow %rainbow.str | inc %cycles 1 | goto next
    :done
    %rainbow = $remove(%rainbow,$chr(32)) | say %rainbow
    unset %rainbow %rainbow.msg %rainbow.str %cycles %length
  }

  .Color Block big:/color_
  .Color Block small:/color2_
  .Color Box:/box_
  .Color Stair:/stair_
  .Color Stair small:/smallstair_
  .Color Checker:/checker_
  .Color Nice:/nice_
  .BigTalk:/bigwords $$?="What u wanna say in Big Words ?"
  .BIG Words:/big_ $$?="What u wanna say in Big Words ?"
  .BIG Words Color:/bigcolor_ $$?="What u wanna say in Big Words ?"

}