Sketching out a process in code… “Professionals” vs “Peons”. Check my code and tell me what I’m missing.
Dim theIT_StaffMember = "Professional" Dim Effort Effort = 100 if Effort > 110 then Effort = 110 Stress++ end if if Effort < 50 then fire(theIT_StaffMember) end if Dim Stress Stress = 0 if Stress < 0 then Stress = 0 Happy++ end if if Stress > 100 then randomEvent(sickLeave, stressLeave, » breakDown, quit, unfortunateIncident) end if Dim Happy Happy = 100 if Happy > 110 then Happy = 110 Effort++ end if if Happy < 10 then randomEvent(sickLeave, stressLeave, » breakDown, quit, unfortunateIncident) end if while EmployeeWorking = "yes" if (theIT_StaffMember = "Professional") then respect(theIT_StaffMember) Effort++ Stress-- Happy++ consult(theIT_StaffMember) Effort++ Stress-- heedWarnings(theIT_StaffMember) Happy++ Stress-- support(theIT_StaffMember) Effort++ Stress-- reward(theIT_StaffMember) Happy++ Stress-- recognise(theIT_StaffMember) Effort++ Happy++ elseif (theIT_StaffMember = "Peon") then Effort-- Stress++ Happy-- end if EmployeeWorking.MoveNext Wend