2' 'ư>HELPRA\NhNN:lXCONTINUE n((}(XEXIT&%p=lHALTމPlX(XdSTEP 1~4߉lg STOP߉X^F%EFSTOP ,,OFFg^w@߉U T߉W OIgp߉.OdIAg|߉IA|ŻOdgIAModelsTelephon.gpsLFeCFEOhLhFhE(((((((((({\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 ; GPSS World Sample File - TELEPHON.GPS, by Gerard F. Cummings \par ************************************************************** \par * * \par * * \par * Telephone System Model * \par * * \par ************************************************************** \par * Simple Telephone Simulation * \par * Time Unit is one minute * \par Sets STORAGE 2 \par Transit TABLE M1,.5,1,20 ;Transit times \par GENERATE 1.667,1 ;Calls arrive \par Again GATE SNF Sets,Occupied ;Try for a line \par ENTER Sets ;Connect call \par ADVANCE 3,1 ;Speak for 3+/-1 min \par LEAVE Sets ;Free a line \par TABULATE Transit ;Tabulate transit time \par TERMINATE 1 ;Remove a transaction \par Occupied ADVANCE 5,1 ;Wait 5 minutes \par TRANSFER ,Again ;Try again \par ************************************************************** \par \par \par }