' This code is for the Parallax S2 robot and can make the robot to wtile Words
' The code support Pen_Up and Pen_Down commands if the robot has a Pen lifter
' However you can use is without changes with an ordinary S2 robot without pen Lifter.
' Author: Nikos Giannakopoulos (NikosG) ver 1 March 2012
' The code is based on "Write Saints" code from Rich Harman (W9FGO)


Con                                      
  _clkmode = xtal1 + pll16x       
  _xinfreq = 5_000_000        
  _SIZE = 1     ' The size of the letters (you can Play with it) 
  S_B_L = 15    ' The space between two sequential letters
  up    = 2080  ' The pulse for the Pen servo in order to lift Up the pen (optional)
  down  = 1600  ' The pulse for the Pen servo in order to lift Down the pen (optional)
  Pen  = 5      ' The pin of the Pen servo (optional
  
VAR 
 long  LET_POS
 Word  Let_width 

OBJ

  SERVO : "Servo32v7" 
  s2    : "s2"
    
PUB Main 

  SERVO.Start                        
  SERVO.Set(pen,up)
  s2.start 
  s2.start_motors
  s2.set_speed(7)
  s2.here_is(0, -202)        
  LET_POS := 0
 ' Supposing  you want your S2 to write "NikosG"  you must write compete the following
  ' lines: (write every letter in a new line and add the ending "_big" for Capital letters
  ' and  "_small" for Lower letters.   Have Fun!!!! 
 '---------------------- the S2 writes NikosG ------------------ 
repeat
  repeat until s2.button_press
  waitcnt(clkfreq + cnt)
  s2.move_to(0, 0)
  N_big         
  i_small
  k_small
  o_big
  s_small
  G_big

  
  s2.end_path
 '-------------------------------------------------------------------
PUB A_big

let_width :=180
S2.move_to(0*_SIZE+LET_POS, _SIZE*0)
pen_down
s2.begin_path     
S2.move_to(60*_SIZE+LET_POS, _SIZE*176)       
S2.move_to(120*_SIZE+LET_POS, _SIZE*176)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*0)       
S2.move_to(120*_SIZE+LET_POS, _SIZE*0)       
S2.move_to(114*_SIZE+LET_POS, _SIZE*24)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*24)       
S2.move_to(57*_SIZE+LET_POS, _SIZE*0)       
S2.move_to(0*_SIZE+LET_POS, _SIZE*0)       
S2.end_path
pen_up
S2.move_to(63*_SIZE+LET_POS, _SIZE*54)       
pen_down
S2.begin_path
S2.move_to(90*_SIZE+LET_POS, _SIZE*141)       
S2.move_to(114*_SIZE+LET_POS, _SIZE*54)       
S2.move_to(63*_SIZE+LET_POS, _SIZE*54)
pen_up 
S2.end_path

LET_POS := Let_pos + Let_width +  S_B_L

PUB a_small

