#alwan off
on *:iNPUT:*: { 
  if (/ !isin $1) {
    set %almanxmax 4 $1-
    %almanxmax = $replace(%almanxmax,a,4a)
    %almanxmax = $replace(%almanxmax,q,6Q)
    %almanxmax = $replace(%almanxmax,w,6w)
    %almanxmax = $replace(%almanxmax,e,4e)
    %almanxmax = $replace(%almanxmax,r,13R)
    %almanxmax = $replace(%almanxmax,t,6t)
    %almanxmax = $replace(%almanxmax,y,13Y)
    %almanxmax = $replace(%almanxmax,u,13u)
    %almanxmax = $replace(%almanxmax,i,12i)
    %almanxmax = $replace(%almanxmax,o,12o)
    %almanxmax = $replace(%almanxmax,p,6P)
    %almanxmax = $replace(%almanxmax,s,13S)
    %almanxmax = $replace(%almanxmax,d,4d)    
    %almanxmax = $replace(%almanxmax,f,12F)
    %almanxmax = $replace(%almanxmax,g,4G)
    %almanxmax = $replace(%almanxmax,h,12H)      
    %almanxmax = $replace(%almanxmax,j,4j)      
    %almanxmax = $replace(%almanxmax,k,6k)      
    %almanxmax = $replace(%almanxmax,l,4L)      
    %almanxmax = $replace(%almanxmax,z,12Z)      
    %almanxmax = $replace(%almanxmax,x,6x)      
    %almanxmax = $replace(%almanxmax,c,12c)      
    %almanxmax = $replace(%almanxmax,v,13v)      
    %almanxmax = $replace(%almanxmax,b,12B)
    %almanxmax = $replace(%almanxmax,n,4n)
    %almanxmax = $replace(%almanxmax,m,4M)
    %almanxmax = $replace(%almanxmax,$chr(40),7 $+ $chr(40) $+ )
    %almanxmax = $replace(%almanxmax,$chr(41),7 $+ $chr(41) $+ )
    %almanxmax = $replace(%almanxmax,*,3*)
    %almanxmax = $replace(%almanxmax,$chr(35),13#)
    %almanxmax = $replace(%almanxmax,+,6+)
    %almanxmax = $replace(%almanxmax,;,2;)
    %almanxmax = $replace(%almanxmax,:,2:)
    %almanxmax = $replace(%almanxmax,>,5>)
    %almanxmax = $replace(%almanxmax,<,5<)
    %almanxmax = $replace(%almanxmax,$chr(61),13=)
    %almanxmax = $replace(%almanxmax,$chr(123),4{)
    %almanxmax = $replace(%almanxmax,$chr(125),4})
    %almanxmax = $replace(%almanxmax,$chr(36),6$)
    %almanxmax = $replace(%almanxmax,$chr(64),5@)
    msg $active %almanxmax
    halt 
  }
}
#alwan end
menu menubar {
  -
     
  .On:.enable #alwan | echo $active 12on
  .Off:.disable #alwan | echo $active 12off
}
