2' 'ư>HELPA\NhNN:loCONTINUE n((|oEXIT&%p=lHALTމPlo|odSTEP 1~4߉lg STOP߉X^F%EFSTOP ,,OFFg^w@߉UT߉WOgp߉.Od?g|߉?|ŻOdg?ModelsSample1a.gpsLFeCFEOH,hLH,hF.hE(((((((((({\rtf1\ansi\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fmodern Courier New;}} {\colortbl\red0\green0\blue0;} \deflang1033\pard\tx1200\tx2400\tx4450\plain\f2\fs20 ************************************************************************* \par * * \par * Barber Shop Simulation * \par * * \par ************************************************************************* \par \tab GENERATE 300,100 ;Create next customer. \par QUEUE BARBER ;Begin queue time. \par \tab SELECT NU 1,1,4 \par \tab SEIZE P1 ;Own or wait for barber. \par \tab DEPART BARBER ;End queue time. \par \tab ADVANCE 300 ;Haircut takes a few minutes. \par \tab RELEASE P1 ;Haircut done. Give up the barber. \par \tab SAVEVALUE AVE_QUEUE,QT$BARBER ;Save the current resulting ave. \par TERMINATE 1 ;Customer leaves. \par \par \par \par }