Barometer Red

Browser lacks capabilities required to play.

Upgrade or switch to another browser.

Loading…

As penance for the curiosity of man, you sink in your metal tomb- your iron lung. You hear it breathe: the gentle hum of electricity; the dull wail of steel; the hiss of hydrolics. The vessle smells of a fish market. Despite its lights, it's pitch black outside your apparatus. It's impossible to tell you're even moving, save the barometer; it drops to <span id = "altFormat">1093</span>. You're close now- close to <<click 'the ocean floor'>> <<replace #next>>The mechanical beast's knees buckle; lights flicker. The iron plates let out a metalic yelp and something jolts loose, hitting the ocean bed. A landing so volitile- verily harsh on your robotic shell. And yet, it's much too early to recall- nay, retreat. Now you must work. Now you must [[drudge |O2]]. <</replace>><</click>>. <span id = 'next'></span>

Game by Xavier Austin. <<nobr>> <<if $samples >= 4>><<goto 'Dead End'>><</if>> <<set _func = "<<replace '#dirfail'>>Something impedes your trek in this direction...<</replace>><<if Math.sign($dir[0])==-1>><<set _dirSign = ['M','']>><<else>><<set _dirSign = ['','']>><</if>><<if Math.sign($dir[1])==-1>><<set _dirSign[1] = 'M'>><<else>><<set _dirSign[1] = ''>><</if>><<set _x= 'a'+_dirSign[0]+ Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>><<if def $map[_x] and passage()!='Battle'>><<set $o2-=7>><<goto $map[_x]>>">> <<if Math.sign($dir[0])==-1>><<set _dirSign = ['M','']>><<else>><<set _dirSign = ['','']>><</if>><<if Math.sign($dir[1])==-1>><<set _dirSign[1] = 'M'>><<else>><<set _dirSign[1] = ''>><</if>> <<set _func1 = ["<<set $dir[0]+=1>>"+_func+"<<else>><<set $dir[0]-=1>><</if>>","<<set $dir[1]-=1>>"+_func+"<<else>><<set $dir[1]+=1>><</if>>","<<set $dir[1]+=1>>"+_func+"<<else>><<set $dir[1]-=1>><</if>>","<<set $dir[0]-=1>>"+_func+"<<else>><<set $dir[0]+=1>><</if>>"]>> <</nobr>> <<if !tags().includes("Event")>>HULL: <<print '<div class = "hpback" id = "hpwhole"><div class = "hpbar" id = "hpbar"><div class = "hptext">$health/$maxHealth</div></div></div>'>> <<if $acid > 0>><<set $health -= 1>><<set $acid -= 1>><<print "You've been afflicted by acid!\n">><</if>>OXYGEN: <<print '<div class = "hpback" id = "o2whole"><div class = "hpbar" id = "o2bar"><div class = "hptext">$o2/$maxO2</div></div></div>'>> <<if $o2Leak > 0>><<set $o2 -= 1>><<set $o2Leak -= 1>><<print "Your oxygen tank is punctured!\n">><</if>> HEADING: <<button N>>_func1[0]<</button>> <<button W>>_func1[1]<</button>><button id="buttonBlank">O</button><<button E>>_func1[2]<</button>> <<button S>>_func1[3]<</button>> RADAR: Sample Coords: <<print $nextSamp[0]>> Current Coords: <<print "N"+_dirSign[0]+ Math.abs($dir[0])+"E"+_dirSign[1] +Math.abs($dir[1])>> ARMAMENTS: Harpoons: L$harpoon[0]UL$harpoon[1] Combat Efficiency: %<<print Math.trunc($dmgMult*100)>> <<nobr>> <<if Math.trunc(random(1,7)/7) and !tags().includes("Functional") and !tags().includes("Bane")>><<goto BattleInit>><</if>> <<print "<script>document.getElementById('o2bar').style.width ="+($o2*170/$maxO2)+"+'px'</script>">> <<print "<script>document.getElementById('hpbar').style.width ="+($health*170/$maxHealth)+"+'px'</script>">> <<if $o2 <= 30>> <<print "<script>document.getElementById('o2whole').style.setProperty('--hpcolor', '#c7513e')</script>">> <<print "<script>document.getElementById('o2bar').style.setProperty('--hptextcolor', '#FFFB87')</script>">> <</if>> <<if $health <= 30>> <<print "<script>document.getElementById('hpwhole').style.setProperty('--hpcolor', '#c7513e')</script>">> <<print "<script>document.getElementById('hpbar').style.setProperty('--hptextcolor', '#FFFB87')</script>">> <</if>> <<if $o2 == $maxO2>> <<print "<script>document.getElementById('o2whole').style.setProperty('--hpcolor', '#FFFB87')</script>">> <<print "<script>document.getElementById('o2whole').style.setProperty('box-shadow', '-1px -1px 5px #c7513e, 1px 1px 5px #c7513e, 0px 0px 5px #c7513e')</script>">> <</if>> <<if $health == $maxHealth>> <<print "<script>document.getElementById('hpwhole').style.setProperty('--hpcolor', '#FFFB87')</script>">> <<print "<script>document.getElementById('hpwhole').style.setProperty('box-shadow', '-1px -1px 5px #c7513e, 1px 1px 5px #c7513e, 0px 0px 5px #c7513e')</script>">> <</if>> <<if $o2 <= 0>><<goto 'O2 Death'>><</if>> <<if $health <= 0>><<goto 'Hull Death'>><</if>> <<if $relic != ''>><<set $relic -= 1>> <<if $relic <= 0>><<set $o2 = 0>><</if>><</if>> <</nobr>><</if>> <<if $relic != ''>>Something is eating away at you...<</if>>

