ЕСЛИВДРУГ[NAME, ВЫР,<КОРТ1>,<КОРТ2>] ->УПРЯТАТЬ(NAME): ИДИ <КОРТ2,NAME>[(ВЫР ИЗ <КОРТ1>)]
КОНВДРУГ ->  УПРЯТАТЬ(ИДИ ИЗВЛЕЧЬ())
КОНЕСЛИ-> ИЗВЛЕЧЬ():ИДИ CЧКОМ+1


ЕСЛИВДРУГ[Бабай_пришел,(ДА),<ТОННАЖ ИЗ <1:10>,ВИДБАБАЯ<30,ВЕКО="ОПУЩЕНО">,<МАЛЫЙ,СРЕДНИЙ,ВИЙ>]

....
MАЛЫЙ:
....
...
КОНВДРУГ
...
СРЕДНИЙ:
...
...
КОНВДРУГ
...
ВИЙ:
...
...
КОНВДРУГ

Бабай_пришел: КОНЕСЛИ