PrePS нестандартная потетрадная метка

[mamont]

в наличии препс 5.
требуется сделать "потетрадную метку с а" 1a 2a и тд...
есть файл SigcollC.eps
вот с таким кодом

%!PS
%%Title: Signature Collation Mark A
%SSiUserMarkType: 16386
%SSiNoCaching
%%Creator: ScenicSoft (Hand Coded by Ray)
%%CreationDate: 05-28-99
%%BoundingBox: ? ? ? ?
%%ColorUsage: Color
%%EndComments
%%EndProlog
% Mark code starts here...
/str 10 string def
/ctrstr % prints sig number centered on current point
{dup .8 mul /Helvetica findfont exch scalefont setfont
270 rotate 0.3 mul 0 exch sub 0 exch rmoveto
preps_sig_num cvi str cvs dup stringwidth pop 2 div 0 exch sub 0 rmoveto show} def

PrepsMarkDict begin
mark_step abs setlinewidth
mark_forecolor
0 0 moveto
%wide or tall?
mark_height mark_width gt
{ preps_sig_num 1 sub cvi mark_height mark_step abs div cvi mod mark_step abs mul
mark_step 0 lt{0 exch mark_height exch sub mark_step add mark_step 2 div sub moveto}
{0 exch mark_step 2 div add moveto}ifelse
currentpoint mark_width 0 rlineto stroke moveto
mark_backcolor mark_width 2 div 0 rmoveto
mark_step abs mark_width div 2 lt
{mark_step abs
preps_sig_num 9 gt{pop mark_step abs 1.2 div}
if preps_sig_num 99 gt{pop mark_step abs 1.4 div}
if preps_sig_num 999 gt{pop mark_step abs 1.6 div}
if}{mark_width}ifelse
ctrstr}
{ preps_sig_num 1 sub cvi mark_width mark_step abs div cvi mod mark_step abs mul
mark_step 0 lt{mark_width exch sub mark_step add mark_step 2 div sub 0 moveto}
{mark_step 2 div add 0 moveto}
ifelse currentpoint 0 mark_height rlineto stroke moveto mark_backcolor 0 mark_height 2 div rmoveto
mark_height mark_step abs div 2 lt{mark_height
preps_sig_num 9 gt{pop mark_height 1.2 div}if
preps_sig_num 99 gt{pop mark_height 1.4 div}if
preps_sig_num 999 gt{pop mark_height 1.6 div}if}{mark_step abs}ifelse
ctrstr}ifelse
end % PrepsMarkDict
%%Trailer


внимание вопрос что и куда нужно вписать в код чтоб на спуске была не просто цифра а цифра с буквой.

 

[duh]

Простая текстовая метка $sig$side чем не угодила?
Хотя стоп! Collation mark походу это делать и не должна - она ставится только на одну из сторон листа и поэтому нет необходимости ставить значение стороны А или В.

 

[mamont]

постараюсь разъяснить проблему. тетрадь состоит из двух листов лист 1(внешний) и лист 1а (внутренний)
на внешнем листе collation mark ставится легко и непринужденно.
а на внутреннем возникают проблемы
1) метку нужно ставить не между 5 и 12 полосами (по корешку), а между 5 и 8 (по головке) чтоб проверить правильность блока на листоподборе
2) Smart mark\ collation mark ставится только по корешку и ползает вдоль него, -> берем static mark который ползает в любую сторону но в нем только цифра.
3) зачем в метке нужна буква "а"? - это жесткое требование тамошних технологов
"чтоб не перепутать внешнюю терадочку с внутренней" (Ц)итата
и вот как-то так...

 

[duh]

Как я говорил collation mark вряд ли даст такую возможность, а вот выкрутиться для тамошних технологов можно вставив все ту же текстовую метку $sig$side только на одну сторону Back в нужном месте. Сползать она не будет, но сторону покажет.
ЗЫ: сама задача (ИМХО) из разряда "хочу странного".

 

[Valentin]

ЗЫ: сама задача (ИМХО) из разряда "хочу странного".