<<set _text = ["The oxygen pipeline stretches upward untill its visage is lost in the black of the ocean. You're sure to resupply here. Oxygen is a commodity.", "A vein of your lifeblood. More precious then diamond, this oxygen serves to prolong your toils. You refurbish your ever dwindling stock.", "A bounty of air to breath; a gift, yours and yours alone to take. Verily you restock, and are again teathered to this mortal coil.", "You siphen more oxeygen from the pipeline. That trip to the plutonian shore is once again prevented- postponned.", "You, through drawing more breaths from the pipeline, subdue death once again- or perhaps mearly invigorate."]>><<print _text[random(0,4)]>> With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span> <<nobr>> <<set $o2 = $maxO2>> <</nobr>>

<<set _text = ["Your lights cut through the dark revealing the ocean bed and creatures bizzare but ultimately non-threatening.", "The surrounding water is a dense black and searching only yields rock and debris- useless.", "You scavange for anything of intrest but ultimately you're left empty handed- better than the blights of the ocean.", "This area: a brief solace from the woes so typical of your studies. Though, it isn't of much use aside from that.", "You're met with not but the dark expanse. Not necessarily a comfort, though it is no cause for grief either."]>><<print _text[random(0,4)]>> With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span>

You doubt your eyes at first. Its many colors fluctuate and pulsate about its flesh- it practically glows. Its eyes are uncountable and its fins- nay, wings are the same. It's beutiful as day and terrible as night. And thus, it is a shame to watch it bleed. It is a shame to watch it die. It is a shame. But, you now have a <span id = "altFormat">sample</span>.<<set $samples += 1>> With that you check your radar and set a heading. <span id = 'dirfail'></span> You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span> <<nobr>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <<set _trashed = $nextSamp.delete("N"+_dirSign[0]+ Math.abs($dir[0])+ "E"+ _dirSign[1] +Math.abs($dir[1]))>> <<set $o2 = $maxO2>> <</nobr>>

It is impossible to avert your gaze but just as impossible to see; it's much too bright for the human eye. Its boundless and all encompassing. And with its impossible vissage you collapse to the floor on your knees. It bellows and shatters glass and melts metal. It moves and colapses moutains and upturns valleys. You want to vomit- you want to scream and cry and cackle, to no avail. It fills your in an instant lungs; you cannot breath. The aching feeling in your extremities subsides and the rest of your body follows accordingly. You have your vision, but you soon lose that too. And like that you lay, [[as penance for the curiosity of man |Prelude]].<<set $health = 1>><<set $O2 = 1>><<set $samples = 0>>

In an instant you are exposed. Steel shrapnel cleaves its way past and through you. With your vessle taken, you swallow- choke the blackness of the abyss as your still living corpus is mangled by the depths of the sea. Hardly a minute subsides and you are [[dead |Prelude]].<<set $health = 1>><<set $O2 = 1>>

You're light headed. Suspicious of this you check gauge after gauge only to find the certainty that you are not but a animated cadaver. You breath fast and shallow, and you choke, and you thrash. But it is all for not. Hours pass before finally you are [[dead |Prelude]].<<set $health = 1>><<set $O2 = 1>>

