Alexandra™€Ø¤ Pname1 Script

;**********start copying the script in this line**********
;pname1 Script by Alexandra™€Ø¤
;usage: type pname1 and color if u want one ( white, red, black, orange,yellow) or only pname1 will paint it random multicolor, target a person to paint the person name make it with not target to paint your name pname1 script by Alexandra™€Ø¤
{ { WHOTARGET WHONAME elnombre = }
{ USERNAME elnombre = } WHOTARGET IFELSE
elnombre strlen ancho = ancho 7 * 2 / ancho =
MOUSEPOS swap x = y = ancho x -= 4 y += x y PENPOS PAINTCLEAR PENFRONT 2 pensize
{ "$1" grepsub variable =
{ "letra\\" variable & variable = } { "letra" variable & variable = }
variable "\*" == variable "\." == OR variable "\+" == OR variable "$" == OR variable "$" == OR variable "\[" == OR variable "\]" == OR variable "\\" == OR
variable "\$" == OR IFELSE
"$2" grepsub elnombre = 255 RANDOM 255 RANDOM 255 RANDOM pencolor
{ 255 255 255 pencolor } CHATSTR LOWERCASE "white" substr if
{ 255 0 0 pencolor } CHATSTR LOWERCASE "red" substr if
{ 0 0 0 pencolor } CHATSTR LOWERCASE "black" substr if
{ 255 121 0 pencolor } CHATSTR LOWERCASE "orange" substr if
{ 255 223 0 pencolor } CHATSTR LOWERCASE "yellow" substr if
{ 4 -11 lineto 4 12 lineto -7 -4 pento 7 0 lineto 3 3 pento } "letraA" variable GREPSTR
"letraÀ" variable GREPSTR OR
"letraÁ" variable GREPSTR OR "letraÂ" variable GREPSTR OR "letraÃ" variable GREPSTR OR "letraÄ" variable GREPSTR OR "letraÅ" variable GREPSTR OR IF
{ 0 -12 lineto 0 6 pento 2 -2 lineto 2 0 lineto 2 2 lineto 0 4 lineto -2 2 lineto -2 0 lineto
-2 -2 lineto 9 2 pento } "letrab" variable GREPSTR IF
{ 0 -11 lineto 8 0 lineto 2 2 lineto -3 3 lineto 3 2 lineto 0 2 lineto -3 2 lineto
-8 0 lineto 1 -6 pento 7 0 lineto 6 6 pento } "letraB" variable GREPSTR
"letraß" variable GREPSTR OR IF
{ 9 -9 pento -2 -2 lineto -4 0 lineto -3 3 lineto 0 5 lineto 3 3 lineto 5 0 lineto
2 -2 lineto 2 2 pento } "letraC" variable GREPSTR IF
{ 0 -11 lineto 6 0 lineto 3 3 lineto 0 5 lineto -3 3 lineto -6 0 lineto 12 0 pento } "letraD" variable GREPSTR IF
{ 9 -11 pento -8 0 lineto 0 11 lineto 9 0 lineto -9 -6 pento 8 0 lineto 3 6 pento } "letraE" variable GREPSTR IF
{ 0 -11 lineto 8 0 lineto -8 6 pento 7 0 lineto 3 5 pento } "letraF" variable GREPSTR IF
{ 8 -9 pento -2 -2 lineto -3 0 lineto -3 3 lineto 0 5 lineto 3 3 lineto 3 0 lineto 3 -3 lineto
0 -2 lineto -6 0 lineto 9 5 pento } "letraG" variable GREPSTR IF
{ 0 -12 lineto 0 6 pento 8 0 lineto 0 -5 pento 0 12 lineto 3 -1 pento } "letraH" variable GREPSTR IF
{ 0 -12 lineto 3 12 pento } "letraI" variable GREPSTR IF
{ 0 -3 pento 0 2 lineto 2 1 lineto 2 0 lineto 1 -1 lineto 0 -11 lineto 3 12 pento } "letraJ" variable GREPSTR IF
{ 0 -12 lineto 0 9 pento 9 -9 lineto -5 5 pento 0 2 lineto 5 6 lineto 2 -1 pento } "letraK" variable GREPSTR IF
{ 0 -11 pento 0 11 lineto 7 0 lineto 2 0 pento } "letraL" variable GREPSTR IF
{ 0 -11 lineto 5 11 lineto 5 -11 lineto 0 12 lineto 3 -1 pento } "letraM" variable GREPSTR IF
{ 0 -11 lineto 8 11 lineto 0 -12 lineto 3 12 pento } "letraN" variable GREPSTR IF
{ 0 -11 lineto 8 11 lineto 0 -12 lineto -6 -2 pento 5 0 lineto 4 14 pento } "letraÑ" variable GREPSTR IF
{ 3 0 pento 3 0 lineto 3 -3 lineto 0 -5 lineto -3 -3 lineto -3 0 lineto -3 3 lineto 0 5 lineto
3 3 lineto 9 0 pento } "letraO" variable GREPSTR IF
{ 0 -11 lineto 6 0 lineto 2 2 lineto 0 2 lineto -2 2 lineto -6 0 lineto 11 5 pento } "letraP" variable GREPSTR IF
{ 3 0 pento 3 0 lineto 3 -3 lineto 0 -5 lineto -3 -3 lineto -3 0 lineto -3 3 lineto 0 5 lineto
3 3 lineto 1 -2 pento 6 2 lineto 2 0 pento } "letraQ" variable GREPSTR IF
{ 0 -11 lineto 6 0 lineto 2 2 lineto 0 2 lineto -2 2 lineto -6 0 lineto 4 0 pento 5 6 lineto
2 -1 pento } "letraR" variable GREPSTR IF
{ 0 -2 pento 2 2 lineto 4 0 lineto 2 -2 lineto 0 -2 lineto -2 -1 lineto -1 0 lineto
-2 -1 lineto -1 0 lineto -2 -2 lineto 0 -1 lineto 2 -2 lineto 4 0 lineto 3 3 lineto
2 8 pento } "letraS" variable GREPSTR "letraŠ" variable GREPSTR OR IF
{ 0 -11 pento 9 0 lineto -5 0 pento 0 12 lineto 7 -1 pento } "letraT" variable GREPSTR IF
{ 0 -11 pento 0 9 lineto 2 2 lineto 4 0 lineto 2 -2 lineto 0 -10 lineto 3 12 pento } "letraU" variable GREPSTR IF
{ 0 -11 pento 4 11 lineto 4 -12 lineto 3 12 pento } "letraV" variable GREPSTR IF
{ 0 -11 pento 3 11 lineto 3 -11 lineto 3 11 lineto 3 -12 lineto 3 12 pento } "letraW" variable GREPSTR IF
{ 10 -12 lineto -9 1 pento 10 12 lineto 2 -1 pento } "letraX" variable GREPSTR IF
{ 0 -11 pento 4 6 lineto 0 6 lineto 0 -6 pento 4 -7 lineto 2 12 pento } "letraY" variable GREPSTR IF
{ 1 -11 pento 7 0 lineto -8 11 lineto 9 0 lineto 2 0 pento } "letraZ" variable GREPSTR IF
{ 0 -6 pento 2 -2 lineto 3 0 lineto 1 1 lineto 0 8 lineto -1 -2 pento -1 1 lineto -3 0 lineto
-1 -1 lineto 0 -2 lineto 2 -1 lineto 2 0 lineto 2 -1 lineto 3 5 pento } "letraa" variable GREPSTR IF
{ 5 -7 pento -1 -1 lineto -2 0 lineto -2 2 lineto 0 4 lineto 2 2 lineto 2 0 lineto 2 -2 lineto
2 2 pento } "letrac" variable GREPSTR IF
{ 6 -2 pento -2 2 lineto -2 0 lineto -2 -2 lineto 0 -4 lineto 2 -2 lineto 2 0 lineto 2 2 lineto
0 -5 pento 0 12 lineto 3 -1 pento } "letrad" variable GREPSTR IF
{ 6 -2 pento -2 2 lineto -2 0 lineto -2 -2 lineto 0 -4 lineto 2 -2 lineto 2 0 lineto 2 2 lineto
0 2 lineto -6 0 lineto 9 4 pento } "letrae" variable GREPSTR IF
{ 1 0 pento 0 -10 lineto 2 -1 lineto 1 0 lineto -4 3 pento 4 0 lineto 2 8 pento } "letraf" variable GREPSTR IF
{ 5 -7 pento -1 -1 lineto -2 0 lineto -2 2 lineto 0 4 lineto 2 2 lineto 2 0 lineto 2 -2 lineto
0 -6 pento 0 9 lineto -2 2 lineto -3 0 lineto -2 -2 lineto 10 -1 pento } "letrag" variable GREPSTR IF
{ 0 -12 lineto 0 4 pento 1 1 lineto 2 -1 lineto 3 1 lineto -1 0 pento 0 8 lineto 3 -1 pento } "letrah" variable GREPSTR IF
{ 0 -9 lineto 0 -2 pento 0 -1 lineto 3 12 pento } "letrai" variable GREPSTR IF
{ 2 -11 pento 0 1 lineto 0 2 pento 0 10 lineto -1 1 lineto -2 0 lineto 6 -3 pento } "letraj" variable GREPSTR IF
{ 0 -12 lineto 0 10 pento 7 -7 lineto -5 4 pento 5 6 lineto 2 -1 pento } "letrak" variable GREPSTR IF
{ 0 -11 pento 0 12 lineto 3 -1 pento } "letral" variable GREPSTR IF
{ 0 -8 lineto 1 1 lineto 2 -1 lineto 3 1 lineto -1 0 pento 0 8 lineto 1 -8 pento 2 -1 lineto
3 1 lineto -1 0 pento 0 8 lineto 3 -1 pento} "letram" variable GREPSTR IF
{ 0 -8 lineto 1 1 lineto 2 -1 lineto 3 1 lineto -1 0 pento 0 8 lineto 3 -1 pento } "letran" variable GREPSTR IF
{ 0 -8 lineto 1 1 lineto 2 -1 lineto 3 1 lineto -1 0 pento 0 8 lineto -3 -11 pento 3 0 lineto ;al
3 10 pento } "letrañ" variable GREPSTR IF
{ 5 -7 pento -1 -1 lineto -2 0 lineto -2 2 lineto 0 4 lineto 2 2 lineto 2 0 lineto 2 -2 lineto
0 -4 pento 0 5 lineto 3 1 pento } "letrao" variable GREPSTR "letraø" variable GREPSTR OR IF
{ 0 3 pento 0 -12 lineto 1 2 pento 1 -1 lineto 2 0 lineto 2 2 lineto 0 4 lineto -2 2 lineto;ex
-2 0 lineto -2 -2 lineto 9 2 pento } "letrap" variable GREPSTR IF
{ 6 4 pento 0 -12 lineto 0 6 pento -2 2 lineto -2 0 lineto -2 -2 lineto 0 -4 lineto
2 -2 lineto 2 0 lineto 2 2 lineto 3 6 pento } "letraq" variable GREPSTR IF
{ 0 -8 lineto 1 1 lineto 2 -1 lineto 1 1 lineto 2 7 pento } "letrar" variable GREPSTR IF;an
{ 0 -1 pento 1 1 lineto 3 0 lineto 1 -2 lineto 0 -1 lineto -1 -1 lineto -3 0 lineto
-1 -1 lineto 0 -2 lineto 1 -1 lineto 3 0 lineto 2 2 lineto 2 6 pento } "letras" variable GREPSTR IF
{ 3 0 pento -2 0 lineto 0 -11 lineto -1 3 pento 4 0 lineto 2 8 pento } "letrat" variable GREPSTR IF
{ 0 -8 pento 0 7 lineto 2 1 lineto 1 0 lineto 1 -2 lineto 1 -6 pento 0 9 lineto 3 -1 pento } "letrau" variable GREPSTR IF
{ 0 -8 pento 3 8 lineto 3 -9 lineto 3 9 pento } "letrav" variable GREPSTR IF
{ 0 -8 pento 3 8 lineto 3 -8 lineto 3 8 lineto 3 -9 lineto 3 9 pento } "letraw" variable GREPSTR IF
{ 7 -9 lineto -7 1 pento 7 9 lineto 2 -1 pento } "letrax" variable GREPSTR IF ;dr
{ 0 -8 pento 3 8 lineto 3 -9 lineto -3 10 pento 0 1 lineto -1 1 lineto -2 0 lineto 9 -3 pento } "letray" variable GREPSTR "letraÿ" variable GREPSTR OR IF ;a
{ 0 -8 pento 6 0 lineto -6 8 lineto 7 0 lineto 2 0 pento } "letraz" variable GREPSTR IF
{ 0 -11 pento 3 12 lineto 2 -1 pento } "letra\\" variable GREPSTR IF
{ 3 -12 lineto 2 12 pento } "letra/" variable GREPSTR IF
{ 0 -11 pento 5 0 lineto -3 1 pento 0 5 lineto 4 -1 pento 0 -5 lineto 3 5 lineto 3 -5 lineto
0 6 lineto 3 5 pento } "letra™" variable GREPSTR IF
{ 0 -10 pento 5 0 lineto -3 -1 pento 0 2 lineto -2 2 lineto 1 1 lineto 2 -2 pento 2 2 lineto
2 6 pento } "letra\*" variable GREPSTR IF
{ 7 -1 pento -1 1 lineto -3 0 lineto -2 -2 lineto 0 -6 lineto 3 -3 lineto 2 0 lineto 2 2 lineto
-2 3 pento -7 0 lineto 1 2 pento 7 0 lineto 3 4 pento } "letra€" variable GREPSTR IF
{ 3 0 pento 3 0 lineto 3 -3 lineto 0 -5 lineto -3 -3 lineto -3 0 lineto -3 3 lineto
0 5 lineto 3 3 lineto 8 0 pento -2 -11 pento -10 12 lineto 13 -1 pento } "letraØ" variable GREPSTR IF
{ 1 -3 pento 0 -4 lineto 4 0 lineto 0 4 lineto -4 0 lineto 7 3 pento } "letra¤" variable GREPSTR IF
{ 0 -6 pento 1 -1 lineto 2 0 lineto 1 1 lineto 2 0 lineto 1 -2 lineto 3 8 pento } "letra~" variable GREPSTR IF
{ 6 0 pento } "letra " variable GREPSTR IF
{ 0 -7 pento 7 0 lineto -7 4 pento 7 0 lineto 2 3 pento } "letra=" variable GREPSTR IF
{ 14 1 pento -3 2 lineto -6 0 lineto -2 -1 lineto -3 -3 lineto 0 -5 lineto 1 -1 lineto
2 -2 lineto 2 -2 lineto 5 0 lineto 2 2 lineto 2 2 lineto 0 4 lineto -3 3 lineto -2 0 lineto
0 -5 lineto 1 0 lineto 0 -3 lineto -2 1 lineto 0 -1 lineto -2 0 lineto -3 3 lineto 0 3 lineto
2 2 lineto 2 0 lineto 2 -2 lineto 8 2 pento } "letra@" variable GREPSTR IF
{ 3 0 pento 5 0 lineto 3 -3 lineto 0 -5 lineto -3 -3 lineto -5 0 lineto -3 3 lineto 0 5 lineto
3 3 lineto 0 -3 pento 0 -6 lineto 4 0 lineto 1 2 lineto -1 1 lineto -4 0 lineto 2 0 pento
4 4 lineto 5 2 pento } "letra®" variable GREPSTR IF
{ 3 0 pento 5 0 lineto 3 -3 lineto 0 -5 lineto -3 -3 lineto -5 0 lineto -3 3 lineto 0 5 lineto
3 3 lineto 5 -4 pento -1 1 lineto -3 0 lineto -1 -1 lineto 0 -4 lineto 1 -1 lineto 3 0 lineto
2 2 lineto 4 7 pento } "letra©" variable GREPSTR IF
{ 1 0 pento 1 1 lineto 3 -1 pento} "letra." variable GREPSTR IF
{ 7 0 lineto -1 -8 pento -7 0 lineto 4 -3 pento 0 15 lineto 6 -4 pento } "letra‡" variable GREPSTR IF
{ 0 2 pento 9 0 lineto 2 -2 pento } "letra_" variable GREPSTR IF
{ 0 -3 pento 4 0 lineto 1 3 pento } "letra-" variable GREPSTR IF
{ 1 -5 pento 1 -1 lineto 2 6 pento } "letra·" variable GREPSTR IF
{ 1 -7 pento 3 0 lineto 0 -1 pento 0 -3 lineto -1 0 pento -3 0 lineto 0 1 pento 0 3 lineto
7 7 pento } "letraº" variable GREPSTR IF
{ 1 -8 pento 1 0 lineto 1 -2 lineto -2 -1 lineto -2 3 lineto 7 8 pento } "letra°" variable GREPSTR "letra•" variable GREPSTR OR IF
{ 0 -11 pento 0 15 lineto 3 -4 pento } "letra|" variable GREPSTR IF
{ 0 -5 pento 7 0 lineto -4 -3 pento 0 7 lineto 5 1 pento } "letra+" variable GREPSTR IF
{ 1 -1 pento 2 -4 lineto -3 -3 lineto 3 8 pento 1 -1 pento 2 -4 lineto -3 -3 lineto
6 8 pento } "letra»" variable GREPSTR IF
{ 5 -7 pento -2 4 lineto 3 3 lineto -3 -8 pento -1 1 pento -2 4 lineto 3 3 lineto
5 0 pento } "letra«" variable GREPSTR IF
{ 6 -8 pento -7 0 lineto 4 -3 pento 0 15 lineto 6 -4 pento } "letra†" variable GREPSTR IF
{ 1 0 pento 0 -11 lineto 6 0 lineto 3 3 lineto 0 5 lineto -3 3 lineto -6 0 lineto
-1 -5 pento 6 0 lineto 6 5 pento } "letraÐ" variable GREPSTR IF
{ 7 -2 pento -6 -3 lineto 7 -4 lineto 2 9 pento } "letra<" variable GREPSTR
"letra‹" variable GREPSTR OR IF
{ 0 -8 pento 6 3 lineto -7 4 lineto 9 1 pento } "letra>" variable GREPSTR
"letra›" variable GREPSTR OR IF
{ 3 -11 pento -2 5 lineto 0 6 lineto 3 4 lineto 2 -4 pento } "letra(" variable GREPSTR IF
{ 0 -11 pento 2 5 lineto 0 6 lineto -3 4 lineto 5 -4 pento } "letra)" variable GREPSTR IF
{ 3 -11 pento -2 0 lineto -0 15 lineto 3 0 lineto 2 -4 pento } "letra[" variable GREPSTR IF
{ 0 -11 pento 2 0 lineto 0 15 lineto -3 0 lineto 5 -4 pento } "letra]" variable GREPSTR IF
{ 7 -9 pento 0 -2 lineto -1 0 pento -4 0 lineto 0 1 pento 0 2 lineto 6 3 lineto 0 1 pento
0 1 lineto -3 3 lineto -2 -7 pento -2 2 lineto 0 1 lineto 6 5 lineto 0 3 lineto -1 0 pento
-3 0 lineto -3 -3 lineto 11 -1 pento } "letra§" variable GREPSTR IF
{ 0 -10 pento 0 4 lineto 1 -1 pento 0 -5 lineto 1 1 pento 0 6 lineto 1 -1 pento 0 -6 lineto
1 1 pento 0 15 lineto 3 -1 pento 0 -15 lineto -2 1 pento 4 0 lineto 1 11 pento } "letra¶"
variable GREPSTR IF
{ 0 -11 pento 0 4 lineto 3 7 pento } "letra'" variable GREPSTR IF
{ 0 -1 lineto 0 -7 pento 0 -1 lineto 3 9 pento } "letra:" variable GREPSTR IF
{ 4 -11 pento -2 0 lineto 0 1 pento 0 6 lineto -2 0 pento 2 0 lineto 0 1 pento 0 6 lineto
1 0 pento 2 0 lineto 2 -3 pento } "letra{" variable GREPSTR IF
{ 0 3 pento 2 0 lineto 0 -1 pento 0 -6 lineto 2 0 pento -2 0 lineto 0 -1 pento 0 -6 lineto
-1 0 pento -2 0 lineto 8 11 pento } "letra}" variable GREPSTR IF
{ 6 -6 pento -2 -2 lineto -2 0 lineto -2 2 lineto 0 4 lineto 2 2 lineto 2 0 lineto 3 -3 lineto
1 2 pento -3 -10 pento -4 15 lineto 8 -4 pento } "letra¢" variable GREPSTR IF
{ 0 -8 pento 3 -3 lineto 0 12 lineto 3 -1 pento } "letra1" variable GREPSTR IF
{ 0 -9 pento 2 -2 lineto 3 0 lineto 1 3 lineto 0 2 lineto -1 0 pento 0 1 lineto -5 5 lineto
7 0 lineto 2 0 pento } "letra2" variable GREPSTR IF
{ 7 -3 pento -7 0 lineto 6 -8 lineto 0 12 lineto 4 -1 pento } "letra4" variable GREPSTR IF
{ 0 -9 pento 2 -2 lineto 3 0 lineto 0 1 pento 0 3 lineto -2 0 lineto -1 1 pento 2 0 lineto
2 2 lineto 0 2 lineto -2 2 lineto -2 0 lineto -3 -3 lineto 10 3 pento } "letra3"
variable GREPSTR IF
{ 0 -2 pento 2 2 lineto 2 0 lineto 2 -2 lineto 0 -3 lineto -2 -2 lineto -5 0 lineto 1 1 pento
0 -3 lineto 1 0 pento 0 -2 lineto 6 0 lineto 2 11 pento } "letra5" variable GREPSTR IF
{ 6 -9 pento -2 -2 lineto -2 0 lineto -2 2 lineto 0 7 lineto 2 2 lineto 2 0 lineto 2 -2 lineto
0 -3 lineto -2 -2 lineto -2 0 lineto -2 2 lineto 9 5 pento } "letra6" variable GREPSTR IF
{ 0 -11 pento 6 0 lineto -1 0 lineto -3 12 lineto 7 -1 pento } "letra7" variable GREPSTR IF
{ 1 -5 pento -1 1 lineto 0 2 lineto 2 2 lineto 2 0 lineto 2 -2 lineto 0 -2 lineto -2 -2 lineto
-2 0 lineto -2 -2 lineto 0 -1 lineto 2 -2 lineto 2 0 lineto 2 2 lineto 0 1 lineto -2 2 lineto
5 6 pento } "letra8" variable GREPSTR IF
{ 0 -2 pento 2 2 lineto 2 0 lineto 2 -2 lineto 0 -7 lineto -2 -2 lineto -2 0 lineto
-2 2 lineto 0 3 lineto 2 2 lineto 2 0 lineto 2 -2 lineto 3 6 pento } "letra9" variable GREPSTR IF
{ 2 0 pento 2 0 lineto 2 -2 lineto 0 -7 lineto -2 -2 lineto -2 0 lineto -2 2 lineto 0 7 lineto
2 2 lineto 6 0 pento } "letra0" variable GREPSTR IF
{ 8 -1 pento -1 1 lineto -1 0 lineto -1 -1 lineto -3 0 lineto -2 2 lineto 2 -2 pento 0 -2 lineto
1 0 pento 0 -3 lineto 2 0 pento -5 0 lineto 2 -1 pento 0 -3 lineto 1 0 lineto 0 -1 lineto
3 0 lineto 3 3 lineto 2 8 pento } "letra£" variable GREPSTR IF
{ 10 -9 pento -2 -2 lineto -4 0 lineto -3 3 lineto 0 5 lineto 3 3 lineto 4 0 lineto 3 -3 lineto
-5 4 pento 2 2 lineto -1 0 pento -3 0 lineto 9 -3 pento } "letraÇ" variable GREPSTR IF
{ 1 pensize 0 -11 pento 0 10 lineto 0 1 pento 0 1 lineto 3 -1 pento 2 pensize } "letra!" variable GREPSTR IF
{ 1 pensize 0 3 pento 0 -10 lineto 0 -1 pento 0 -1 lineto 3 9 pento 2 pensize } "letra¡" variable GREPSTR IF
{ 0 3 lineto 3 -3 pento } "letra," variable GREPSTR IF
{ 0 -8 pento 0 1 lineto 0 7 pento 0 4 lineto 3 -4 pento } "letra;" variable GREPSTR IF
{ 0 3 pento 0 -12 lineto 0 7 pento 2 2 lineto 2 0 lineto 2 -2 lineto 0 -6 pento 0 9 lineto
3 -1 pento } "letraµ" variable GREPSTR IF
{ 0 -10 pento 1 -1 lineto 2 0 lineto 1 1 lineto 0 2 lineto -1 0 pento -1 0 lineto -2 2 lineto
5 0 lineto 2 6 pento } "letra²" variable GREPSTR IF
{ 0 -11 pento 4 6 lineto 0 6 lineto 0 -6 pento 4 -7 lineto 0 7 pento -9 0 lineto 1 2 pento
9 0 lineto 2 3 pento } "letra¥" variable GREPSTR IF
{ 8 -11 pento -2 12 lineto -4 -1 pento 2 -12 lineto -3 5 pento 9 0 lineto -9 4 pento 9 0 lineto
2 3 pento } "letra#" variable GREPSTR IF
{ 0 -2 pento 2 2 lineto 2 0 lineto 2 -2 lineto 0 -2 lineto -1 -1 lineto -2 0 lineto
-2 -2 lineto 0 1 pento -1 -1 lineto 0 -2 lineto 2 -2 lineto 3 0 lineto 2 2 lineto -1 0 pento
1 0 lineto -4 -3 pento 0 14 lineto 6 -2 pento } "letra\$" variable GREPSTR IF
{ 1 -7 pento 3 0 lineto 0 -1 pento 0 -3 lineto -1 0 pento -3 0 lineto 0 1 pento 0 3 lineto
3 7 pento 5 -12 lineto 0 12 pento 3 0 lineto 0 -1 pento 0 -3 lineto -1 0 pento -3 0 lineto
0 1 pento 0 3 lineto 7 0 pento } "letra%" variable GREPSTR IF
{ 0 -10 pento 1 -1 lineto 1 0 lineto 0 6 lineto -1 5 pento 9 -12 lineto -3 8 pento 1 -1 lineto
2 0 lineto 1 1 lineto 0 2 lineto -1 0 pento -1 0 lineto -2 2 lineto 5 0 lineto 2 0 pento } "letra½" variable GREPSTR IF
{ 0 -6 pento 3 -5 lineto 4 6 lineto 2 5 pento } "letra^" variable GREPSTR IF
{ 0 3 pento 0 -6 lineto 0 -3 pento 0 -6 lineto 3 12 pento } "letra¦" variable GREPSTR IF
{ 0 -10 pento 1 -1 lineto 1 0 lineto 0 6 lineto 3 5 pento } "letra¹" variable GREPSTR IF
}
{ elnombre "(.)(.*)" GREPSTR } WHILE "" CHATSTR = } CHATSTR "^pname1" GREPSTR IF
;**********stop copying the script in this line**********