10 '                 KAT˜B˜M
20 KEY OFF
30 CLS
40 COLOR 3, 4: LOCATE 7, 25: PRINT "-KAT˜B˜M -": COLOR 7, 0:
50 KATIP1$ = "O3A6O4E16L8EE16FEFGL8EEDL16DDL8CDE4P4"
60 KATIP2$ = "O3A6B16O4L8CDL16EFEDCO3B16A8B16O4L16DCO3BBAG#O3AB4P6"
70 KATIP3$ = "O3A6B16O4C8D8L16EFEDCO3BA8L16BO4DCO3BBAAG#A2"
80 FOR I = 1 TO 3: COLOR 3, 6
90 IF I = 1 THEN LOCATE 10, 5: PRINT "- šskdara gider iken ald da bir ya§mur."
100 IF I = 2 THEN LOCATE 14, 5: PRINT "- Katip uykudan uyanmŸ g”zleri mahmur.  "
110 PLAY KATIP1$
120 PLAY KATIP1$
130 IF I = 1 THEN LOCATE 12, 5: PRINT "- Katibimin setresi uzun ete§i ‡amur.    "
140 IF I = 2 THEN LOCATE 16, 5: PRINT "- Katip benim,ben katibin,el ne karŸr. "
150 PLAY KATIP2$
160 IF I = 2 THEN LOCATE 19, 5:
170 PLAY KATIP3$: COLOR 2, 4
171 IF I = 3 THEN LOCATE 22, 12: PRINT "  T E ž E K K š R  E D E R ˜ Z "
180 PLAY "P4": COLOR 7, 0
190 NEXT
200 END