Seedship [Text-Based Game]

Summary

<<widget damageSystem>>\n\t/* Silently apply damage to a system */\n\t/* args[0] should be the name of the system */\n\t/* args[1] should be the amount of damage */\n\t<<switch $args[0]>>\n\t\t<<case "atmosphere scanner">>\n\t\t\t<<set $scanner_atmosphere -= Math.min($args[1],$scanner_atmosphere)>>\n\t\t\t<<set $new_integrity = $scanner_atmosphere>>\n\t\t<<case "gravity scanner">>\n\t\t\t<<set $scanner_gravity -= Math.min($args[1],$scanner_gravity)>>\n\t\t\t<<set $new_integrity = $scanner_gravity>>\n\t\t<<case "temperature scanner">>\n\t\t\t<<set $scanner_temperature -= Math.min($args[1],$scanner_temperature)>>\n\t\t\t<<set $new_integrity = $scanner_temperature>>\n\t\t<<case "resources scanner">>\n\t\t\t<<set $scanner_resources -= Math.min($args[1],$scanner_resources)>>\n\t\t\t<<set $new_integrity = $scanner_resources>>\n\t\t<<case "water scanner">>\n\t\t\t<<set $scanner_water -= Math.min($args[1],$scanner_water)>>\n\t\t\t<<set $new_integrity = $scanner_water>>\n\t\t<<case "landing system">>\n\t\t\t<<set $system_landing -= Math.min($args[1],$system_landing)>>\n\t\t\t<<set $new_integrity = $system_landing>>\n\t\t<<case "construction system">>\n\t\t\t<<set $system_constructors -= Math.min($args[1],$system_constructors)>>\n\t\t\t<<set $new_integrity = $system_constructors>>\n\t\t<<case "cultural database">>\n\t\t\t<<set $system_cultural_database -= Math.min($args[1],$system_cultural_database)>>\n\t\t\t<<set $new_integrity = $system_cultural_database>>\n\t\t<<case "scientific database">>\n\t\t\t<<set $system_scientific_database -= Math.min($args[1],$system_scientific_database)>>\n\t\t\t<<set $new_integrity = $system_scientific_database>>\n\t\t<<case "sleep chambers">>\n\t\t\t\t/* Special: damage to the sleep chambers kills colonists */\n\t\t\t\t/* Never kill exactly 1 colonist or leave exactly 1 alive */\n\t\t\t<<set $colonists -= Math.clamp($args[1],2,$colonists)>>\n\t\t\t<<if $colonists == 1>>\n\t\t\t\t<<set $colonists = 0>>\n\t\t\t<</if>>\n\t\t\t<<set $new_integrity ...