/big {
  set %big $replace($1-,_,$chr(190))
  set %big2 $replace($1-,_,$chr(190))
  set %big3 $replace($1-,_,$chr(190))
  set %big4 $replace($1-,_,$chr(190))
  set %big5 $replace($1-,_,$chr(190))
  %big = $replace(%big,1,       )
  %big = $replace(%big,2,       )
  %big = $replace(%big,3,       )
  %big = $replace(%big,4,       )
  %big = $replace(%big,5,       )
  %big = $replace(%big,6,       )
  %big = $replace(%big,7,       )
  %big = $replace(%big,8,       )
  %big = $replace(%big,9,       )
  %big = $replace(%big,0,       )
  %big = $replace(%big,A,       )
  %big = $replace(%big,B,       )
  %big = $replace(%big,C,       )
  %big = $replace(%big,D,       )
  %big = $replace(%big,E,      )
  %big = $replace(%big,F,      )
  %big = $replace(%big,G,       )
  %big = $replace(%big,H,        )
  %big = $replace(%big,I,     )
  %big = $replace(%big,J,       )
  %big = $replace(%big,K,       )
  %big = $replace(%big,L,        )
  %big = $replace(%big,M,        )
  %big = $replace(%big,N,       )
  %big = $replace(%big,O,       )
  %big = $replace(%big,P,       )
  %big = $replace(%big,Q,        )
  %big = $replace(%big,R,        )
  %big = $replace(%big,S,       )
  %big = $replace(%big,T,       )
  %big = $replace(%big,U,        )
  %big = $replace(%big,V,         )
  %big = $replace(%big,W,        )
  %big = $replace(%big,X,        )
  %big = $replace(%big,Y,         )
  %big = $replace(%big,Z,       )
  %big = $replace(%big,`,    )
  %big = $replace(%big,~,         )
  %big = $replace(%big,!,    )
  %big = $replace(%big,@,         )
  %big = $replace(%big,$chr(35),            )
  %big = $replace(%big,%,       )
  %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,$chr(190),         )
  %big = $replace(%big,=,        )
  %big = $replace(%big,+,       )
  %big = $replace(%big,[,    )
  %big = $replace(%big,],    )
  %big = $replace(%big,$chr(123),      )
  %big = $replace(%big,$chr(125),      )
  %big = $replace(%big,;,    )
  %big = $replace(%big,:,    )
  %big = $replace(%big,',    )
  %big = $replace(%big,",      )
  %big = $replace(%big,$chr(44),    )
  %big = $replace(%big,.,    )
  %big = $replace(%big,<,          )
  %big = $replace(%big,>,          )
  %big = $replace(%big,/,       )
  %big = $replace(%big,?,       )
  %big = $replace(%big,|,     )
  %big = $replace(%big,\,       )
  %big = $replace(%big,$,   |    )
  %big = $replace(%big,$chr(32),     )
  %big = $replace(%big,•,       )
  %big = $replace(%big,,              )
  %big = $replace(%big,¡,    )
  %big = $replace(%big,¢,   |   )
  %big = $replace(%big,¯,         )
  %big = $replace(%big,°,       )
  %big = $replace(%big,¿,       )
  %big = $replace(%big,×,       )
  %big = $replace(%big,Þ,       )
  %big = $replace(%big,þ,       )
  %big = $replace(%big,ß,        )
  %big = $replace(%big,÷,       )
  %big = $replace(%big,Æ,           )
  say %big
  big2
}
/big2 {
  %big2 = $replace(%big2,1,       )
  %big2 = $replace(%big2,2,       )
  %big2 = $replace(%big2,3,       )
  %big2 = $replace(%big2,4,       )
  %big2 = $replace(%big2,5,       )
  %big2 = $replace(%big2,6,       )
  %big2 = $replace(%big2,7,       )
  %big2 = $replace(%big2,8,       )
  %big2 = $replace(%big2,9,       )
  %big2 = $replace(%big2,0,       )
  %big2 = $replace(%big2,A,       )
  %big2 = $replace(%big2,B,       )
  %big2 = $replace(%big2,C,       )
  %big2 = $replace(%big2,D,       )
  %big2 = $replace(%big2,E,      )
  %big2 = $replace(%big2,F,      )
  %big2 = $replace(%big2,G,       )
  %big2 = $replace(%big2,H,        )
  %big2 = $replace(%big2,I,     )
  %big2 = $replace(%big2,J,       )
  %big2 = $replace(%big2,K,       )
  %big2 = $replace(%big2,L,        )
  %big2 = $replace(%big2,M,        )
  %big2 = $replace(%big2,N,       )
  %big2 = $replace(%big2,O,       )
  %big2 = $replace(%big2,P,       )
  %big2 = $replace(%big2,Q,        )
  %big2 = $replace(%big2,R,        )
  %big2 = $replace(%big2,S,       )
  %big2 = $replace(%big2,T,       )
  %big2 = $replace(%big2,U,        )
  %big2 = $replace(%big2,V,         )
  %big2 = $replace(%big2,W,        )
  %big2 = $replace(%big2,X,        )
  %big2 = $replace(%big2,Y,         )
  %big2 = $replace(%big2,Z,       )
  %big2 = $replace(%big2,`,    )
  %big2 = $replace(%big2,~,         )
  %big2 = $replace(%big2,!,    )
  %big2 = $replace(%big2,@,         )
  %big2 = $replace(%big2,$chr(35),            )
  %big2 = $replace(%big2,%,       )
  %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,$chr(190),         )
  %big2 = $replace(%big2,=,        )
  %big2 = $replace(%big2,+,       )
  %big2 = $replace(%big2,[,    )
  %big2 = $replace(%big2,],    )
  %big2 = $replace(%big2,$chr(123),      )
  %big2 = $replace(%big2,$chr(125),      )
  %big2 = $replace(%big2,;,    )
  %big2 = $replace(%big2,:,    )
  %big2 = $replace(%big2,',    )
  %big2 = $replace(%big2,",      )
  %big2 = $replace(%big2,$chr(44),    )
  %big2 = $replace(%big2,.,    )
  %big2 = $replace(%big2,<,          )
  %big2 = $replace(%big2,>,          )
  %big2 = $replace(%big2,/,       )
  %big2 = $replace(%big2,?,       )
  %big2 = $replace(%big2,|,     )
  %big2 = $replace(%big2,\,       )
  %big2 = $replace(%big2,$,   |    )
  %big2 = $replace(%big2,$chr(32),     )
  %big2 = $replace(%big2,•,       )
  %big2 = $replace(%big2,,              )
  %big2 = $replace(%big2,¡,    )
  %big2 = $replace(%big2,¢,   |   )
  %big2 = $replace(%big2,¯,         )
  %big2 = $replace(%big2,°,       )
  %big2 = $replace(%big2,¿,       )
  %big2 = $replace(%big2,×,       )
  %big2 = $replace(%big2,Þ,       )
  %big2 = $replace(%big2,þ,       )
  %big2 = $replace(%big2,ß,        )
  %big2 = $replace(%big2,÷,       )
  %big2 = $replace(%big2,Æ,           )
  say %big2
  big3
}
/big3 {
  %big3 = $replace(%big3,1,       )
  %big3 = $replace(%big3,2,       )
  %big3 = $replace(%big3,3,       )
  %big3 = $replace(%big3,4,       )
  %big3 = $replace(%big3,5,       )
  %big3 = $replace(%big3,6,       )
  %big3 = $replace(%big3,7,       )
  %big3 = $replace(%big3,8,       )
  %big3 = $replace(%big3,9,       )
  %big3 = $replace(%big3,0,       )
  %big3 = $replace(%big3,A,       )
  %big3 = $replace(%big3,B,       )
  %big3 = $replace(%big3,C,       )
  %big3 = $replace(%big3,D,       )
  %big3 = $replace(%big3,E,      )
  %big3 = $replace(%big3,F,      )
  %big3 = $replace(%big3,G,       )
  %big3 = $replace(%big3,H,        )
  %big3 = $replace(%big3,I,     )
  %big3 = $replace(%big3,J,       )
  %big3 = $replace(%big3,K,       )
  %big3 = $replace(%big3,L,        )
  %big3 = $replace(%big3,M,        )
  %big3 = $replace(%big3,N,       )
  %big3 = $replace(%big3,O,       )
  %big3 = $replace(%big3,P,       )
  %big3 = $replace(%big3,Q,        )
  %big3 = $replace(%big3,R,        )
  %big3 = $replace(%big3,S,       )
  %big3 = $replace(%big3,T,       )
  %big3 = $replace(%big3,U,        )
  %big3 = $replace(%big3,V,         )
  %big3 = $replace(%big3,W,        )
  %big3 = $replace(%big3,X,        )
  %big3 = $replace(%big3,Y,         )
  %big3 = $replace(%big3,Z,       )
  %big3 = $replace(%big3,`,    )
  %big3 = $replace(%big3,~,         )
  %big3 = $replace(%big3,!,    )
  %big3 = $replace(%big3,@,         )
  %big3 = $replace(%big3,$chr(35),            )
  %big3 = $replace(%big3,%,       )
  %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,$chr(190),         )
  %big3 = $replace(%big3,=,        )
  %big3 = $replace(%big3,+,       )
  %big3 = $replace(%big3,[,    )
  %big3 = $replace(%big3,],    )
  %big3 = $replace(%big3,$chr(123),      )
  %big3 = $replace(%big3,$chr(125),      )
  %big3 = $replace(%big3,;,    )
  %big3 = $replace(%big3,:,    )
  %big3 = $replace(%big3,',    )
  %big3 = $replace(%big3,",      )
  %big3 = $replace(%big3,$chr(44),    )
  %big3 = $replace(%big3,.,    )
  %big3 = $replace(%big3,<,          )
  %big3 = $replace(%big3,>,          )
  %big3 = $replace(%big3,/,       )
  %big3 = $replace(%big3,?,       )
  %big3 = $replace(%big3,|,     )
  %big3 = $replace(%big3,\,       )
  %big3 = $replace(%big3,$,   |    )
  %big3 = $replace(%big3,$chr(32),     )
  %big3 = $replace(%big3,•,       )
  %big3 = $replace(%big3,,              )
  %big3 = $replace(%big3,¡,    )
  %big3 = $replace(%big3,¢,   |   )
  %big3 = $replace(%big3,¯,         )
  %big3 = $replace(%big3,°,       )
  %big3 = $replace(%big3,¿,       )
  %big3 = $replace(%big3,×,       )
  %big3 = $replace(%big3,Þ,       )
  %big3 = $replace(%big3,þ,       )
  %big3 = $replace(%big3,ß,        )
  %big3 = $replace(%big3,÷,       )
  %big3 = $replace(%big3,Æ,           )
  say %big3
  big4
}
/big4 {
  %big4 = $replace(%big4,1,       )
  %big4 = $replace(%big4,2,       )
  %big4 = $replace(%big4,3,       )
  %big4 = $replace(%big4,4,       )
  %big4 = $replace(%big4,5,       )
  %big4 = $replace(%big4,6,       )
  %big4 = $replace(%big4,7,       )
  %big4 = $replace(%big4,8,       )
  %big4 = $replace(%big4,9,       )
  %big4 = $replace(%big4,0,       )
  %big4 = $replace(%big4,A,       )
  %big4 = $replace(%big4,B,       )
  %big4 = $replace(%big4,C,       )
  %big4 = $replace(%big4,D,       )
  %big4 = $replace(%big4,E,      )
  %big4 = $replace(%big4,F,      )
  %big4 = $replace(%big4,G,       )
  %big4 = $replace(%big4,H,        )
  %big4 = $replace(%big4,I,     )
  %big4 = $replace(%big4,J,       )
  %big4 = $replace(%big4,K,       )
  %big4 = $replace(%big4,L,       )
  %big4 = $replace(%big4,M,        )
  %big4 = $replace(%big4,N,       )
  %big4 = $replace(%big4,O,       )
  %big4 = $replace(%big4,P,       )
  %big4 = $replace(%big4,Q,        )
  %big4 = $replace(%big4,R,        )
  %big4 = $replace(%big4,S,       )
  %big4 = $replace(%big4,T,       )
  %big4 = $replace(%big4,U,        )
  %big4 = $replace(%big4,V,         )
  %big4 = $replace(%big4,W,        )
  %big4 = $replace(%big4,X,        )
  %big4 = $replace(%big4,Y,         )
  %big4 = $replace(%big4,Z,       )
  %big4 = $replace(%big4,`,    )
  %big4 = $replace(%big4,~,         )
  %big4 = $replace(%big4,!,    )
  %big4 = $replace(%big4,@,         )
  %big4 = $replace(%big4,$chr(35),            )
  %big4 = $replace(%big4,%,       )
  %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,$chr(190),         )
  %big4 = $replace(%big4,=,        )
  %big4 = $replace(%big4,+,       )
  %big4 = $replace(%big4,[,    )
  %big4 = $replace(%big4,],    )
  %big4 = $replace(%big4,$chr(123),      )
  %big4 = $replace(%big4,$chr(125),      )
  %big4 = $replace(%big4,;,    )
  %big4 = $replace(%big4,:,    )
  %big4 = $replace(%big4,',    )
  %big4 = $replace(%big4,",      )
  %big4 = $replace(%big4,$chr(44),    )
  %big4 = $replace(%big4,.,    )
  %big4 = $replace(%big4,<,          )
  %big4 = $replace(%big4,>,          )
  %big4 = $replace(%big4,/,       )
  %big4 = $replace(%big4,?,       )
  %big4 = $replace(%big4,|,     )
  %big4 = $replace(%big4,\,       )
  %big4 = $replace(%big4,$,   |    )
  %big4 = $replace(%big4,$chr(32),     )
  %big4 = $replace(%big4,•,       )
  %big4 = $replace(%big4,,              )
  %big4 = $replace(%big4,¡,    )
  %big4 = $replace(%big4,¢,   |   )
  %big4 = $replace(%big4,¯,         )
  %big4 = $replace(%big4,°,       )
  %big4 = $replace(%big4,¿,       )
  %big4 = $replace(%big4,×,       )
  %big4 = $replace(%big4,Þ,       )
  %big4 = $replace(%big4,þ,       )
  %big4 = $replace(%big4,ß,        )
  %big4 = $replace(%big4,÷,       )
  %big4 = $replace(%big4,Æ,           )
  say %big4
  big5
}
/big5 {
  %big5 = $replace(%big5,1,       )
  %big5 = $replace(%big5,2,       )
  %big5 = $replace(%big5,3,       )
  %big5 = $replace(%big5,4,       )
  %big5 = $replace(%big5,5,       )
  %big5 = $replace(%big5,6,       )
  %big5 = $replace(%big5,7,       )
  %big5 = $replace(%big5,8,       )
  %big5 = $replace(%big5,9,       )
  %big5 = $replace(%big5,0,       )
  %big5 = $replace(%big5,A,       )
  %big5 = $replace(%big5,B,       )
  %big5 = $replace(%big5,C,       )
  %big5 = $replace(%big5,D,       )
  %big5 = $replace(%big5,E,      )
  %big5 = $replace(%big5,F,      )
  %big5 = $replace(%big5,G,       )
  %big5 = $replace(%big5,H,        )
  %big5 = $replace(%big5,I,     )
  %big5 = $replace(%big5,J,       )
  %big5 = $replace(%big5,K,       )
  %big5 = $replace(%big5,L,        )
  %big5 = $replace(%big5,M,        )
  %big5 = $replace(%big5,N,       )
  %big5 = $replace(%big5,O,       )
  %big5 = $replace(%big5,P,       )
  %big5 = $replace(%big5,Q,        )
  %big5 = $replace(%big5,R,        )
  %big5 = $replace(%big5,S,       )
  %big5 = $replace(%big5,T,       )
  %big5 = $replace(%big5,U,        )
  %big5 = $replace(%big5,V,         )
  %big5 = $replace(%big5,W,        )
  %big5 = $replace(%big5,X,        )
  %big5 = $replace(%big5,Y,         )
  %big5 = $replace(%big5,Z,       )
  %big5 = $replace(%big5,`,    )
  %big5 = $replace(%big5,~,         )
  %big5 = $replace(%big5,!,    )
  %big5 = $replace(%big5,@,         )
  %big5 = $replace(%big5,$chr(35),            )
  %big5 = $replace(%big5,%,       )
  %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,$chr(190),         )
  %big5 = $replace(%big5,=,        )
  %big5 = $replace(%big5,+,       )
  %big5 = $replace(%big5,[,    )
  %big5 = $replace(%big5,],    )
  %big5 = $replace(%big5,$chr(123),      )
  %big5 = $replace(%big5,$chr(125),      )
  %big5 = $replace(%big5,;,    )
  %big5 = $replace(%big5,:,    )
  %big5 = $replace(%big5,',    )
  %big5 = $replace(%big5,",      )
  %big5 = $replace(%big5,$chr(44),    )
  %big5 = $replace(%big5,.,    )
  %big5 = $replace(%big5,<,          )
  %big5 = $replace(%big5,>,          )
  %big5 = $replace(%big5,/,       )
  %big5 = $replace(%big5,?,       )
  %big5 = $replace(%big5,|,     )
  %big5 = $replace(%big5,\,       )
  %big5 = $replace(%big5,$,   |    )
  %big5 = $replace(%big5,$chr(32),     )
  %big5 = $replace(%big5,•,       )
  %big5 = $replace(%big5,,              )
  %big5 = $replace(%big5,¡,    )
  %big5 = $replace(%big5,¢,   |   )
  %big5 = $replace(%big5,¯,         )
  %big5 = $replace(%big5,°,       )
  %big5 = $replace(%big5,¿,       )
  %big5 = $replace(%big5,×,       )
  %big5 = $replace(%big5,Þ,       )
  %big5 = $replace(%big5,þ,       )
  %big5 = $replace(%big5,ß,        )
  %big5 = $replace(%big5,÷,       )
  %big5 = $replace(%big5,Æ,           )
  say %big5
  unset %big $1-
  unset %big2 $1-
  unset %big3 $1-
  unset %big4 $1-
  unset %big5 $1-
}