alias big { set %big $1- set %big2 $1- set %big3 $1- set %big4 $1- set %big5 $1- %big = $replace(%big,l,   ) %big = $replace(%big,r,   ) %big = $replace(%big,a,   ) %big = $replace(%big,s,   ) %big = $replace(%big,e,  ) %big = $replace(%big,j,   ) %big = $replace(%big,m,     ) %big = $replace(%big,$chr(32), ) %big = $replace(%big,i,  ) %big = $replace(%big,o,   ) %big = $replace(%big,u,    ) %big = $replace(%big,!,   ) %big = $replace(%big,b,  ) %big = $replace(%big,n,    ) %big = $replace(%big,?,  ) %big = $replace(%big,$chr(35),     ) %big = $replace(%big,t,  ) %big = $replace(%big,g,   ) %big = $replace(%big,c,   ) %big = $replace(%big,p,  ) %big = $replace(%big,w,    ) %big = $replace(%big,z,  ) %big = $replace(%big,8,   ) %big = $replace(%big,0,   ) %big = $replace(%big,k,    ) %big = $replace(%big,y,    ) %big = $replace(%big,',   ) %big = $replace(%big,+, ) %big = $replace(%big,=, ) %big = $replace(%big,$chr(40),   ) %big = $replace(%big,$chr(41),  ) %big = $replace(%big,:, ) %big = $replace(%big,., ) %big = $replace(%big,/,   ) %big = $replace(%big,\,  ) %big = $replace(%big,%,    ) %big = $replace(%big,h,    ) %big = $replace(%big,f,  ) %big = $replace(%big,v,    ) %big = $replace(%big,°, ) %big = $replace(%big,d,  ) %big = $replace(%big,x,    ) say %big big2 } alias big2 { %big2 = $replace(%big2,l,   ) %big2 = $replace(%big2,r,     ) %big2 = $replace(%big2,a,    ) %big2 = $replace(%big2,m,  ) %big2 = $replace(%big2,s,  ) %big2 = $replace(%big2,e,  ) %big2 = $replace(%big2,j,   ) %big2 = $replace(%big2,$chr(32), ) %big2 = $replace(%big2,i,   ) %big2 = $replace(%big2,o,    ) %big2 = $replace(%big2,u,    ) %big2 = $replace(%big2,!,   ) %big2 = $replace(%big2,b,    ) %big2 = $replace(%big2,n,    ) %big2 = $replace(%big2,?,   ) %big2 = $replace(%big2,$chr(35),   ) %big2 = $replace(%big2,t,   ) %big2 = $replace(%big2,g,  ) %big2 = $replace(%big2,c,    ) %big2 = $replace(%big2,p,    ) %big2 = $replace(%big2,w,    ) %big2 = $replace(%big2,z,   ) %big2 = $replace(%big2,8,    ) %big2 = $replace(%big2,0,    ) %big2 = $replace(%big2,k,    ) %big2 = $replace(%big2,y,    ) %big2 = $replace(%big2,',   ) %big2 = $replace(%big2,+,   ) %big2 = $replace(%big2,=,  ) %big2 = $replace(%big2,$chr(40),   ) %big2 = $replace(%big2,$chr(41),   ) %big2 = $replace(%big2,:,  ) %big2 = $replace(%big2,., ) %big2 = $replace(%big2,/,   ) %big2 = $replace(%big2,\,   ) %big2 = $replace(%big2,%,   ) %big2 = $replace(%big2,h,    ) %big2 = $replace(%big2,f,  ) %big2 = $replace(%big2,v,     ) %big2 = $replace(%big2,°, ) %big2 = $replace(%big2,d,    ) %big2 = $replace(%big2,x,     ) say %big2 big3 } alias big3 { %big3 = $replace(%big3,l,   ) %big3 = $replace(%big3,r,   ) %big3 = $replace(%big3,a,  ) %big3 = $replace(%big3,m,      ) %big3 = $replace(%big3,s,   ) %big3 = $replace(%big3,e,  ) %big3 = $replace(%big3,j,   ) %big3 = $replace(%big3,$chr(32), ) %big3 = $replace(%big3,i,   )2 %big3 = $replace(%big3,o,    ) %big3 = $replace(%big3,u,    ) %big3 = $replace(%big3,!,   ) %big3 = $replace(%big3,b,  ) %big3 = $replace(%big3,n,  ) %big3 = $replace(%big3,?,   ) %big3 = $replace(%big3,$chr(35),     ) %big3 = $replace(%big3,t,   ) %big3 = $replace(%big3,g,    ) %big3 = $replace(%big3,c,  ) %big3 = $replace(%big3,p,  ) %big3 = $replace(%big3,w,      ) %big3 = $replace(%big3,z,   ) %big3 = $replace(%big3,8,   ) %big3 = $replace(%big3,0,    ) %big3 = $replace(%big3,k,  ) %big3 = $replace(%big3,y,   ) %big3 = $replace(%big3,', ) %big3 = $replace(%big3,+,  ) %big3 = $replace(%big3,=, ) %big3 = $replace(%big3,$chr(40),  ) %big3 = $replace(%big3,$chr(41),   ) %big3 = $replace(%big3,:, ) %big3 = $replace(%big3,., ) %big3 = $replace(%big3,/,   ) %big3 = $replace(%big3,\,   ) %big3 = $replace(%big3,%,   ) %big3 = $replace(%big3,h,  ) %big3 = $replace(%big3,f,  ) %big3 = $replace(%big3,v,     ) %big3 = $replace(%big3,°,  ) %big3 = $replace(%big3,d,    ) %big3 = $replace(%big3,x,   ) say %big3 big4 } alias big4 { %big4 = $replace(%big4,l,  ) %big4 = $replace(%big4,r,     ) %big4 = $replace(%big4,a,    ) %big4 = $replace(%big4,s,   ) %big4 = $replace(%big4,e,  ) %big4 = $replace(%big4,j,    ) %big4 = $replace(%big4,m,    ) %big4 = $replace(%big4,$chr(32), ) %big4 = $replace(%big4,i,   ) %big4 = $replace(%big4,o,    ) %big4 = $replace(%big4,u,    ) %big4 = $replace(%big4,!, ) %big4 = $replace(%big4,b,    ) %big4 = $replace(%big4,n,    ) %big4 = $replace(%big4,?, ) %big4 = $replace(%big4,$chr(35),  ) %big4 = $replace(%big4,t,   ) %big4 = $replace(%big4,g,    ) %big4 = $replace(%big4,c,    ) %big4 = $replace(%big4,p,  ) %big4 = $replace(%big4,w,  ) %big4 = $replace(%big4,z,   ) %big4 = $replace(%big4,8,    ) %big4 = $replace(%big4,0,    ) %big4 = $replace(%big4,k,    ) %big4 = $replace(%big4,y,   ) %big4 = $replace(%big4,', ) %big4 = $replace(%big4,+,   ) %big4 = $replace(%big4,=,  ) %big4 = $replace(%big4,$chr(40),   ) %big4 = $replace(%big4,$chr(41),   ) %big4 = $replace(%big4,:,  ) %big4 = $replace(%big4,., ) %big4 = $replace(%big4,/,   ) %big4 = $replace(%big4,%,   ) %big4 = $replace(%big4,\,   ) %big4 = $replace(%big4,h,    ) %big4 = $replace(%big4,f,  ) %big4 = $replace(%big4,v,    ) %big4 = $replace(%big4,°, ) %big4 = $replace(%big4,d,    ) %big4 = $replace(%big4,x,     ) say %big4 big5 } alias big5 { %big5 = $replace(%big5,l,   ) %big5 = $replace(%big5,r,     ) %big5 = $replace(%big5,a,    ) %big5 = $replace(%big5,s,  ) %big5 = $replace(%big5,e,  ) %big5 = $replace(%big5,j,   ) %big5 = $replace(%big5,m,    ) %big5 = $replace(%big5,$chr(32), ) %big5 = $replace(%big5,i,  ) %big5 = $replace(%big5,o,   ) %big5 = $replace(%big5,u,   ) %big5 = $replace(%big5,!,   ) %big5 = $replace(%big5,b,  ) %big5 = $replace(%big5,n,    ) %big5 = $replace(%big5,?,   ) %big5 = $replace(%big5,$chr(35),     ) %big5 = $replace(%big5,t,   ) %big5 = $replace(%big5,g,   ) %big5 = $replace(%big5,c,   ) %big5 = $replace(%big5,p,  ) %big5 = $replace(%big5,w,     ) %big5 = $replace(%big5,z,  ) %big5 = $replace(%big5,8,   ) %big5 = $replace(%big5,0,   ) %big5 = $replace(%big5,k,    ) %big5 = $replace(%big5,y,   ) %big5 = $replace(%big5,', ) %big5 = $replace(%big5,+, ) %big5 = $replace(%big5,=, ) %big5 = $replace(%big5,$chr(40),   ) %big5 = $replace(%big5,$chr(41),  ) %big5 = $replace(%big5,:, ) %big5 = $replace(%big5,/,  ) %big5 = $replace(%big5,.,  ) %big5 = $replace(%big5,\,   ) %big5 = $replace(%big5,%,    ) %big5 = $replace(%big5,h,    ) %big5 = $replace(%big5,f,  ) %big5 = $replace(%big5,v,   ) %big5 = $replace(%big5,°, ) %big5 = $replace(%big5,d,  ) %big5 = $replace(%big5,x,    ) say %big5 unset %big $1- unset %big2 $1- unset %big3 $1- unset %big4 $1- unset %big5 $1- }