примеры. Последний,
примеры. Последний, правда, несколько громоздок, но разберитесь в нем сами, это хороший пример цикла со счетчиком.
Пример #1.
Рис. 1.
0 0 moveto (PostScript)
show
0 -20 moveto 5 0 (PostScript)
ashow
0 -40 moveto 5 -2 (PostScript)
ashow
20 -1 0 {gsave dup 0.5 mul -100
1 index 0.5 mul add moveto
dup 0.05 mul setgray
0.05 mul dup
(PostScript) ashow} for
1 1 0.5 setrgbcolor
0 -100 moveto (PostScript)
show
Команда kshow имеет два параметра: proc и string. Понятно, что второй параметр - это печатаемый текст. А первый параметр - это действие, выполняемое между печатями двух соседних символов текста. При вызове этого действия в стек кладутся два параметра - коды печатаемых символов. Основное назначение этой команды - делать так называемый кернинг (kerning, отсюда и буква k в названии), то есть изменять зазор между буквами в зависимости от свойств их прилегания друг к другу. Но мы можем пользоваться этой процедурой и для других целей. Вот пример:
Пример #2.
Рис.
Индекс
Элементарные функции
Линейные уравнения
Нелинейные уравнения
Случайные числа