Так как я обожаю заниматься всякими глупостями то, держите:
\\ Скрипт для одниго шага человека...
\\ После шага делается еще раз

if (Пьяный) <= 10% then

 if Случайность(1000) = 1 then Упасть() else СделатьШаг()
else
 if (Пьяный >= 50%) then

  if (Пьяный >= 90%) then
   if Случайность(50%) then     СделатьПолзокВперед()
   else Случайность(10%)
    НичегоНеДелать()
   else
    Орать()
   endif
  endif
 else
  if Случайность(10) = 1 then
   Упасть()
  elseif Счайность(10) = 5 then
   Оступится()
  else
   СделатьШаг()
  endif
 endif
endif