Notasi Algoritmik Pencerminan Garis

PROGRAM pencerminan garis
{Program untuk membuat hasil cerminan dari suatu garis}
DEKLARASI
type GARIS : ( PAw : POINT { Titik Awal }, PAkh : POINT { Titik Akhir} )
{nama fungsi dan prosedur}
{L terdefinisi dengan L.PAw=P1 dan L.PAk=P2}
{membentuk sebuah L dari komponen-komponenya)
Procedure MakeGARIS (Input P1, P2:POINT, Output L:GARIS)
{konstruktor membentuk garis}
{definisi metode mencerminkan garis}
function HslGeser (L: GARIS, DX,DY:boolean) → GARIS
function MirrorOf (L: GARIS, SbX,SbY:boolean) → GARIS
{ Menghasilkan salinan L yang dicerminkan}
{ tergantung nilai SbX dan SBY}
{ Jika SbX bernilai true, maka dicerminkan thd Sumbu X}
{ Jika SbY bernilai true, maka dicerminkan thd Sumbu Y}