Prosedür Başlat ()
Değişken Bayt poz
Döngü poz = 0 Dan YazıTipleri -1 Kadar 1 Artış
Denetim YazıTipleri[poz]
DöngüSon
ProsedürSon
Örnek 2:
Prosedür Başlat ()
Değişken Metin met
Döngü met Kaynağı YazıTipleri Artış
Denetim met
DöngüSon
ProsedürSon