<<nobr>> <<set _pDo = "">> <<set _act = 3-$reboot>> <<set _dmg = 0>> <<set _enDmg = [random(8,20),$enHp,random(23,27)][$enVariant]>> <<if $enHp <= 0>><<goto Victory>>[[Victory]]<</if>> <</nobr>><<print $feedback>><<print $variantText[$enVariant]>> <<set _enHpDis = ["The horrid thing is unscathed","The unholy creature is covered with lacerations","The wretched beast is mortally wounded"]>><<print _enHpDis[3-Math.trunc(($enHp/111)*3+1)]>>. <<set $enDo[4] = random(0,3)>><<print $enDo[$enDo[4]]>> You have <span id = "altFormat">_act</span> more actions. You've chosen to <span id = "act">do nothing</span>.<<if $reboot>> Unfortunately, after such a grievous electrocution, your apparatus needs a moment of respite; you lose an action.<<set $reboot = 0>><</if>> <<click Thrash(1)>> <<if _act > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "thrash">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<replace #altFormat>>_act<</replace>> <<set _dmg += random(17,29)>> <</if>> <</click>>: volley bludgeoning strikes at the enemy. <<click Harpoon(1)>> <<if _act > 0 and $harpoon[0] > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "harpoon">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<set $harpoon[0] -= 1>> <<replace #altFormat>>_act<</replace>> <<set _dmg += 55*(Math.min(random(0,2),1)+10*Math.trunc(random(1,7)/7))>> <<if ($enDo[4] == 2)>> <<set $enDo[4] = 3>> <</if>> <</if>> <</click>>: perchance it will instantly subdue- or perhaps you'll miss completely. <<click Reload(2)>> <<if _act-1 > 0 and $harpoon[1]-2 > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "reload">> <<replace #act>>_pDo<</replace>> <<set _act -= 2>> <<set $harpoon[0] = 3>> <<set $harpoon[1] -= 3>> <<replace #altFormat>>_act<</replace>> <</if>> <</click>>: load a fresh set of up to 3 harpoons. <<click Guard(1)>> <<if _act > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "guard">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<replace #altFormat>>_act<</replace>> <<set _enDmg -= random(12,16)>> <</if>> <</click>>: reduce the severity of any oncoming maulings. <<click Dodge(2)>> <<if _act-1 > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "dodge">> <<replace #act>>_pDo<</replace>> <<set _act -= 2>> <<replace #altFormat>>_act<</replace>> <<set _enDmg -= random(17,20)>> <<if ($enDo[4] == 1) and (random(0,4)>1)>><<set $enDo[4] = 0>><</if>> <</if>> <</click>>: might negate baneful afflictions- might simply waste your breath. <<click [[End Turn |Battle]]>> <<if _dmg > 60>> <<set $feedback = "A massacre! You teach the heinous being the concept of mortality!\n\n">> <<elseif _dmg > 30>> <<set $feedback = "Bellicose, you land blow after blow.\n\n">> <<elseif _dmg > 20>> <<set $feedback = "Your onslaught is only met with slight brusing.\n\n">> <<else>> <<set $feedback = "Whether by choice or incident, it is left unharmed...\n\n">> <</if>> <<switch $enDo[4]>> <<case 0>> <<set $enHp -= _dmg*$dmgMult>> <<set $health -= Math.max(_enDmg,0)>> <<case 1>> <<set $enHp -= _dmg*$dmgMult>> <<set $health -= Math.max(_enDmg,0)>> <<print $enDoSpecial[$enVariant]>> <<case 2>> <<if $enVariant != 1>> <<set $enHp -= _dmg*$dmgMult*random(1,3)/4>> <<else>> <<set $enHp -= _dmg*$dmgMult-random(16,25)>> <</if>> <<case 3>> <<if random(0,1) and $enVariant != 2>> <<set $enHp -= _dmg*$dmgMult*1.3>> <<elseif $enVariant != 2>> <<set $feedback = "Whether by choice or incident, it is left unharmed...\n\n">> <<else>> <<set $enHp -= _dmg*$dmgMult-random(16,25)>> <</if>> <</switch>> <</click>> <span id = 'dirfail'></span>

