execute >NIL: s:cleanbreath
delete >NIL: s:cleanbreath
bcheat >NIL:
if exists s:cleanbreath
  assign >NIL: breathless: ""
  breathless >NIL:
  execute s:cleanbreath
  delete >NIL: s:cleanbreath
  quit
else
  quit
endif
