8.х печать этикеток в сом порт

Добрый день!
существует обработка для 7.7 "печать этикеток в сом порт"
".....
Утилиты=СоздатьОбъект("MyUtils.Application");
Утилиты.OpenCom(Порт);
LF=CHR(10);
Утилиты.SendCommand(LF+"D15","");
Утилиты.SendCommand(LF+"S2","");
......
Утилиты.SendCommand(LF+ANSIToOEM(СокрЛП(ДляПечати.СерийныйНомер)),"");
Утилиты.SendCommand(LF+ANSIToOEM(СокрЛП(ДляПечати.Код)),"");
Утилиты.SendCommand(LF+ANSIToOEM(Лев(ДляПечати.Код+" "+ДляПечати.Товар)),"");
.....

Подскажите как переложить даннный код для 8.1 УПП
Суть проблемы в очень маленьких этикетках 10*15 мм, в которых помимо штрихкода еще
6 строк, стандартными средствами УПП 1.2 (1.2.19.1) такой миниатюризации не добиться-
все сливается
заранее благодарный.

Утилиты = Новый COMОбъект("MyUtils.Application") - и радуйтесь