<<goto Battle>> <<set $feedback = "">> <<set $harpoon[1] += $harpoon[0]>> <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <<set $enVariant = Math.trunc(random(0,3)*Math.min(($samples+2)/4,1))>> <<set $enHp = [random(85,110),random(45,60),random(120,145)][$enVariant]>> <<set $variantText = ["A wretched kin of the sea charges forth. Its crimson eyes pierce the dark; they follow your every move filling you with unease. Its flesh appears out of place, as though it were once a decent, noble creature bent out of shape; 'tis but an unholy mass of claws, fins, and tentacles. It leaks tar-black bile from its gaping maw, full of teeth sharp as knives, and its scales are overgrown with drab oceanic flora. It is vile. It blocks your path and intends to maim- you see no way to avoid a struggle.", "You find your momentum ceased by a plague of water-dwelling fish- nay insects. They're especially brisk, but with surmountable difficulty, you're able to catch a glimpse of one in the swarm. Its body is not all too dissimilar to a lobster- nay, shrimp. Though its mouth is agape and filled with foul needle-like teeth, and its hue is an unsightly, ghastly gray-greenish affair. Hideous, as is what you've seen up to this point. Predictably, they're hostile, and thusly you do combat.", "Akin to the very thing you pilot, you stand before a creature of steel. It glistens in the light you cast, flaunting mechanical mastery- beauty by design. And yet, it strikes you as alien- a corruption of the natural order. The contraption, scribed with markings unfamiliar to you, incorporates geometry nary used in human constructions. Moreover, it haphazardly arcs electric current about itself and water-bound terrain. It is then no surprise to you that it contains within itself a bounty of malice, taking two swipes at you, which you narrowly dodge. Very well, if it wishes combat, then you shant refuse."]>> <<set $enDo = [ ["It draws its claws and gnashes its fangs.","It begins to retch, excreting more of the black substance onto its jowl.","It shrouds itself in the dark of the abyss.","It cowers behind mounds of its own scaley hide.",0], ["The cohort swarms your vessel- their thimble-sized jaws en masse.","You hear pitter-pattering about your oxygen tank.","How repugnant- they're spawning kin, filling their ranks.","The throng moves speratically and at a distance.",0],["It draws its claws and gnashes its fangs.","The water about it beams with bolts of electricity.","Using its armatures, it guards parts vital to its function.","The device welds its punctured chassis; it reconnects torn wires.",0] ][$enVariant]>> <<set $enDoSpecial = ["<<set $acid = random(20,23)>>","<<set $o2Leak = random(10,17)>>","<<set $reboot = 1>>"]>> <<set $reboot = 0>> [[Battle]]

You've bested the monstrosity. You watch its ire give way, replaced by naught but the endless slumber. Its corpse, beaten to a pulp, drifts solemnly to the ocean floor. -And, that is where it shall lay. <<nobr>> <<set _reward = random(0,random(1,random(2,3)))>> <<switch _reward>> <<case 1>> <<set $harpoon[1] += random(1,4)>> <<case 2>> <<if $health + 15 < $maxHealth>><<set $health += 12+random(0,3)>> <<else>><<set $health = $maxHealth>><</if>> <<case 3>> <<set $maxO2 += random(0,7)>> <</switch>> <<if Math.sign($dir[0])==-1>><<set _dirSign = ['M','']>> <<else>><<set _dirSign = ['','']>><</if>> <<if Math.sign($dir[1])==-1>><<set _dirSign[1] = 'M'>> <<else>><<set _dirSign[1] = ''>><</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <</nobr>> <<set _text = ["There is nothing of value lodged in its remains.","You retrive a few harpoons from its beaten body.","You dissect the mound of flesh and find metal alloys suitable for hull repair.","You salvage from its gore an oxygen tank."]>><<print _text[_reward]>> You <<click return>><<goto $map[_x]>><</click>> to your work.

You stumble upon a vessel. <<nobr>> <<set _reward = random(0,random(1,random(2,3)))>> <<switch _reward>> <<case 0>> <<case 1>> <<set $harpoon[1] += random(1,4)>> <<case 2>> <<if $health + 15 < $maxHealth>><<set $health += 12+random(0,3)>> <<else>><<set $health = $maxHealth>><</if>> <<case 3>> <<set $maxO2 += random(5,7)>> <</switch>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <</nobr>> <<set _text = ["There is nothing of value lodged in its remains.","You retrive a few harpoons from its beaten body.","You dissect the mound of parts and find metal alloys suitable for hull repair.","You salvage from its electronic gore an oxygen tank."]>><<print _text[_reward]>> With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span>

Your craft is swept away in a prodigiously strong current. Luckily, as you soar through the open waters, with some quick thinking, you latch onto the oxygen pipeline and subsequently <<click 'make your way down it'>> <<set $health-= random(4,8)>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <<set $dir = [0,0]>> <<goto 'O2'>> <</click>>. Unfortunately, this decisiveness is only rewarded with damage to your craft aswell as having been made the proverbial fool.

You stumble upon some creature far more threatening than what you've seen up to this point. You ready your armaments and take suitible defencive stance, but then perplexingly it does not do the same. It gestures over to a pile of neglected ship parts- then to an assortment of eletrical hardware and harpoons. It seems it would like to make a <span id = "altFormat">volitile</span> transaction. [[Combat Unit Upgrade (30 Hull)|Purchase][$bought = 'Combat Unit Upgrade']] [[Hull Upgrade (21 Hull)|Purchase][$bought = 'Hull Upgrade']] [[Oxygen Upgrade (15 Hull)|Purchase][$bought = 'Oxygen Upgrade']] [[Harpoon Bundle (+3)(9 Hull)|Purchase][$bought = 'Harpoon Bundle']] With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span><<set $currentShop = 'Pain Shop'>>