let_width :=156
S2.move_to(45*_SIZE+LET_POS, _SIZE*0)
pen_down
s2.begin_path      
S2.arc_to(27*_SIZE+LET_POS, _SIZE*75,-43*_SIZE)
S2.arc_to(63*_SIZE+LET_POS, _SIZE*84,-287*_SIZE)
S2.arc_to(87*_SIZE+LET_POS, _SIZE*89,51*_SIZE)
S2.arc_to(87*_SIZE+LET_POS, _SIZE*102,7*_SIZE)
S2.arc_to(63*_SIZE+LET_POS, _SIZE*90,25*_SIZE)
S2.move_to(12*_SIZE+LET_POS, _SIZE*90)       
S2.arc_to(45*_SIZE+LET_POS, _SIZE*134,-62*_SIZE)
S2.arc_to(120*_SIZE+LET_POS, _SIZE*134,-159*_SIZE)
S2.arc_to(147*_SIZE+LET_POS, _SIZE*104,-37*_SIZE)
S2.move_to(147*_SIZE+LET_POS, _SIZE*17)       
S2.move_to(183*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(98*_SIZE+LET_POS, _SIZE*12)       
S2.arc_to(45*_SIZE+LET_POS, _SIZE*0,-103*_SIZE)
S2.end_path
pen_up
S2.move_to(75*_SIZE+LET_POS, _SIZE*24)       
pen_down
S2.begin_path
S2.arc_to(60*_SIZE+LET_POS, _SIZE*57,-20*_SIZE)
S2.move_to(99*_SIZE+LET_POS, _SIZE*72)       
S2.arc_to(75*_SIZE+LET_POS, _SIZE*24,-35*_SIZE)
S2.arc_to(75*_SIZE+LET_POS, _SIZE*24,-6*_SIZE)
pen_up 
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L



PUB B_big

let_width :=159
S2.move_to(3*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(3*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(105*_SIZE+LET_POS, _SIZE*177)       
S2.arc_to(138*_SIZE+LET_POS, _SIZE*96,-50*_SIZE)
S2.arc_to(105*_SIZE+LET_POS, _SIZE*3,-68*_SIZE)
S2.move_to(3*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
S2.move_to(51*_SIZE+LET_POS, _SIZE*39)       
pen_down
S2.begin_path
S2.move_to(51*_SIZE+LET_POS, _SIZE*84)       
S2.move_to(90*_SIZE+LET_POS, _SIZE*84)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*39,-23*_SIZE)
S2.move_to(51*_SIZE+LET_POS, _SIZE*39)       
S2.end_path
pen_up
S2.move_to(51*_SIZE+LET_POS, _SIZE*101)       
pen_down
S2.begin_path
S2.move_to(51*_SIZE+LET_POS, _SIZE*144)       
S2.move_to(90*_SIZE+LET_POS, _SIZE*144)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*101,-22*_SIZE)
S2.move_to(51*_SIZE+LET_POS, _SIZE*101)
pen_up      
S2.end_path

LET_POS := Let_pos + Let_width +  S_B_L

PUB b_small

let_width :=147
S2.move_to(12*_SIZE+LET_POS, _SIZE*5)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*126)       
S2.arc_to(135*_SIZE+LET_POS, _SIZE*126,-62*_SIZE)
S2.arc_to(135*_SIZE+LET_POS, _SIZE*12,-114*_SIZE)
S2.arc_to(60*_SIZE+LET_POS, _SIZE*12,-83*_SIZE)
S2.move_to(60*_SIZE+LET_POS, _SIZE*5)       
S2.move_to(12*_SIZE+LET_POS, _SIZE*5)       
S2.end_path
pen_up
S2.move_to(60*_SIZE+LET_POS, _SIZE*42)       
pen_down
S2.begin_path
S2.arc_to(60*_SIZE+LET_POS, _SIZE*90,-98*_SIZE)
S2.arc_to(108*_SIZE+LET_POS, _SIZE*90,-33*_SIZE)
S2.arc_to(108*_SIZE+LET_POS, _SIZE*39,-110*_SIZE)
S2.arc_to(60*_SIZE+LET_POS, _SIZE*42,-33*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB C_big

let_width :=177
S2.move_to(123*_SIZE+LET_POS, _SIZE*72)
pen_down
s2.begin_path        
S2.move_to(180*_SIZE+LET_POS, _SIZE*72)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*0,-90*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*60,-92*_SIZE)
S2.arc_to(12*_SIZE+LET_POS, _SIZE*138,-130*_SIZE)
S2.arc_to(90*_SIZE+LET_POS, _SIZE*180,-114*_SIZE)
S2.arc_to(180*_SIZE+LET_POS, _SIZE*110,-90*_SIZE)
S2.move_to(120*_SIZE+LET_POS, _SIZE*110)       
S2.arc_to(66*_SIZE+LET_POS, _SIZE*111,29*_SIZE)
S2.arc_to(69*_SIZE+LET_POS, _SIZE*60,75*_SIZE)
S2.arc_to(123*_SIZE+LET_POS, _SIZE*72,30*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB c_small  

let_width :=144
S2.move_to(42*_SIZE+LET_POS, _SIZE*6)
pen_down
s2.begin_path        
S2.arc_to(9*_SIZE+LET_POS, _SIZE*36,-58*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*96,-152*_SIZE)
S2.arc_to(42*_SIZE+LET_POS, _SIZE*132,-69*_SIZE)
S2.arc_to(105*_SIZE+LET_POS, _SIZE*132,-185*_SIZE)
S2.arc_to(147*_SIZE+LET_POS, _SIZE*84,-97*_SIZE)
S2.move_to(93*_SIZE+LET_POS, _SIZE*84)       
S2.arc_to(60*_SIZE+LET_POS, _SIZE*84,17*_SIZE)
S2.arc_to(60*_SIZE+LET_POS, _SIZE*51,58*_SIZE)
S2.arc_to(87*_SIZE+LET_POS, _SIZE*57,14*_SIZE)
S2.move_to(147*_SIZE+LET_POS, _SIZE*57)       
S2.arc_to(120*_SIZE+LET_POS, _SIZE*9,-87*_SIZE)
S2.arc_to(42*_SIZE+LET_POS, _SIZE*6,-130*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB D_big

let_width :=168
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(105*_SIZE+LET_POS, _SIZE*177)       
S2.arc_to(174*_SIZE+LET_POS, _SIZE*120,-74*_SIZE)
S2.arc_to(174*_SIZE+LET_POS, _SIZE*57,-167*_SIZE)
S2.arc_to(99*_SIZE+LET_POS, _SIZE*3,-102*_SIZE)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
S2.move_to(63*_SIZE+LET_POS, _SIZE*42)       
pen_down
S2.begin_path
S2.move_to(63*_SIZE+LET_POS, _SIZE*138)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*138)       
S2.arc_to(126*_SIZE+LET_POS, _SIZE*111,-37*_SIZE)
S2.arc_to(126*_SIZE+LET_POS, _SIZE*68,-789*_SIZE)
S2.arc_to(63*_SIZE+LET_POS, _SIZE*42,-194*_SIZE)
S2.move_to(63*_SIZE+LET_POS, _SIZE*42)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB d_small

let_width :=147
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(99*_SIZE+LET_POS, _SIZE*24)       
S2.arc_to(12*_SIZE+LET_POS, _SIZE*27,-85*_SIZE)
S2.arc_to(12*_SIZE+LET_POS, _SIZE*105,-130*_SIZE)
S2.arc_to(96*_SIZE+LET_POS, _SIZE*129,-77*_SIZE)
S2.move_to(96*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
S2.move_to(51*_SIZE+LET_POS, _SIZE*48)       
pen_down
S2.begin_path
S2.arc_to(51*_SIZE+LET_POS, _SIZE*63,-11*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*63,-31*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*48,-11*_SIZE)
S2.arc_to(51*_SIZE+LET_POS, _SIZE*48,-31*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB E_big

let_width :=144
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(156*_SIZE+LET_POS, _SIZE*177)
S2.move_to(156*_SIZE+LET_POS, _SIZE*132)
S2.move_to(72*_SIZE+LET_POS, _SIZE*132)
S2.move_to(72*_SIZE+LET_POS, _SIZE*114)
S2.move_to(141*_SIZE+LET_POS, _SIZE*114)
S2.move_to(141*_SIZE+LET_POS, _SIZE*72)
S2.move_to(72*_SIZE+LET_POS, _SIZE*72)
S2.move_to(72*_SIZE+LET_POS, _SIZE*48)
S2.move_to(156*_SIZE+LET_POS, _SIZE*48)
S2.move_to(156*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB e_small

let_width :=150
S2.move_to(75*_SIZE+LET_POS, _SIZE*0)
pen_down
s2.begin_path        
S2.arc_to(3*_SIZE+LET_POS, _SIZE*68,-68*_SIZE)
S2.arc_to(75*_SIZE+LET_POS, _SIZE*138,-71*_SIZE)
S2.arc_to(153*_SIZE+LET_POS, _SIZE*56,-87*_SIZE)
S2.move_to(60*_SIZE+LET_POS, _SIZE*56)       
S2.arc_to(96*_SIZE+LET_POS, _SIZE*44,20*_SIZE)
S2.move_to(150*_SIZE+LET_POS, _SIZE*44)       
S2.arc_to(75*_SIZE+LET_POS, _SIZE*0,-70*_SIZE)
S2.end_path
pen_up
S2.move_to(50*_SIZE+LET_POS, _SIZE*77)       
pen_down
S2.begin_path
S2.arc_to(78*_SIZE+LET_POS, _SIZE*113,-28*_SIZE)
S2.arc_to(110*_SIZE+LET_POS, _SIZE*77,-29*_SIZE)
S2.move_to(50*_SIZE+LET_POS, _SIZE*77)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB F_big

let_width :=135
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)
S2.move_to(147*_SIZE+LET_POS, _SIZE*177)
S2.move_to(147*_SIZE+LET_POS, _SIZE*132)
S2.move_to(75*_SIZE+LET_POS, _SIZE*129)
S2.move_to(75*_SIZE+LET_POS, _SIZE*108)
S2.move_to(132*_SIZE+LET_POS, _SIZE*108)
S2.move_to(132*_SIZE+LET_POS, _SIZE*63)
S2.move_to(75*_SIZE+LET_POS, _SIZE*63)
S2.move_to(75*_SIZE+LET_POS, _SIZE*6)
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB f_small

let_width :=93
S2.move_to(18*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(18*_SIZE+LET_POS, _SIZE*102)       
S2.move_to(0*_SIZE+LET_POS, _SIZE*102)       
S2.move_to(0*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(15*_SIZE+LET_POS, _SIZE*132)       
S2.arc_to(57*_SIZE+LET_POS, _SIZE*180,-44*_SIZE)
S2.move_to(93*_SIZE+LET_POS, _SIZE*180)       
S2.move_to(93*_SIZE+LET_POS, _SIZE*147)       
S2.arc_to(72*_SIZE+LET_POS, _SIZE*132,17*_SIZE)
S2.move_to(93*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(93*_SIZE+LET_POS, _SIZE*102)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*102)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(18*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB G_big

let_width :=174
S2.move_to(90*_SIZE+LET_POS, _SIZE*0)
pen_down
s2.begin_path        
S2.arc_to(6*_SIZE+LET_POS, _SIZE*90,-101*_SIZE)
S2.arc_to(90*_SIZE+LET_POS, _SIZE*180,-101*_SIZE)
S2.arc_to(180*_SIZE+LET_POS, _SIZE*114,-96*_SIZE)
S2.move_to(123*_SIZE+LET_POS, _SIZE*114)       
S2.arc_to(69*_SIZE+LET_POS, _SIZE*111,29*_SIZE)
S2.arc_to(72*_SIZE+LET_POS, _SIZE*60,110*_SIZE)
S2.arc_to(123*_SIZE+LET_POS, _SIZE*60,33*_SIZE)
S2.move_to(102*_SIZE+LET_POS, _SIZE*60)       
S2.move_to(102*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(141*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(138*_SIZE+LET_POS, _SIZE*15)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*0,-107*_SIZE)
LET_POS := Let_pos + Let_width +  S_B_L
S2.end_path
pen_up


PUB g_small

let_width :=144
S2.move_to(96*_SIZE+LET_POS, _SIZE*12)
pen_down
s2.begin_path        
S2.arc_to(21*_SIZE+LET_POS, _SIZE*21,-65*_SIZE)
S2.arc_to(21*_SIZE+LET_POS, _SIZE*117,-102*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*123,-62*_SIZE)
S2.move_to(102*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*0)       
S2.arc_to(111*_SIZE+LET_POS, _SIZE*-42,-71*_SIZE)
S2.arc_to(42*_SIZE+LET_POS, _SIZE*-42,-284*_SIZE)
S2.arc_to(12*_SIZE+LET_POS, _SIZE*-6,-63*_SIZE)
S2.move_to(66*_SIZE+LET_POS, _SIZE*-6)       
S2.arc_to(96*_SIZE+LET_POS, _SIZE*-3,18*_SIZE)
S2.arc_to(96*_SIZE+LET_POS, _SIZE*12,20*_SIZE)
S2.end_path
pen_up
S2.move_to(105*_SIZE+LET_POS, _SIZE*51)       
pen_down
S2.begin_path
S2.arc_to(54*_SIZE+LET_POS, _SIZE*45,-33*_SIZE)
S2.arc_to(54*_SIZE+LET_POS, _SIZE*87,-58*_SIZE)
S2.arc_to(105*_SIZE+LET_POS, _SIZE*90,-41*_SIZE)
S2.arc_to(105*_SIZE+LET_POS, _SIZE*51,-65*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB H_big

let_width :=168
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*120)
S2.move_to(120*_SIZE+LET_POS, _SIZE*120)
S2.move_to(120*_SIZE+LET_POS, _SIZE*177)
S2.move_to(180*_SIZE+LET_POS, _SIZE*177)
S2.move_to(180*_SIZE+LET_POS, _SIZE*3)
S2.move_to(120*_SIZE+LET_POS, _SIZE*3)
S2.move_to(120*_SIZE+LET_POS, _SIZE*69)
S2.move_to(75*_SIZE+LET_POS, _SIZE*69)
S2.move_to(75*_SIZE+LET_POS, _SIZE*3)
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB h_small

let_width :=141
S2.move_to(9*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(9*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*123)       
S2.arc_to(150*_SIZE+LET_POS, _SIZE*90,-54*_SIZE)
S2.move_to(150*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*78)       
S2.arc_to(66*_SIZE+LET_POS, _SIZE*78,15*_SIZE)
S2.move_to(66*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(9*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB I_big

let_width :=60
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*3)
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB i_small

let_width :=57
S2.move_to(69*_SIZE+LET_POS, _SIZE*132)
pen_down
s2.begin_path 
S2.move_to(69*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*132)
S2.move_to(69*_SIZE+LET_POS, _SIZE*132)
S2.end_path
pen_up
S2.move_to(69*_SIZE+LET_POS, _SIZE*144)
pen_down
S2.begin_path
S2.move_to(69*_SIZE+LET_POS, _SIZE*183)
S2.move_to(12*_SIZE+LET_POS, _SIZE*183)
S2.move_to(12*_SIZE+LET_POS, _SIZE*144)
S2.move_to(69*_SIZE+LET_POS, _SIZE*144)
LET_POS := Let_pos + Let_width +  S_B_L 
S2.end_path
pen_up


PUB J_big

let_width :=138
S2.move_to(60*_SIZE+LET_POS, _SIZE*0)
pen_down
s2.begin_path        
S2.arc_to(3*_SIZE+LET_POS, _SIZE*81,-77*_SIZE)
S2.move_to(57*_SIZE+LET_POS, _SIZE*81)       
S2.move_to(57*_SIZE+LET_POS, _SIZE*54)       
S2.arc_to(81*_SIZE+LET_POS, _SIZE*54,12*_SIZE)
S2.move_to(81*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(138*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(138*_SIZE+LET_POS, _SIZE*57)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*0,-64*_SIZE)
S2.arc_to(60*_SIZE+LET_POS, _SIZE*0,-188*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB j_small

let_width :=72
S2.move_to(18*_SIZE+LET_POS, _SIZE*9)
pen_down
s2.begin_path        
S2.move_to(18*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*9)       
S2.arc_to(42*_SIZE+LET_POS, _SIZE*-45,-49*_SIZE)
S2.move_to(3*_SIZE+LET_POS, _SIZE*-45)       
S2.move_to(3*_SIZE+LET_POS, _SIZE*-6)       
S2.arc_to(18*_SIZE+LET_POS, _SIZE*9,12*_SIZE)
S2.end_path
pen_up
S2.move_to(18*_SIZE+LET_POS, _SIZE*141)       
pen_down
S2.begin_path
S2.move_to(18*_SIZE+LET_POS, _SIZE*183)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*183)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*141)       
S2.move_to(18*_SIZE+LET_POS, _SIZE*141)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB K_big

let_width :=180
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(72*_SIZE+LET_POS, _SIZE*177)
S2.move_to(72*_SIZE+LET_POS, _SIZE*129)
S2.move_to(114*_SIZE+LET_POS, _SIZE*177)
S2.move_to(183*_SIZE+LET_POS, _SIZE*177)
S2.move_to(126*_SIZE+LET_POS, _SIZE*111)
S2.move_to(192*_SIZE+LET_POS, _SIZE*3)
S2.move_to(123*_SIZE+LET_POS, _SIZE*3)
S2.move_to(81*_SIZE+LET_POS, _SIZE*69)
S2.move_to(72*_SIZE+LET_POS, _SIZE*60)
S2.move_to(72*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB k_small

let_width :=150
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(66*_SIZE+LET_POS, _SIZE*177)
S2.move_to(66*_SIZE+LET_POS, _SIZE*102)
S2.move_to(96*_SIZE+LET_POS, _SIZE*132)
S2.move_to(156*_SIZE+LET_POS, _SIZE*132)
S2.move_to(111*_SIZE+LET_POS, _SIZE*84)
S2.move_to(162*_SIZE+LET_POS, _SIZE*3)
S2.move_to(96*_SIZE+LET_POS, _SIZE*3)
S2.move_to(72*_SIZE+LET_POS, _SIZE*45)
S2.move_to(72*_SIZE+LET_POS, _SIZE*39)
S2.move_to(66*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
LET_POS := Let_pos + Let_width +  S_B_L
pen_up  

PUB L_big

let_width :=135
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*177)
S2.move_to(75*_SIZE+LET_POS, _SIZE*51)
S2.move_to(147*_SIZE+LET_POS, _SIZE*51)
S2.move_to(147*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB l_small

let_width :=57
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)
S2.move_to(69*_SIZE+LET_POS, _SIZE*177)
S2.move_to(69*_SIZE+LET_POS, _SIZE*3)
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB M_big

let_width :=198
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(84*_SIZE+LET_POS, _SIZE*177)
S2.move_to(108*_SIZE+LET_POS, _SIZE*84)
S2.move_to(135*_SIZE+LET_POS, _SIZE*177)
S2.move_to(210*_SIZE+LET_POS, _SIZE*177)
S2.move_to(210*_SIZE+LET_POS, _SIZE*3)
S2.move_to(156*_SIZE+LET_POS, _SIZE*3)
S2.move_to(153*_SIZE+LET_POS, _SIZE*93)
S2.move_to(135*_SIZE+LET_POS, _SIZE*3)
S2.move_to(90*_SIZE+LET_POS, _SIZE*3)
S2.move_to(72*_SIZE+LET_POS, _SIZE*87)
S2.move_to(69*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB m_small

let_width :=219
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(63*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(63*_SIZE+LET_POS, _SIZE*117)       
S2.arc_to(144*_SIZE+LET_POS, _SIZE*117,-62*_SIZE)
S2.arc_to(228*_SIZE+LET_POS, _SIZE*117,-66*_SIZE)
S2.arc_to(231*_SIZE+LET_POS, _SIZE*96,-38*_SIZE)
S2.move_to(231*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(177*_SIZE+LET_POS, _SIZE*78)       
S2.arc_to(150*_SIZE+LET_POS, _SIZE*78,15*_SIZE)
S2.move_to(150*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*78)       
S2.arc_to(66*_SIZE+LET_POS, _SIZE*78,17*_SIZE)
S2.move_to(66*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB N_big

let_width :=165
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)
S2.move_to(72*_SIZE+LET_POS, _SIZE*177)
S2.move_to(123*_SIZE+LET_POS, _SIZE*93)
S2.move_to(123*_SIZE+LET_POS, _SIZE*177)
S2.move_to(180*_SIZE+LET_POS, _SIZE*177)
S2.move_to(180*_SIZE+LET_POS, _SIZE*3)
S2.move_to(123*_SIZE+LET_POS, _SIZE*3)
S2.move_to(72*_SIZE+LET_POS, _SIZE*87)
S2.move_to(72*_SIZE+LET_POS, _SIZE*3)
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
LET_POS := Let_pos + Let_width +  S_B_L
S2.end_path
pen_up


                            
PUB n_small

let_width :=144
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path       
S2.move_to(12*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*120)       
S2.arc_to(144*_SIZE+LET_POS, _SIZE*120,-58*_SIZE)
S2.arc_to(156*_SIZE+LET_POS, _SIZE*60,-158*_SIZE)
S2.move_to(156*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*75)       
S2.arc_to(69*_SIZE+LET_POS, _SIZE*75,15*_SIZE)
S2.move_to(69*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB O_big

let_width :=183
S2.move_to(98*_SIZE+LET_POS, _SIZE*1)
pen_down
s2.begin_path        
S2.arc_to(26*_SIZE+LET_POS, _SIZE*30,-89*_SIZE)
S2.arc_to(26*_SIZE+LET_POS, _SIZE*150,-128*_SIZE)
S2.arc_to(99*_SIZE+LET_POS, _SIZE*182,-93*_SIZE)
S2.arc_to(173*_SIZE+LET_POS, _SIZE*150,-93*_SIZE)
S2.arc_to(173*_SIZE+LET_POS, _SIZE*30,-128*_SIZE)
S2.arc_to(98*_SIZE+LET_POS, _SIZE*1,-95*_SIZE)
S2.end_path
pen_up
S2.move_to(98*_SIZE+LET_POS, _SIZE*38)       
pen_down
S2.begin_path
S2.arc_to(60*_SIZE+LET_POS, _SIZE*60,-43*_SIZE)
S2.arc_to(60*_SIZE+LET_POS, _SIZE*120,-152*_SIZE)
S2.arc_to(98*_SIZE+LET_POS, _SIZE*143,-43*_SIZE)
S2.arc_to(135*_SIZE+LET_POS, _SIZE*120,-81*_SIZE)
S2.arc_to(135*_SIZE+LET_POS, _SIZE*60,-152*_SIZE)
S2.arc_to(98*_SIZE+LET_POS, _SIZE*38,-32*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


                            
PUB o_small

S2.move_to(74*_SIZE+LET_POS, _SIZE*2)
pen_down
s2.begin_path
let_width :=147       
S2.arc_to(9*_SIZE+LET_POS, _SIZE*32,-59*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*107,-83*_SIZE)
S2.arc_to(74*_SIZE+LET_POS, _SIZE*137,-59*_SIZE)
S2.arc_to(140*_SIZE+LET_POS, _SIZE*107,-61*_SIZE)
S2.arc_to(140*_SIZE+LET_POS, _SIZE*32,-83*_SIZE)
S2.arc_to(74*_SIZE+LET_POS, _SIZE*2,-61*_SIZE)
S2.end_path
pen_up
S2.move_to(74*_SIZE+LET_POS, _SIZE*29)       
pen_down
S2.begin_path
S2.arc_to(48*_SIZE+LET_POS, _SIZE*44,-21*_SIZE)
S2.arc_to(48*_SIZE+LET_POS, _SIZE*95,-110*_SIZE)
S2.arc_to(74*_SIZE+LET_POS, _SIZE*108,-20*_SIZE)
S2.arc_to(99*_SIZE+LET_POS, _SIZE*95,-20*_SIZE)
S2.arc_to(99*_SIZE+LET_POS, _SIZE*44,-110*_SIZE)
S2.arc_to(74*_SIZE+LET_POS, _SIZE*29,-21*_SIZE)
LET_POS := Let_pos + Let_width +  S_B_L
S2.end_path
pen_up
                            
                            
PUB P_big

let_width :=168
S2.move_to(12*_SIZE+LET_POS, _SIZE*6)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(111*_SIZE+LET_POS, _SIZE*177)       
S2.arc_to(171*_SIZE+LET_POS, _SIZE*120,-65*_SIZE)
S2.arc_to(120*_SIZE+LET_POS, _SIZE*57,-68*_SIZE)
S2.move_to(72*_SIZE+LET_POS, _SIZE*57)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*6)       
S2.move_to(24*_SIZE+LET_POS, _SIZE*6)       
S2.end_path
pen_up
S2.move_to(72*_SIZE+LET_POS, _SIZE*132)       
pen_down
S2.begin_path
S2.move_to(93*_SIZE+LET_POS, _SIZE*132)       
S2.arc_to(114*_SIZE+LET_POS, _SIZE*117,-21*_SIZE)
S2.arc_to(93*_SIZE+LET_POS, _SIZE*102,-21*_SIZE)
S2.move_to(72*_SIZE+LET_POS, _SIZE*102)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*132)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


PUB p_small

let_width :=147
S2.move_to(15*_SIZE+LET_POS, _SIZE*-45)
pen_down
s2.begin_path        
S2.move_to(15*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(63*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(63*_SIZE+LET_POS, _SIZE*120)       
S2.arc_to(102*_SIZE+LET_POS, _SIZE*153,-57*_SIZE)
S2.arc_to(159*_SIZE+LET_POS, _SIZE*69,-93*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*0,-74*_SIZE)
S2.arc_to(69*_SIZE+LET_POS, _SIZE*12,-53*_SIZE)
S2.move_to(69*_SIZE+LET_POS, _SIZE*-45)       
S2.move_to(15*_SIZE+LET_POS, _SIZE*-45)       
S2.end_path
pen_up
S2.move_to(69*_SIZE+LET_POS, _SIZE*72)       
pen_down
S2.begin_path
S2.arc_to(84*_SIZE+LET_POS, _SIZE*96,-20*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*72,-22*_SIZE)
S2.arc_to(84*_SIZE+LET_POS, _SIZE*42,-29*_SIZE)
S2.arc_to(69*_SIZE+LET_POS, _SIZE*72,-26*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB Q_big

let_width :=183
S2.move_to(141*_SIZE+LET_POS, _SIZE*6)
pen_down
s2.begin_path       
S2.arc_to(57*_SIZE+LET_POS, _SIZE*6,-150*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*60,-77*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*120,-152*_SIZE)
S2.arc_to(57*_SIZE+LET_POS, _SIZE*174,-77*_SIZE)
S2.arc_to(141*_SIZE+LET_POS, _SIZE*174,-150*_SIZE)
S2.arc_to(186*_SIZE+LET_POS, _SIZE*120,-73*_SIZE)
S2.arc_to(186*_SIZE+LET_POS, _SIZE*60,-152*_SIZE)
S2.arc_to(174*_SIZE+LET_POS, _SIZE*30,-45*_SIZE)
S2.move_to(189*_SIZE+LET_POS, _SIZE*12)       
S2.move_to(159*_SIZE+LET_POS, _SIZE*-15)       
S2.move_to(141*_SIZE+LET_POS, _SIZE*6)       
S2.end_path
pen_up
S2.move_to(102*_SIZE+LET_POS, _SIZE*45)       
pen_down
S2.begin_path
S2.move_to(84*_SIZE+LET_POS, _SIZE*63)       
S2.move_to(114*_SIZE+LET_POS, _SIZE*87)       
S2.move_to(129*_SIZE+LET_POS, _SIZE*75)       
S2.arc_to(126*_SIZE+LET_POS, _SIZE*120,86*_SIZE)
S2.arc_to(72*_SIZE+LET_POS, _SIZE*120,32*_SIZE)
S2.arc_to(72*_SIZE+LET_POS, _SIZE*60,78*_SIZE)
S2.arc_to(102*_SIZE+LET_POS, _SIZE*45,26*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB q_small

let_width :=144
S2.move_to(96*_SIZE+LET_POS, _SIZE*9)
pen_down
s2.begin_path       
S2.arc_to(30*_SIZE+LET_POS, _SIZE*9,-65*_SIZE)
S2.arc_to(6*_SIZE+LET_POS, _SIZE*57,-122*_SIZE)
S2.move_to(6*_SIZE+LET_POS, _SIZE*81)       
S2.arc_to(30*_SIZE+LET_POS, _SIZE*126,-110*_SIZE)
S2.arc_to(96*_SIZE+LET_POS, _SIZE*126,-65*_SIZE)
S2.move_to(102*_SIZE+LET_POS, _SIZE*123)       
S2.move_to(102*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(150*_SIZE+LET_POS, _SIZE*-45)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*-45)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*9)       
S2.end_path
pen_up
S2.move_to(72*_SIZE+LET_POS, _SIZE*33)       
pen_down
S2.begin_path
S2.arc_to(51*_SIZE+LET_POS, _SIZE*57,-24*_SIZE)
S2.move_to(51*_SIZE+LET_POS, _SIZE*78)       
S2.arc_to(72*_SIZE+LET_POS, _SIZE*105,-27*_SIZE)
S2.move_to(87*_SIZE+LET_POS, _SIZE*105)       
S2.arc_to(108*_SIZE+LET_POS, _SIZE*78,-27*_SIZE)
S2.move_to(108*_SIZE+LET_POS, _SIZE*57)       
S2.arc_to(87*_SIZE+LET_POS, _SIZE*33,-24*_SIZE)
S2.move_to(72*_SIZE+LET_POS, _SIZE*33)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB R_big

let_width :=165
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(15*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(117*_SIZE+LET_POS, _SIZE*177)       
S2.arc_to(150*_SIZE+LET_POS, _SIZE*168,-98*_SIZE)
S2.arc_to(171*_SIZE+LET_POS, _SIZE*135,-35*_SIZE)
S2.move_to(171*_SIZE+LET_POS, _SIZE*117)       
S2.arc_to(150*_SIZE+LET_POS, _SIZE*84,-35*_SIZE)
S2.arc_to(171*_SIZE+LET_POS, _SIZE*60,-44*_SIZE)
S2.move_to(174*_SIZE+LET_POS, _SIZE*21)       
S2.arc_to(180*_SIZE+LET_POS, _SIZE*15,5*_SIZE)
S2.move_to(180*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(114*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(114*_SIZE+LET_POS, _SIZE*45)       
S2.arc_to(96*_SIZE+LET_POS, _SIZE*63,29*_SIZE)
S2.move_to(75*_SIZE+LET_POS, _SIZE*63)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(15*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
S2.move_to(75*_SIZE+LET_POS, _SIZE*105)       
pen_down
S2.begin_path
S2.move_to(75*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(105*_SIZE+LET_POS, _SIZE*132)       
S2.arc_to(105*_SIZE+LET_POS, _SIZE*105,-15*_SIZE)
S2.move_to(75*_SIZE+LET_POS, _SIZE*105)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L
                            
                            
PUB r_small

let_width :=96
S2.move_to(9*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path       
S2.move_to(9*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(60*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(60*_SIZE+LET_POS, _SIZE*120)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*135,-48*_SIZE)
S2.move_to(105*_SIZE+LET_POS, _SIZE*135)       
S2.move_to(105*_SIZE+LET_POS, _SIZE*84)       
S2.move_to(90*_SIZE+LET_POS, _SIZE*84)       
S2.arc_to(66*_SIZE+LET_POS, _SIZE*60,27*_SIZE)
S2.move_to(66*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(9*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


                            
PUB S_big

let_width :=156
S2.move_to(6*_SIZE+LET_POS, _SIZE*60)
pen_down
s2.begin_path        
S2.move_to(63*_SIZE+LET_POS, _SIZE*60)       
S2.arc_to(90*_SIZE+LET_POS, _SIZE*42,45*_SIZE)
S2.arc_to(90*_SIZE+LET_POS, _SIZE*63,11*_SIZE)
S2.move_to(30*_SIZE+LET_POS, _SIZE*84)       
S2.arc_to(9*_SIZE+LET_POS, _SIZE*120,-74*_SIZE)
S2.arc_to(30*_SIZE+LET_POS, _SIZE*168,-60*_SIZE)
S2.arc_to(135*_SIZE+LET_POS, _SIZE*168,-158*_SIZE)
S2.arc_to(159*_SIZE+LET_POS, _SIZE*123,-110*_SIZE)
S2.move_to(102*_SIZE+LET_POS, _SIZE*123)       
S2.arc_to(78*_SIZE+LET_POS, _SIZE*138,35*_SIZE)
S2.arc_to(78*_SIZE+LET_POS, _SIZE*120,9*_SIZE)
S2.move_to(135*_SIZE+LET_POS, _SIZE*105)       
S2.arc_to(162*_SIZE+LET_POS, _SIZE*60,-60*_SIZE)
S2.arc_to(141*_SIZE+LET_POS, _SIZE*12,-116*_SIZE)
S2.arc_to(30*_SIZE+LET_POS, _SIZE*12,-176*_SIZE)
S2.arc_to(6*_SIZE+LET_POS, _SIZE*60,-63*_SIZE)
S2.end_path
LET_POS := Let_pos + Let_width +  S_B_L
pen_up 

                            
PUB s_small

let_width :=135
S2.move_to(6*_SIZE+LET_POS, _SIZE*48)
pen_down
s2.begin_path        
S2.move_to(60*_SIZE+LET_POS, _SIZE*48)       
S2.arc_to(75*_SIZE+LET_POS, _SIZE*30,24*_SIZE)
S2.arc_to(75*_SIZE+LET_POS, _SIZE*48,9*_SIZE)
S2.arc_to(30*_SIZE+LET_POS, _SIZE*60,-92*_SIZE)
S2.arc_to(9*_SIZE+LET_POS, _SIZE*90,-31*_SIZE)
S2.arc_to(30*_SIZE+LET_POS, _SIZE*129,-44*_SIZE)
S2.arc_to(120*_SIZE+LET_POS, _SIZE*129,-172*_SIZE)
S2.arc_to(138*_SIZE+LET_POS, _SIZE*93,-69*_SIZE)
S2.move_to(90*_SIZE+LET_POS, _SIZE*93)       
S2.arc_to(75*_SIZE+LET_POS, _SIZE*105,17*_SIZE)
S2.arc_to(75*_SIZE+LET_POS, _SIZE*93,8*_SIZE)
S2.move_to(120*_SIZE+LET_POS, _SIZE*81)       
S2.arc_to(141*_SIZE+LET_POS, _SIZE*45,-39*_SIZE)
S2.arc_to(120*_SIZE+LET_POS, _SIZE*6,-44*_SIZE)
S2.arc_to(30*_SIZE+LET_POS, _SIZE*6,-172*_SIZE)
S2.arc_to(6*_SIZE+LET_POS, _SIZE*48,-52*_SIZE)
LET_POS := Let_pos + Let_width +  S_B_L
S2.end_path
pen_up

                            
PUB T_big


let_width :=156
S2.move_to(48*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(48*_SIZE+LET_POS, _SIZE*129)  
S2.move_to(0*_SIZE+LET_POS, _SIZE*129)  
S2.move_to(0*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(156*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(156*_SIZE+LET_POS, _SIZE*129)  
S2.move_to(111*_SIZE+LET_POS, _SIZE*129)  
S2.move_to(111*_SIZE+LET_POS, _SIZE*3)  
S2.move_to(48*_SIZE+LET_POS, _SIZE*3)  
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB t_small

let_width :=99
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path        
S2.move_to(45*_SIZE+LET_POS, _SIZE*3)       
S2.arc_to(21*_SIZE+LET_POS, _SIZE*30,-30*_SIZE)
S2.move_to(21*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(0*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(0*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(21*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(21*_SIZE+LET_POS, _SIZE*168)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*168)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*99)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*51)       
S2.arc_to(87*_SIZE+LET_POS, _SIZE*42,11*_SIZE)
S2.move_to(99*_SIZE+LET_POS, _SIZE*42)       
S2.move_to(99*_SIZE+LET_POS, _SIZE*3)       
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


                            
PUB U_big

let_width :=168
S2.move_to(12*_SIZE+LET_POS, _SIZE*57)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(72*_SIZE+LET_POS, _SIZE*66)       
S2.arc_to(96*_SIZE+LET_POS, _SIZE*45,24*_SIZE)
S2.arc_to(120*_SIZE+LET_POS, _SIZE*66,24*_SIZE)
S2.move_to(120*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*177)       
S2.move_to(180*_SIZE+LET_POS, _SIZE*57)       
S2.arc_to(150*_SIZE+LET_POS, _SIZE*9,-70*_SIZE)
S2.arc_to(45*_SIZE+LET_POS, _SIZE*9,-158*_SIZE)
S2.arc_to(12*_SIZE+LET_POS, _SIZE*57,-74*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L
                            


                            
PUB u_small

let_width :=144
S2.move_to(12*_SIZE+LET_POS, _SIZE*45)
pen_down
s2.begin_path        
S2.move_to(12*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(66*_SIZE+LET_POS, _SIZE*60)       
S2.arc_to(96*_SIZE+LET_POS, _SIZE*60,15*_SIZE)
S2.move_to(96*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(153*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(153*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(102*_SIZE+LET_POS, _SIZE*3)       
S2.move_to(102*_SIZE+LET_POS, _SIZE*18)       
S2.arc_to(60*_SIZE+LET_POS, _SIZE*0,-89*_SIZE)
S2.arc_to(12*_SIZE+LET_POS, _SIZE*45,-51*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L
                            
                            
PUB V_big

let_width :=174
S2.move_to(57*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(0*_SIZE+LET_POS, _SIZE*177)
S2.move_to(60*_SIZE+LET_POS, _SIZE*177)
S2.move_to(87*_SIZE+LET_POS, _SIZE*78)
S2.move_to(114*_SIZE+LET_POS, _SIZE*177)
S2.move_to(174*_SIZE+LET_POS, _SIZE*177)
S2.move_to(117*_SIZE+LET_POS, _SIZE*3)
S2.move_to(57*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB v_small

let_width :=141
S2.move_to(42*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(0*_SIZE+LET_POS, _SIZE*132)
S2.move_to(51*_SIZE+LET_POS, _SIZE*132)
S2.move_to(72*_SIZE+LET_POS, _SIZE*69)
S2.move_to(90*_SIZE+LET_POS, _SIZE*132)
S2.move_to(141*_SIZE+LET_POS, _SIZE*132)
S2.move_to(102*_SIZE+LET_POS, _SIZE*3)
S2.move_to(42*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L
                            
PUB W_big

let_width :=234
S2.move_to(39*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(0*_SIZE+LET_POS, _SIZE*177)
S2.move_to(57*_SIZE+LET_POS, _SIZE*177)
S2.move_to(72*_SIZE+LET_POS, _SIZE*54)
S2.move_to(99*_SIZE+LET_POS, _SIZE*177)
S2.move_to(144*_SIZE+LET_POS, _SIZE*177)
S2.move_to(162*_SIZE+LET_POS, _SIZE*87)
S2.move_to(177*_SIZE+LET_POS, _SIZE*177)
S2.move_to(234*_SIZE+LET_POS, _SIZE*177)
S2.move_to(195*_SIZE+LET_POS, _SIZE*3)
S2.move_to(132*_SIZE+LET_POS, _SIZE*3)
S2.move_to(114*_SIZE+LET_POS, _SIZE*90)
S2.move_to(102*_SIZE+LET_POS, _SIZE*3)
S2.move_to(39*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB w_small

let_width :=222
S2.move_to(42*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(3*_SIZE+LET_POS, _SIZE*135)
S2.move_to(57*_SIZE+LET_POS, _SIZE*135)
S2.move_to(72*_SIZE+LET_POS, _SIZE*69)
S2.move_to(90*_SIZE+LET_POS, _SIZE*135)
S2.move_to(138*_SIZE+LET_POS, _SIZE*135)
S2.move_to(156*_SIZE+LET_POS, _SIZE*69)
S2.move_to(168*_SIZE+LET_POS, _SIZE*135)
S2.move_to(222*_SIZE+LET_POS, _SIZE*135)
S2.move_to(183*_SIZE+LET_POS, _SIZE*3)
S2.move_to(129*_SIZE+LET_POS, _SIZE*3)
S2.move_to(111*_SIZE+LET_POS, _SIZE*66)
S2.move_to(96*_SIZE+LET_POS, _SIZE*3)
S2.move_to(42*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB X_big

let_width :=180
S2.move_to(0*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(54*_SIZE+LET_POS, _SIZE*96)
S2.move_to(3*_SIZE+LET_POS, _SIZE*177)
S2.move_to(69*_SIZE+LET_POS, _SIZE*177)
S2.move_to(90*_SIZE+LET_POS, _SIZE*135)
S2.move_to(111*_SIZE+LET_POS, _SIZE*177)
S2.move_to(177*_SIZE+LET_POS, _SIZE*177)
S2.move_to(126*_SIZE+LET_POS, _SIZE*93)
S2.move_to(177*_SIZE+LET_POS, _SIZE*3)
S2.move_to(114*_SIZE+LET_POS, _SIZE*3)
S2.move_to(90*_SIZE+LET_POS, _SIZE*45)
S2.move_to(66*_SIZE+LET_POS, _SIZE*3)
S2.move_to(0*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB x_small

let_width :=150
S2.move_to(0*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(39*_SIZE+LET_POS, _SIZE*72)
S2.move_to(0*_SIZE+LET_POS, _SIZE*132)
S2.move_to(60*_SIZE+LET_POS, _SIZE*132)
S2.move_to(75*_SIZE+LET_POS, _SIZE*111)
S2.move_to(90*_SIZE+LET_POS, _SIZE*132)
S2.move_to(147*_SIZE+LET_POS, _SIZE*132)
S2.move_to(105*_SIZE+LET_POS, _SIZE*75)
S2.move_to(147*_SIZE+LET_POS, _SIZE*3)
S2.move_to(90*_SIZE+LET_POS, _SIZE*3)
S2.move_to(75*_SIZE+LET_POS, _SIZE*39)
S2.move_to(60*_SIZE+LET_POS, _SIZE*3)
S2.move_to(0*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L
                            

PUB Y_big

let_width :=180
S2.move_to(60*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path   
S2.move_to(60*_SIZE+LET_POS, _SIZE*69)  
S2.move_to(0*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(63*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(87*_SIZE+LET_POS, _SIZE*123)  
S2.move_to(117*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(180*_SIZE+LET_POS, _SIZE*177)  
S2.move_to(120*_SIZE+LET_POS, _SIZE*69)  
S2.move_to(120*_SIZE+LET_POS, _SIZE*3)  
S2.move_to(60*_SIZE+LET_POS, _SIZE*3)  
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB y_small

let_width :=147
S2.move_to(42*_SIZE+LET_POS, _SIZE*15)
pen_down
s2.begin_path        
S2.move_to(0*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(54*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(75*_SIZE+LET_POS, _SIZE*66)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(144*_SIZE+LET_POS, _SIZE*132)       
S2.move_to(96*_SIZE+LET_POS, _SIZE*-15)       
S2.arc_to(63*_SIZE+LET_POS, _SIZE*-45,-44*_SIZE)
S2.arc_to(15*_SIZE+LET_POS, _SIZE*-45,-960*_SIZE)
S2.move_to(15*_SIZE+LET_POS, _SIZE*-6)       
S2.move_to(42*_SIZE+LET_POS, _SIZE*-6)       
S2.arc_to(42*_SIZE+LET_POS, _SIZE*15,12*_SIZE)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

                            
PUB Z_big

let_width :=156
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(12*_SIZE+LET_POS, _SIZE*51)
S2.move_to(72*_SIZE+LET_POS, _SIZE*129)
S2.move_to(12*_SIZE+LET_POS, _SIZE*129)
S2.move_to(12*_SIZE+LET_POS, _SIZE*177)
S2.move_to(159*_SIZE+LET_POS, _SIZE*177)
S2.move_to(159*_SIZE+LET_POS, _SIZE*135)
S2.move_to(84*_SIZE+LET_POS, _SIZE*51)
S2.move_to(159*_SIZE+LET_POS, _SIZE*51)
S2.move_to(159*_SIZE+LET_POS, _SIZE*3)
S2.move_to(12*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L


                            
PUB z_small

let_width :=123
S2.move_to(3*_SIZE+LET_POS, _SIZE*3)
pen_down
s2.begin_path 
S2.move_to(3*_SIZE+LET_POS, _SIZE*45)
S2.move_to(54*_SIZE+LET_POS, _SIZE*93)
S2.move_to(6*_SIZE+LET_POS, _SIZE*93)
S2.move_to(6*_SIZE+LET_POS, _SIZE*132)
S2.move_to(123*_SIZE+LET_POS, _SIZE*132)
S2.move_to(123*_SIZE+LET_POS, _SIZE*96)
S2.move_to(72*_SIZE+LET_POS, _SIZE*42)
S2.move_to(126*_SIZE+LET_POS, _SIZE*42)
S2.move_to(126*_SIZE+LET_POS, _SIZE*3)
S2.move_to(3*_SIZE+LET_POS, _SIZE*3)
S2.end_path
pen_up
LET_POS := Let_pos + Let_width +  S_B_L

PUB space

let_width :=100
LET_POS := Let_pos + Let_width +  S_B_L
 
'--------------------------------------------------------------------
Pub pen_up
 repeat while s2.moving
 servo.set(pen, up)
' waitcnt(clkfreq/3 + cnt)
                            
Pub pen_down
 repeat while s2.moving
 servo.set(pen, down)
 waitcnt(clkfreq/3 + cnt)