2' 'ư>HELPNA\NhNN:ldCONTINUE n((PAEXIT&%p=lHALTމPlddSTEP 1v4߉lg STOP߉X^F%EFSTOP ,,OFFg^w@߉U,T߉W,Opgp߉.OdpAg|߉pA|ŻOdgpAModelsOildepot.gpsLFeCFEOJhLJhnyhE(((((((((({\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 - OILDEPOT.GPS, by Gerard F. Cummings \par **************************************************************** \par * Oil Storage and Distribution Depot * \par * Time Unit Is One Minute * \par **************************************************************** \par RMULT 5631,39941 \par Arr FUNCTION RN2,C5 ;Arrivals frequency \par 0,0/0.2,.45/.6,1/.85,1.5/1.0,2 \par Pumprate FUNCTION P$Type,L3 ;Mins to pump 1000 gals \par 1,6/2,5/3,7 \par Gals VARIABLE (RN1@201+300)#10 \par Type VARIABLE RN1@3+1 \par Pump VARIABLE (FN$Pumprate#P$Gals)/1000+S$Depot/2+2 \par Depot STORAGE 12 ;Room for 12 trucks max \par Transit TABLE M1,10,10,20 ;Time of truck in depot \par Qty TABLE X$Gals,20000,20000,9 ;Qty of oil sold per day \par **************************************************************** \par GENERATE 18,FN$Arr ;Truck arrivals \par ASSIGN Gals,V$Gals ;P$Gals=Number of gals \par ASSIGN Type,V$Type ;P$Type=Type of oil \par ENTER Depot ;Truck enters depot \par QUEUE P$Type ;Queue for type of oil \par SEIZE P$Type ;Get a pump \par DEPART P$Type ;Depart the queue \par ADVANCE V$Pump ;Service time pumping \par RELEASE P$Type ;Release the pump \par LEAVE Depot ;Truck leaves the depot \par SAVEVALUE Gals+,P$Gals ;Tally no. of gals sold \par TABULATE Transit ;Table of transit times \par TERMINATE ;Truck departs \par **************************************************************** \par GENERATE 480 ;One transaction per day \par TABULATE Qty ;Record no. of gals sold \par SAVEVALUE Sold+,X$Gals ;Record total oil sold \par SAVEVALUE Gals,0 ;Savevalue set to 0 \par TERMINATE 1 ;One day has passed \par **************************************************************** \par \par \par }