Для одних вот таких, пришлось наваять кучу меток и расставлять в спусках руками по координатам со смещением.

 

[polbol]

У нас тоже по началу просили потетрадную в корешке на работах вкладкой... Насчет внешний и внутренний, уточните печать рулонная или листовая? Если такие работы на рулоне, то листы складываются еще до фальцовки и на выходе готовая тетрадь.

 

[polbol]

Для подобных работ можно пробовать листы A,B,C,D. На А ставите обычную потетрадную, а на С например с поворотом...

 

[Intruder]

3) зачем в метке нужна буква "а"? - это жесткое требование тамошних технологов
"чтоб не перепутать внешнюю терадочку с внутренней" (Ц)итата
и вот как-то так...

Спросите "тамошних" технологов - зачем нужна метка, которая не будет видна?
Кроме того, технолог должен предлагать технологичные решения, упрощающие работу, а не усложняющие.
Я бы не стал ставить метку на внутренний лист, толку от неё - 0.

 

[JAW]

Вот может туда сигнатурку какую поставить...

 

[Saratoga]

а проставить просто дополнительную метку (например Inner/Внутренняя и Outer/Внешняя не привязанную к Тетрадной не судьба?

 

[dj-alex]

1) метку нужно ставить не между 5 и 12 полосами (по корешку), а между 5 и 8 (по головке) чтоб проверить правильность блока на листоподборе
2) Smart mark\ collation mark ставится только по корешку и ползает вдоль него, -> берем static mark который ползает в любую сторону но в нем только цифра.
3) зачем в метке нужна буква "а"? - это жесткое требование тамошних технологов
"чтоб не перепутать внешнюю тетрадочку с внутренней" (Ц)итата
и вот как-то так...

с завидной регулярностью ставили такие метки. причем именно для того, чтобы не путали при подборе, т.к. именно подбор был ручным...

Простая текстовая метка $sig$side чем не угодила?
Хотя стоп! Collation mark походу это делать и не должна - она ставится только на одну из сторон листа и поэтому нет необходимости ставить значение стороны А или В.

а еще ставили потетрадные метки для проверки правильности подбора по изданию перед шитьем. или перед КБС... там чюдесатости (по другому написать не могу) и не такие были, ибо "привыкли по старинке с ручным монтажом так работать".
Но половину таких меток приходилось вручную ставить. И то, что половину из них не было видно - не волнует, ибо "должны быть"!

 

[Artem_V]

Можно сделать 1.0, 2.0 и тд
В строке
preps_sig_num cvi str cvs dup stringwidth pop 2 div 0 exch sub 0 rmoveto show} def
заменить cvi на cvlit

 

[serzin]

Мы подобные тетради обозначаем 1 и 1*. * ставится как умная текстовая метка, привязанная к первой странице внутренней тетради. Она не движется за сигнатурной меткой, но внутреннюю тетрадь обозначает. Наличие этих меток удобно при проверке спусков и на брошюровке. Их не видно после подбора, но до подбора они видны. Что касается "ставить вручную", то шаблон препса представляет собой обычный текстовый файл с открытым и документированным форматом. Внешней программкой делать в нем можно все что угодно.

 

[mamont]

Можно сделать 1.0, 2.0 и тд
В строке
preps_sig_num cvi str cvs dup stringwidth pop 2 div 0 exch sub 0 rmoveto show} def
заменить cvi на cvlit

Большое вам спасибо.
это решение прокатило. я сумел продавить технологов на обозначение с ноликом.

теперь следующий вопрос.
как сделать так чтоб на метке печатался не номер сигнатуры и а его удвоенное значение.

 

[mamont]

извините за мультипост. свой последний вопрос снимаю. худо-будно разобрался с синтаксисом языка postScript и всё сделал.

всем спасибо за участие и помощь.

 

[Saratoga]

худо-будно разобрался с синтаксисом языка postScript и всё сделал.

Ну тогда просвятите общественность... Многим может оказаться полезным, да и результаты поиска по данной теме (проблеме) будут удовлетворять ожидания ищущих...