<span id = "shoptext">You decided to buy a(n) <span id = "altFormat">$bought</span>.</span> <<click 'Return to shop'>> <<switch $bought>> <<case 'Hull Upgrade'>> <<if $currentShop == "Pain Shop">> <<if $health > 21>> <<set $maxHealth += random(6,9)>> <<set $health -= 21>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; unfortunately, to pay its cost in full would cost you your life.<</replace>> <</if>> <<else>> <<if $harpoon[1]+$harpoon[0] >= 7>> <<set $maxHealth += random(4,7)>> <<set $harpoon[1] += $harpoon[0] -7>> <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; lamentably, you couldn't afford it.<</replace>> <</if>> <</if>> <<case 'Oxygen Upgrade'>> <<if $currentShop == "Pain Shop">> <<if $health > 15>> <<set $health -= 15>> <<set $maxO2 += random(15,27)>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; unfortunately, to pay its cost in full would cost you your life.<</replace>> <</if>> <<else>> <<if $harpoon[1]+$harpoon[0] >= 5>> <<set $maxO2 += random(10,22)>> <<set $harpoon[1] += $harpoon[0] -5>> <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; lamentably, you couldn't afford it.<</replace>> <</if>> <</if>> <<case 'Hull Repair'>> <<if $harpoon[1]+$harpoon[0] >= 3>> <<set $health = Math.min($health+random(9,17),$maxHealth)>> <<set $harpoon[1] += $harpoon[0] -3>> <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; lamentably, you couldn't afford it.<</replace>> <</if>> <<case 'Oxygen Replenishment'>> <<if $harpoon[1]+$harpoon[0] >= 2>> <<set $o2 = Math.min($o2+random(10,22)+5,$maxO2)>> <<set $harpoon[1] += $harpoon[0] -2>> <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; lamentably, you couldn't afford it.<</replace>> <</if>> <<case 'Harpoon Bundle'>> <<if $health > 9>> <<set $harpoon[1] += 3>> <<set $health -= 9>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; unfortunately, to pay its cost in full would cost you your life.<</replace>> <</if>> <<case 'Combat Unit Upgrade'>> <<if $health > 30>> <<set $dmgMult += random(10,17)/100>> <<set $health -= 30>> <<else>> <<replace #shoptext>>You aspired to buy a(n) <span id = "altFormat">$bought</span>; unfortunately, to pay its cost in full would cost you your life.<</replace>> <</if>> <</switch>> <<goto $currentShop>> <</click>>

Its many colors fluctuate and pulsate about its flesh- it practically glows. Its eyes are uncountable and its fins- nay, wings are the same. It's beautiful and docile. But something about it is terribly wrong. A creature so clearly of the same genome but it eminates existential threat. Perhaps your fears are unfounded... [[Try for a sample?]] Or maybe it's better that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect.

Along your trek, you come to an underwater volcano. The updraft about this place is briming with potency; your barometer measures at at least <span id = "altFormat">10</span> atmospheres less. Worse yet your mechanical limbs are losing grip. But, there is something here- something of use- you can see it... You could <<click 'court the strong winds'>> <<switch Math.min(random(0,3),2)>> <<case 0>> <<goto 'Damage Up'>> <<case 1>> <<goto 'Health Up'>> <<case 2>> <<goto 'Strong Current'>> <</switch>> <</click>>. Or perhaps simply check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect.

You come across a mire of dark black muck. It oozes and bubbles- it's most certainly hostile to what becomes ensnared in its grasp. But, something faintly glistens in its body. Do you dare brave the hazard? [[Test fate]] [[Leave it to its own devices]] <<nobr>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <</nobr>>

You find the necessary equipment to upgrade your vessel's constitution. And so, it is done. To your chagrin, in upgrading your hull the means to do so meet material failure. Still, better than nothing. With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span> <<nobr>> <<set $maxHealth += random(2,4)>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <</nobr>>

You stumble upon some creature not unlike any you've seen up to this point. You ready your armaments and take suitible offencive stance, but then perplexingly it does not do the same. It gestures over to a pile of harpoons- then to some metal working equipment and a pile of goods. It seems it would like to make a transaction. [[Hull Upgrade (7)|Purchase][$bought = 'Hull Upgrade']] [[Oxygen Upgrade (5)|Purchase][$bought = 'Oxygen Upgrade']] [[Hull Repair (3)|Purchase][$bought = 'Hull Repair']] [[Oxygen Replenishment (2)|Purchase][$bought = 'Oxygen Replenishment']] With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span><<set $currentShop = 'Shop'>>

