Emi
/
ouppy
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare commits

base: Emi:3d8637dc318789866c748a167cadcf633bd8da2b
Branches Tags
Emi:main
...
compare: Emi:e217089bca9eff6f3bd9f186f1a1f3ae22e5b3c1
Branches Tags
Emi:main

2 Commits
3d8637dc31 ... e217089bca

Author SHA1 Message Date
Emi Simpson e217089bca
Set page language 2023-05-22 15:46:33 -04:00
Emi Simpson deeea00f5e
Add an easter egg for queer-platonic kitties and wuppie 2023-05-22 15:46:13 -04:00
2 changed files with 4 additions and 2 deletions
Show Stats Expand all files Collapse all files

4
src/Main.elm
View File

@ -3,6 +3,7 @@ module Main exposing (main)
import Browser import Browser
import Random import Random
import Html exposing (Html, button, div, p, text) import Html exposing (Html, button, div, p, text)
import Html.Attributes exposing (disabled, hidden)
import Html.Events exposing (onClick) import Html.Events exposing (onClick)
import GenderFriends exposing (altBlumBlumShub, getPolygenderWithLength, renderPolygender) import GenderFriends exposing (altBlumBlumShub, getPolygenderWithLength, renderPolygender)
@ -44,7 +45,7 @@ viewStr model = case model of
Ready seed regenCount -> Ready seed regenCount ->
let let
(gender, newSeed) = getPolygenderWithLength regenCount seed (gender, newSeed) = getPolygenderWithLength regenCount seed
genderStr = renderPolygender gender genderStr = if regenCount == 75 then "queer platonic partners" else renderPolygender gender
in "do u think a wuppie and a kitties could be " ++ genderStr ++ ",,?" in "do u think a wuppie and a kitties could be " ++ genderStr ++ ",,?"
view : Model -> Html Msg view : Model -> Html Msg
@ -54,6 +55,7 @@ view model =
, button , button
( case model of ( case model of
AwaitingSeed -> [] AwaitingSeed -> []
Ready _ 75 -> [disabled True, hidden True]
Ready _ _ -> [onClick Regenerate] Ready _ _ -> [onClick Regenerate]
) )
[ text "make it gayer" ] [ text "make it gayer" ]

2
static/index.html
View File

@ -1,5 +1,5 @@
<!Doctype HTML> <!Doctype HTML>
<html> <html lang="en">
<head> <head>
<script src="gender.min.js"> </script> <script src="gender.min.js"> </script>
<title>do u think a wuppie and a kitties could be friends,,?</title> <title>do u think a wuppie and a kitties could be friends,,?</title>