POSTSCRIPT语言中有许多操作符用于制定程序内流的控制。我们在前一章使用了一个repeat运算。所有的控制操作符都使用了之前简要提到的对象类型，即函数，用于我们调用。
7.1、函数
函数（既过程）是一个数组，其内容由解析器执行。
当解析器在程序中遇到一系列对象（值和名称）时，它执行与这些指令相应的操作，将对象放在堆栈上，查找和执行操作符和过程。
但是如果一系列对象用括号括起来，则不会立即执行，而是放在堆栈上。
86 23 add
该行使解析器将数字86和23相加
{86 23 add}
当执行置放时，操作符添加一个程序块，然后放在堆栈上，函数通常跟字面名称，后边跟def运算符，def运算符将其与当前所保存的名称相连（这就是函数的定义）。
7.2、条件语句
7.2.1、比较
POSTSCRIPT提供了一套比较完整额比较运算符，这些比较栈上的前两个项目，可以是任何类型，返回一个布尔类型的对象在堆栈上。他们的等效数学符号为：
eq =； ne ≠； gt >； lt <； ge ≥； le≤；
7.2.2、if
例：检查是否到达当前行的末尾
/chkforendofline
{ currentpoint pop %获取x的位置
612 gt %是否大于612
{0 -12 translate 0 0 moveto} if
}def
执行取出当前的x，比较看是否大于612（即本行的末尾），如果大于，则将原点移动到下一行的开头，当前点移动到原点的位置。
编写一个程序，对字符串进行简单的格式打印：检查该字符串的长度是否适合当前行，如果不适合，则移动到新的行，然后进行打印。
在这里定义了三个变量：左边距，右边距，当前文本的垂直位置，以及单独文本的垂直距离。
首先复制要打印的字符串，然后使用stringwith计算其长度，然后取出当前的x的位置，将两个值相加，看是否大于右边沿，如果大于，跳转到下一行进行打印。
% -------------- Variables ---------------
/LM 72 def %定义左边沿
/RM 216 def %定义右边沿
/ypos 720 def %当前文本的垂直位置
/lineheight 14 def %一行字符的高度
% of text
% ------------- Procedures ---------------
/newline %跳转倒下一行
{ ypos lineheight sub %720 - 14 即为下一行的垂直位置
/ypos exch def %将当前文本的垂直高度刷新为新的值
LM ypos moveto } def %将当前点移动到新的起始点
/prtstr %打印字符串
{ dup stringwidth pop %取出打印的字符串的宽度
currentpoint pop %取出当前画笔x的位置
add RM gt %相加看是否大于右边距
{newline} if %条件符合，跳转到下一行
show } def %进行打印
%------------- Main Program --------------
/Times-Italic findfont 13 scalefont setfont
LM ypos moveto
(If ) prtstr (you ) prtstr (tell ) prtstr
(the ) prtstr (truth, ) prtstr (you ) prtstr
(don’t ))prtstr (have ) prtstr (to ) prtstr
(remember ) prtstr (anything. ) prtstr
(- Mark ) prtstr (Twain ) prtstr
showpage
7.2.3、ifelse
这个运算符需要堆栈上有三个对象：一个布尔值和两个执行语句。
如果为真，则执行第一个，否则执行第二个。
bool {op1} {op2} ifelse
例：使用ifelse生成了一组灰度交替逐渐减少高度的重叠梯形。
% ------- Variables & Procedures ---------
/scalefactor 1 def
/counter 0 def
/DecreaseScale
{ scalefactor .2 sub
/scalefactor exch def } def
/IncreaseCounter
{ /counter counter 1 add def } def
/trappath
{ 0 0 moveto 90 0 rlineto
-20 45 rlineto -50 0 rlineto
closepath } def
/doATrap
{ gsave %保存当前环境
1 scalefactor scale %设置当前坐标轴的压缩比例
trappath %绘制梯形
counter 2 mod %取余(看是否能被2整除)
0 eq {.5} {0} ifelse
setgray fill %设置灰度，然后进行填充
grestore } def %恢复环境
% ------------ Begin Program ----------
250 350 translate
5
{ IncreaseCounter %标记当前的次数
doATrap %绘制梯形
DecreaseScale %标记当前的坐标轴y的压缩比例
0 20 translate %每次将原点向上移动20个单位
} repeat
showpage
7.3、循环
在POSTSCRIPT中有三个操作符用来建立和控制循环程序。我们已经使用过repeat操作。
7.3.1、for
这个运算符实现了计数循环。该操作符需要四个对象：
起始值、地增量、最终值、重复的过程。
for操作在每次执行过程之前将计数器的当前值放在堆栈上。
例：将字幕k在页面上每12个单元打印一次，
/Times-Italic findfont 10 scalefont setfont
100 100 translate
0 12 600 {0 moveto (k) show } for
showpage
数字的变化不一定是整数，例如打印一个zip字符出现阴影效果
/Times-Italic findfont 30 scalefont setfont
/printZip
{ 0 0 moveto (Zip) show} def
320 400 translate
.95 -.05 0
{ setgray
printZip
-1 .5 translate } for
1 setgray printZip
showpage
7.3.2、loop，exit
许多程序需要重复一个不确定的数目，一段时间或者永远，或者满足某种条件，这时候就要用到重复。。。直到。。。这种。
POSTSCRIPT提供了一对运算符：loop，exit。
loop操作符重复执行其过程，直到遇到退出条件。退出导致程序离开包含该操作符的最内层循环。退出操作符还会终止for，repeat，forall操作符启动的循环。
例：此程序无限打印howdy。
{(Howdy ) show} loop
例：为了了解loop-exit如何一起工作，以下程序在当前页面绘制了几个圆
/pagewidth 8.5 72 mul def
/doCircle
{ xpos ypos radius 0 360 arc stroke} def
/increase-x
{ xpos radius add
/xpos exch def } def
/lineofcircles %stack: radius y
{ /ypos exch def
/radius exch def
/xpos 0 def
{ xpos pagewidth le
{doCircle increase-x}
{exit} ifelse
}loop
} def
% --------------- Begin Program -----------
10 400 lineofcircles
30 400 lineofcircles
90 400 lineofcircles
showpage