mark start

if match "ticking"
call bullshit
endif

## Soggy used band-aid ##
if hppercentbelow 30 && hascombatitem 5678
use 5678
goto start
endif

## If not barf ##
if !snarfblat 442
abort
endif

if monstername "sausage goblin"
call goblin
endif

## Olfaction ##
if !hasskill 19
goto noolfact
endif

if monstername "garbage tourist" && !haseffect 331
skill 19
goto start
endif

mark noolfact

if match ""solid gold""
call solidgold
endif

call combat

##############################################

sub bullshit
mark ticking

if match "annoying" || match "cartwheeling" || match "phase-shifting" || match "turgid" || match "untouchable"
call instant
endif

if monstername "sausage goblin"
call goblin
endif

mark tickingcombat
attack
goto tickingcombat

endsub

##############################################

sub goblin
mark sausage

# micrometeorite #
if hasskill 7289
skill 7289
goto sausage
endif

# crayon shavings #
if hascombatitem 5703 && !match ""You throw the handful of wax shavings at your opponent""
use 5703
goto sausage
endif

call combat

endsub

##############################################
sub solidgold
mark gold

# meteor shower #
if hasskill 7291
skill 7291
goto gold
endif

call combat

endsub

##############################################

sub instant
mark instakill

# shattering punch #
if hasskill 149
skill 149
goto instakill
endif

# Exploding cigar #
if hascombatitem 9497
use 9497
goto instakill
endif

# superheated metal #
if hascombatitem 8522
use 8522
goto instakill
endif

# the bomb #
if hascombatitem 5225
use 5225
goto instakill
endif

# tatter #
if hascombatitem 1959
use 1959
goto instakill
endif

endsub

##############################################

sub combat
mark combatstart

## Soggy used band-aid ##
if hppercentbelow 40 && hascombatitem 5678
use 5678
goto combatstart
endif

# complimentary dinsey refreshments (quest) #
if monstername "angry tourist" && hascombatitem 8243
use 8243
goto combatstart
endif

# sing along #
if hasskill 7297
skill 7297
goto combatstart
endif

attack

goto combatstart

endsub