joningold

The post-it note on the computer reads "Spring, 1922".

-> hub 

=== hub 
    ~ temp allFiles = LIST_ALL(Files) 
- (loop)    
    ~ temp file = pop(allFiles) // pop is an ink function from the "Ink" menu
    { Files ? file:  // have you seen it? let's list the ones we've found. 

joningold

/* "Storylet" implementation. 

    Based on https://github.com/smwhr/ink-storylets/tree/main by smwhr. 
    
    This allows you to create content as "storylets" - little chunks / scenes, which are gated by preconditions. The game offers a choice of which one the player can look at, by picking the top N that are available now. 
    
    The machinery is fairly light, and the data is kept "with" the story content, so its easy to use as an extendable template. 
    
*/

joningold

LIST Fruit = Apple, Banana, Orange, Lemon 
VAR fruitSaladIndex = 0 
- (top)
*   [add apple ] 
    ~ addToSalad(Apple)
    * [ add banana  ] 
    ~ addToSalad(Banana)
*   [ add orange ] 
    ~ addToSalad(Orange)

joningold

  
  
LIST Entrants = PabloPicasso, VanGogh, LucyPhillipsAged11

~ temp place = 3 
- (loop)
    { stopping:
    -    "Third place in the art competition goes to..." 
    -    "Second place goes to..."
    -   "And so the winner is..." 

joningold

#story: Swindlestones
#author: Jon Ingold

// Play this example online: https://7zjr87zk.play.borogove.io/

LIST Dice = 
    MeA1 = 11, MeA2, MeA3, MeA4,
    MeB1 = 21, MeB2, MeB3, MeB4,
    MeC1 = 31, MeC2, MeC3, MeC4,
    MeD1 = 41, MeD2, MeD3, MeD4,

joningold

EXTERNAL tunnelDepth() 
=== function tunnelDepth() 
    // Tunnel Depth not supported in inky!
    ~ return 1

=== tunnelOut(-> thenGoTo) 
    { tunnelDepth() > 1:
        // Tunnelling out! 
        ->-> tunnelOut(thenGoTo)
    }

joningold

~ relate(Key, MadeOf, Copper)
~ relate((Padlock, Spear), MadeOf, Iron) 
~ relate(GoldCoin, MadeOf, Gold)

VAR Inventory = () 

- (top) 

joningold

~ temp charA = RANDOM(1, 10000)
~ temp charB = RANDOM(1, 10000)
{characterName(charA)} and {characterName(charB)} walk into a bar. {characterName(charA)} is feeling {~ worried|happy}.

=== function characterName(nameSeed)
    {firstNameByIndex(nameSeed / 100)} {secondNameByIndex(nameSeed % 100)}

joningold

LIST PossibleFruits = Apple, Banana, Satsuma, Melon, Pear 

- (anotherquiz)

One fruit in the fruit-bowl is fake. Can you guess which one?

~ temp correctAnswer = LIST_RANDOM(LIST_ALL(PossibleFruits)) 

- (anothergo)
~ temp timesLooped = 0

joningold

Include list_descriptions.ink

LIST QualityAdjectives = awful = -3, bad = -1, ambivalent = 0, nice = 1, great = 3, amazing = 7 
LIST InterpersonalAdjectives = excruciating = -3, dull = -1, fine = 0, interesting = 1, intriguing = 3, charming = 7 


- (swipeRight) 
    ~ temp food = RANDOM(-5, 4)
    ~ temp company = RANDOM(-2, 9)
    ~ temp dateScore = food + company