<<goto AltBattle>> <<set $enHp = random(410,540)>> <<set $feedback = "">> <<set $harpoon = [3,$harpoon[1]-(3-$harpoon[0])]>> [[AltBattle]]

<<if $fallchoice>>The worst of it is felt by the forelimbs of the craft. The grasping claw of your vessle is meant only for picking up unweighty light weaponry and scientific articles, not 2 tonne watercrafts. In spite of the damage, it was better than the alternative. You [[climb |Nothing]] the rest of the way out of the crevasse. <<else>>The harpoon is bent and mangled rendering it ultimately unusable, but your craft- left without harm. A massive success- of course, this would be cause to remind oneself to watch for pitfalls in the future. You [[climb |Nothing]] the rest of the way out of the crevasse. <<set $harpoon[0] = Math.min($harpoon[1],3)>> <<set $harpoon[1] = Math.max($harpoon[1]-$harpoon[0],0)>> <</if>>

You find the necessary equipment to upgrade your instruments of war. And so, it is done. To your chagrin, in upgrading the armarments the means to do so meet material failure. Still, better than nothing. With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span> <<nobr>> <<set $dmgMult += random(10,17)/100>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <</nobr>>

You come to a vast field of columns and structures, all of preiceios stone- verily, works of man or something akin. Who could have built all this? You find no revelations here, only a stone carving sat upon a plinth enshrined in this cloister. It radiates a long forgotten <span id = "altFormat">maleficence</span>- you feel it in the pit of your stomach. [[Take it? |Lore2]] Or maybe it's better that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span>

You encroach, and your instincts tug harder at the back of your mind- they plead that you cease. Perhaps it ought to be better if you aired more on the side of caution. [[Nay, you must continue.|Lore3]] It's never too late to check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span>

Though the murk of the deep, you stumble forth; you take notice of the brink just as you cross it. You begin to fall down a chasm. Instinctive to its circuitry your metallic shell flares alarms and red lights. You, with so much haste your limbs are but a blur, reorient the vessle to make the current predicament more workable. You considerer the velocities acting on you and come to realize the ultimatum that stands before you: <<if $harpoon[1]+$harpoon[0] != 0>>[[Stall your descent with a harpoon|Crevasse Succeed][$harpoon[1]+=$harpoon[0]-1]] <</if>><<click "Grapple at the wall with not but the machines limbs">> <<set $fallchoice = 1>> <<set $dmgMult -= random(3,5)/100>> <<if random(0,99)<65>> <<goto "Crevasse Succeed">> <<else>> <<set $health-=random(10,23)>> <<goto Fall>> <</if>> <</click>> [[Brace for the inevitable |Fall][$health-=random(10,23)]] <<nobr>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <<set $fallchoice = 0>> <</nobr>>

In an instant after the relic is disturbed, the temple gives way; fragments of gold and silver come crashing down about you. You make haste and egress with your stolen goods. Though just looking at that which you've retrieved sturs within you a bout of sickness. You're made unwell... With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span> <<nobr>> <<set $relic = 100>> <<set _x= $nextSamp.last()>> <<set $map[_x]= 'False Sample'>> <<if Math.sign($dir[0])==-1>> <<set _dirSign = ['M','']>> <<else>> <<set _dirSign = ['','']>> <</if>> <<if Math.sign($dir[1])==-1>> <<set _dirSign[1] = 'M'>> <<else>> <<set _dirSign[1] = ''>> <</if>> <<set _x= 'a'+_dirSign[0]+Math.abs($dir[0])+'b'+_dirSign[1] +Math.abs($dir[1])>> <<set $map[_x]= 'Nothing'>> <</nobr>>

Unable to ceice your momentum plumet to the bottom of this crevasse. Metal is twisted and shreaded, but you are spared life. Degected from your failings, you [[climb |Nothing]] your way to where you once were...

You decide it's better not to court danger. Verily, when one is in such a place as this- with high capasity for danger. With that you check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect. <span id = 'dirfail'></span>

