Syntax Error on line 1

Unknown error concerning the definition of subroutine preauto1.

Edit the Settings File for 2 Queen Rocky Horror Lycanthropic Symmetric Chess

For the sake of debugging, here is the full GAME Code program that this error occurred in. The lines have been properly indented to help you spot scope errors.

   0 alias M GU_y m GU_lb W _DT_WU w _DT_wu
   1 sub preauto1
   2   if equal moved R
   3     add RB dest
   4   endif
   5   if equal moved RB
   6     add R dest
   7   endif
   8   if equal moved r
   9     add rb dest
  10   endif
  11   if equal moved rb
  12     add r dest
  13   endif
  14   if equal moved p
  15     add x dest
  16   endif
  17   if equal moved x
  18     add p dest
  19   endif
  20   if equal moved P
  21     add X dest
  22   endif
  23   if equal moved X
  24     add P dest
  25   endif
  26   if equal moved b
  27     add gu dest
  28   endif
  29   if equal moved gu
  30     add b dest
  31   endif
  32   if equal moved B
  33     add GU dest
  34   endif
  35   if equal moved GU
  36     add B dest
  37   endif
  38   if equal moved N
  39     add .EW dest
  40   endif
  41   if equal moved .EW
  42     add N dest
  43   endif
  44   if equal moved n
  45     add .ew dest
  46   endif
  47   if equal moved .ew
  48     add n dest
  49   endif
  50   if equal moved K
  51     add _DT_WU dest
  52   endif
  53   if equal moved _DT_WU
  54     add K dest
  55   endif
  56   if equal moved k
  57     add _dt_wu dest
  58   endif
  59   if equal moved _dt_wu
  60     add k dest
  61   endif
  62   if equal moved Q
  63     add GU_y dest
  64   endif
  65   if equal moved GU_y
  66     add Q dest
  67   endif
  68   if equal moved q
  69     add GU_lb dest
  70   endif
  71   if equal moved GU_lb
  72     add q dest
  73   endsub
  74   sub postauto1
  75     if equal moved R
  76       add RB dest
  77     endif
  78     if equal moved RB
  79       add R dest
  80     endif
  81     if equal moved r
  82       add rb dest
  83     endif
  84     if equal moved rb
  85       add r dest
  86     endif
  87     if equal moved p
  88       add x dest
  89     endif
  90     if equal moved x
  91       add p dest
  92     endif
  93     if equal moved P
  94       add X dest
  95     endif
  96     if equal moved X
  97       add P dest
  98     endif
  99     if equal moved b
 100       add gu dest
 101     endif
 102     if equal moved gu
 103       add b dest
 104     endif
 105     if equal moved B
 106       add GU dest
 107     endif
 108     if equal moved GU
 109       add B dest
 110     endif
 111     if equal moved N
 112       add .EW dest
 113     endif
 114     if equal moved .EW
 115       add N dest
 116     endif
 117     if equal moved n
 118       add .ew dest
 119     endif
 120     if equal moved .ew
 121       add n dest
 122     endif
 123     if equal moved K
 124       add _DT_WU dest
 125     endif
 126     if equal moved _DT_WU
 127       add K dest
 128     endif
 129     if equal moved k
 130       add _dt_wu dest
 131     endif
 132     if equal moved _dt_wu
 133       add k dest
 134     endif
 135     if equal moved Q
 136       add GU_y dest
 137     endif
 138     if equal moved GU_y
 139       add Q dest
 140     endif
 141     if equal moved q
 142       add GU_lb dest
 143     endif
 144     if equal moved GU_lb
 145       add q dest
 146     endsub
 147     end
 148     

functions

uservar

Array ( [0] => Array ( [main] => Array ( ) ) )

mline

Array ( [0] => MoveLine Object ( [movenum] => 0 [move] => [level] => 0 [comment] => [length] => 0 [newturn] => [turn] => 0 ) )

allmoves

Array ( )

movelist

constants

Array