2' 'ư>HELPA\NhNN:lBCONTINUE n((xBEXIT&%p=lHALTމPlBxBdSTEP 1v4߉lg STOP߉X^F%EFSTOP ,,OFFg^w@߉U T߉W Ogp߉.OdAg|߉A|ŻOdgAModelsSchr2f.gpsLFeCFEOh-hLh-h0hE(((((((((({\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 * Adapted from "Simulation Using GPSS", by Thomas J. Schriber \par * \par * Storage Capacity Definitions \par * \par Testers STORAGE 2 ;2 workers at last station \par * \par * Model Segment 1 \par * \par GENERATE 55,20 ;Sets arrive from last station \par Backplace QUEUE Area1 ;Enter inspection waiting area \par ENTER Testers ;Capture an inspector \par DEPART Area1 ;Leave the waiting area \par ADVANCE 90,30 ;Set is being inspected \par LEAVE Testers ;Free the inspector \par TRANSFER .15,,Fix ;To packing or adjust. station \par TERMINATE ;Set moves on to packing \par Fix QUEUE Area2 ;Enter adjustment waiting area \par SEIZE Fixer ;Capture the adjustor \par DEPART Area2 ;Leave the waiting area \par ADVANCE 300,100 ;Set is being adjusted \par RELEASE Fixer ;Free the adjuster \par TRANSFER ,Backplace ;Go back to be inspected \par * \par * Model Segment 2 \par * \par GENERATE Duration ;Timer \par TERMINATE 1 ;Shuts off the run \par * \par * Control Commands-A Report will be written \par * automatically after each \par * day. \par * \par * Duration is 1 day \par * \par Duration EQU 4800 \par * \par * \par START 1 ;Start run for the first day \par START 1 ;Start run for the second day \par START 1 ;Start run for the third day \par START 1 ;Start run for the fourth day \par START 1 ;Start run for the fifth day \par \par \par }