You decide to try your luck at retrieving the goods withheld in the substance. <<switch Math.min(random(0,5),4)>> <<case 4>>Ungraceful, you fall into the mire's clutches. Upon doing so you find revelations that what ever had been seen was not more than a trick of light. And thus you leave- [[empty handed |Nothing]]. <<set $acid = random(20,23)>> <<case 3>>In attempting to fish out what ever may lie within it you fall in and subsequently retreat- though you do leave with [[boons |Health Up]] in grip. <<set $acid = random(20,23)>> <<case 2>>In attempting to fish out what ever may lie within it you fall in and subsiquently retreat- though you do leave with [[boons |Damage Up]] in grip. <<set $acid = random(20,23)>> <<case 1>>And, you needn't have been concerned! You leave untainted and with [[treasures |Health Up]] in hand. <<case 0>>And, you needn't have been concerned! You leave untainted and with [[treasures |Damage Up]] in hand. <</switch>>

You make your approach but you are slugish- hesitant. It may not be of any harm now but if you so tempt it... [[With certainty try for a sample.]] It's never too late to check your radar and set a heading. You still have <span id = "altFormat"><<print 4-$samples>> sample<<if 4-$samples !=1>>s<</if>></span> to collect.

Just as you attept to sever its mortality it <span id = "altFormat">shifts</span> and <span id = "altFormat">churns</span>. The horror. Its intent is clear and it aims to maim. You must [[do battle |AltBattleInit]] with it if only to leave with a sliver of your life.

<<nobr>> <<set _pDo = "">> <<set _act = 3>> <<set _dmg = 0>> <<set _enDmg = random(8,20)*2>> <<if $enHp <= 0>><<goto AltVictory>>[[AltVictory]]<</if>> <</nobr>><<print $feedback>>A hellish being so disconected from this reality and the next. You're unsure of where it ends and where it begins... <<set _enHpDis = ["The horrid thing is unscathed","The unholy creature is covered with lacerations","The wretched beast is mortally wounded"]>><<print _enHpDis[3-Math.trunc(($enHp/541)*3+1)]>>. <<set _enDo =["It draws its claws and gnashes its fangs.","It moves through your mind bleeding your thoughts dry.","It begins to retch, excreting more of the black substance onto its jowl.","It shrouds itself in the dark of the abyss.","It tends to its wounds.", random(0,4)]>><<print _enDo[_enDo[5]]>> You have <span id = "altFormat">_act</span> more actions. You've chosen to <span id = "act">do nothing</span>. <<click Thrash(1)>> <<if _act > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "thrash">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<replace #altFormat>>_act<</replace>> <<set _dmg += random(17,29)>> <</if>> <</click>>: volley bludgeoning strikes at the enemy. <<click Harpoon(1)>> <<if _act > 0 and $harpoon[0] > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "harpoon">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<set $harpoon[0] -= 1>> <<replace #altFormat>>_act<</replace>> <<set _dmg += 55*(Math.min(random(0,2),1)+10*Math.trunc(random(1,7)/7))>> <</if>> <</click>>: perchance it will instantly subdue, or perhaps you'll miss completely. <<click Reload(2)>> <<if _act-1 > 0 and $harpoon[1]-2 > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "reload">> <<replace #act>>_pDo<</replace>> <<set _act -= 2>> <<set $harpoon[0] = 3>> <<set $harpoon[1] -= 3>> <<replace #altFormat>>_act<</replace>> <</if>> <</click>>: load a fresh set of up to 3 harpoons. <<click Guard(1)>> <<if _act > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "guard">> <<replace #act>>_pDo<</replace>> <<set _act -= 1>> <<replace #altFormat>>_act<</replace>> <<set _enDmg -= random(8,12)>> <</if>> <</click>>: reduce the severity of any oncoming maulings. <<click Dodge(2)>> <<if _act-1 > 0>> <<if _pDo != "">><<set _pDo += "; ">><</if>> <<set _pDo += "dodge">> <<replace #act>>_pDo<</replace>> <<set _act -= 2>> <<replace #altFormat>>_act<</replace>> <<set _enDmg -= random(11,20)>> <<if (_enDo[4] == 1 or _enDo[4] == 2) and (random(0,4)>1)>> <<set _enDo[4] = 0>> <</if>> <</if>> <</click>>: might negate baneful afflictions- might simply waste your breath. <<click [[End Turn |AltBattle]]>> <<if _dmg > 60>> <<set $feedback = "A massacre! You teach the heinous being the concept of mortality!\n\n">> <<elseif _dmg > 30>> <<set $feedback = "Bellicose, you land blow after blow.\n\n">> <<elseif _dmg > 20>> <<set $feedback = "Your onslaught is only met with slight brusing.\n\n">> <<else>> <<set $feedback = "Whether by choice or incident, it is left unharmed...\n\n">> <</if>> <<switch _enDo[4]>> <<case 0>> <<set $enHp -= _dmg*$dmgMult>> <<set $health -= Math.max(_enDmg,0)>> <<case 1>> <<set _$dmgMult -= random(3,6)/100>> <<set $enHp -= _dmg*$dmgMult>> <<set $health -= Math.max(_enDmg,0)>> <<case 2>> <<set $enHp -= _dmg*$dmgMult>> <<set $health -= Math.max(_enDmg,0)>> <<set $acid = random(20,23)>> <<case 3>> <<if Math.max(random(-1,1),0)>> <<set $enHp -= _dmg*$dmgMult>> <<case 3>> <<set $enHp -= _dmg*$dmgMult* Math.min(Math.max(random(-24,75),0),1) +_enDmg>> <<else>> <<set $feedback = "Whether by choice or incident, it is left unharmed...\n\n">> <</if>> <</switch>> <</click>> <span id = 'dirfail'></span>

