erltrek_ship: deplete energy at handle_command({phaser,...},...)