Indie game storeFree gamesFun gamesHorror games
Game developmentAssetsComics
A jam submission

Bleach Drinking SimulatorView game page

Simulation of drinking bleach (very unpleasant)
Submitted by Duuqnd — 9 days, 21 hours before the deadline
Add to collection

Play game

Bleach Drinking Simulator's page


CriteriaRankScore*Raw Score
Creativity - How original is the idea?#103.2033.333
Entertainment - How enjoyable/replayable is it?#142.2422.333
Presentation - How does it look/feel?#171.9222.000

Ranked from 6 ratings. Score is adjusted from raw score by the median number of ratings per game in the jam.

Leave a comment

Log in with to leave a comment.



Runs fine, though the ASCII image is too tall for my terminal.

I’m not a fan of how suicide is presented in this game. Sure, you might think it’s funny or just a joke, but I really don’t appreciate it.


I'm sorry that you thought this game was about suicide. It's not.

This is a game about not giving in to peer pressure, where the computer is pressuring you into doing something dangerous (drinking bleach) and you must continue to resist. This is more obvious in the Genera version where instead of answering yes or no, you choose between the options "Drink" and "Refuse", where Refuse obviously implies that this isn't something that you have decided to do on your own. You aren't expected to ever drink the bleach. You win when you realize the game is futile and quit.


Thank you for explaining, that is certainly much better.


Runs fine with sbcl in Guix, but it doesn't really try to fit within the limitations of my terminal, which is a shame (ASCII version).

Submitted (1 edit)

I can't run the Genera version on my setup, but from reading the source it looks like you definitely used the graphics capabilities to the max!

I also don't have whatever Lisp you used for the ASCII version, so I wrote a port to Racket (uses same graphic resource as original):

(define (game-loop [score 0])
  (printf "*bleach*~n")
  (printf "Score: ~a~n" score)
  (printf "Drink it?~n")
  (if (eq? #\y (string-ref (read-line) 0))
      (printf "You died. (Score: ~a)~n" score)
      (game-loop (+ 1 score))))

I'm not sure how to rate this, because I never ran your actual game, just a port that I wrote myself. But I replayed it several times, and had to stifle giggles all the way through... So. Um. Yeah. ; - )

I think this could be the new FizzBuzz...