Excelsior

This is the secret formula for scripting:

set %cigaretteType LM
set %drinkType ED
set %cigarettes 18
set %EDs 2
set %scripterStatus fine
set %scriptDone no

while %scriptDone = no
{
gosub script

if %cigarettes = 0 || %EDs = 0
gosub shop

gosub updateScripterStatus

if %scripterStatus = tired ...