Steadfast yet with varying composure, you exhale true relief. You've bested the monstrosity. You watch its ire give way, replaced by naught but the endless slumber. Its corpse, beaten to a pulp, drifts solemnly to the ocean floor. And, that is where it shall lay. To haunt- to terrorize- to be nevermore. And from its corpus you retrive the last of the <span id = "altFormat">samples</span> you need. And with this, feeling no need to reprise this drudgery, you [[ritire |Prelude]].

!<span id = "altFormat">Barometer Red</span> This is a procidurally generated, cosmic-horror, dark-scifi, text adventure game. Fittingly for horror genre, this game has some unsightly depictions of monsters and may make those with thalassophobia (fear of the ocean) uncomfortable. Play at your own discretion. Care to [[begin |Intro]]? <<nobr>> <<set $relic = ''>> <<set $acid = 0>> <<set $o2Leak = 0>> <<set $harpoon = [3,3]>> <<set $health = 93+random(-5,5)>> <<set $dmgMult = 1>> <<set $maxHealth = 100>> <<set $o2 = 100>> <<set $dir = [0,0]>> <<set $maxO2 = 100>> <<set $samples = 0>> <<set $nextSamp = [0,0,0,0]>> <<set _setter = "<<set $map = {">> <<set _prev = "00,">> <<for _i = 0; _i < 4; _i++>> <<set _new = [0,0]>> <<for _x = 0; _x < 15+random(0,2); _x++>> <<if _x != 0>> <<switch Math.max(random(0,20),10)>> <<case 10>> <<set _setter += "'Nothing', ">> <<case 11>> <<set _setter += "'Item', ">> <<case 12>> <<set _setter += "'Item', ">> <<case 13>> <<set _setter += "'Strong Current', ">> <<case 14>> <<set _setter += "'Lore1', ">> <<case 15>> <<set _setter += "'Pain Shop', ">> <<case 16>> <<set _setter += "'Shop', ">> <<case 17>> <<set _setter += "'Acid', ">> <<case 18>> <<set _setter += "'Crevasse', ">> <<case 19>> <<set _setter += "'Health Up', ">> <<case 20>> <<set _setter += "'Damage Up', ">> <</switch>> <</if>> <<set _add = [0,0]>> <<set _loopIterations = 0>> <<set _loopmod = random(0,3)>> <<for _prev.includes((_new[0]+_add[0])+((_new[1]+_add[1])+','))>> <<switch (_loopIterations+_loopmod)%4>> <<case 0>> <<set _add = [0,1+Math.trunc(_loopIterations/4)]>> <<case 1>> <<set _add = [1+Math.trunc(_loopIterations/4),0]>> <<case 2>> <<set _add = [0,-(1+Math.trunc(_loopIterations/4))]>> <<case 3>> <<set _add = [-(1+Math.trunc(_loopIterations/4)),0]>> <</switch>> <<set _loopIterations += 1>> <</for>> <<set _new = [_new[0]+_add[0],_new[1]+_add[1]]>> <<set _prev += _new[0]+(_new[1]+',')>> <<if Math.sign(_new[0])==-1>><<set _newSign = ['M','']>> <<else>><<set _newSign = ['','']>><</if>> <<if Math.sign(_new[1])==-1>><<set _newSign[1] = 'M'>> <<else>><<set _newSign[1] = ''>><</if>> <<set _setter += "a"+_newSign[0]+Math.abs(_new[0])+"b"+_newSign[1]+Math.abs(_new[1])+":">> <</for>> <<set _setter += "'Sample', ">> <<set $nextSamp[_i] = "N"+_newSign[0]+Math.abs(_new[0])+"E"+_newSign[1]+Math.abs(_new[1])>> <</for>> <<set _setter += "a0b0:'O2'}>>">> _setter <</nobr>>