Чего ты после каждой строки точки с запятой понаписал? Ты хоть синтаксис смотрел? Нет таких символов ни в одном синтаксисе в кликере! Отсюда и ошибка.
SUB(Перетащить, $par1, $par2, $par3, $par4)
LCLICK($par1, $par2)
WAITMS(500)
MOVE($par3, $par4)
WAITMS(500)
LCLICK($par3, $par4)
WAITMS(500)
END_SUB
GETSCREEN
if(PXL(321,201)=16777215)
Перетащить(483,849,521,628)
IF_PICTURE_IN (0,0, 696,439, "cup_of_o_juice.bmp", 16711935, 95)
Перетащить(339,955,513,613)
WAITMS(500)
Перетащить(267,735,521,628)
WAITMS(500)
END_IF
IF_PICTURE_IN (0,0, 696,439, "cup_of_vish_juice.bmp", 16711935, 95)
Перетащить(339,955,513,613)
WAITMS(500)
Перетащить(423,705,628,624)
WAITMS(500)
END_IF
IF_PICTURE_IN (0,0, 696,439, "icecream_vish.bmp", 589568, 95)
Перетащить(1139,832,521,628)
WAITMS(500)
Перетащить(1330,883,521,628)
WAITMS(500)
END_IF
IF_PICTURE_IN (0,0, 696,439, "icecream_v.bmp", 16711935, 95)
Перетащить(1139,832,521,628)
WAITMS(500)
Перетащить(1212,835,521,628)
WAITMS(500)
END_IF
IF_PICTURE_IN (0,0, 696,439, "icecream_c.bmp", 16711935, 95)
Перетащить(1139,832,521,628)
WAITMS(500)
Перетащить(1284,812,521,628)
WAITMS(500)
END_IF
IF_PICTURE_IN (0,0, 696,439, "cup_of_water.bmp", 16711935, 95)
Перетащить(339,955,513,613)
WAITMS(500)
Перетащить(321,673,558,624)
WAITMS(500)
END_IF
END_IF
WAITMS(500)