Localvore

Your browser lacks required capabilities. Please upgrade it or switch to another to continue.

Loading…

<<set $month to 1>> <<set setup.monthnames to ["", "January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December" ]>>

<<widget "nextmonth">><<silently>> <<if $month is 12>> <<set $month to 1>> <<else>> <<set $month to $month + 1>> <</if>> <</silently>><</widget>>

!Home (<<print setup.monthnames[$month]>>) <<set $location to "home">>\ [[Drive->Car]] | <<link "Next Month" "Home">><<nextmonth>><</link>>

!Fairweather Farm <<set $location to "fairweather">>\ <<range "$month" 4 "egg" 11>>\ <<range "$month" 4 "cool" 6 "hot" 9 "cool" 11>>\ <<range "$month" "potato" 3 6 "potato">>\ <<include "current products">> <<include "product story">> [[Drive->Car]]

!Anderson Farm <<set $location to "anderson">>\ <<include "current products">> [[Drive->Car]]

!Docks <<set $location to "docks">>\ <<range "$month" 5 "mackerel" 7 10 "mackerel">>\ <<range "$month" "shrimp" 4 12 "shrimp">>\ <<include "current products">> [[Drive->Car]]

<<set _driving to true>>\ <<cardrow `QBN.cards().sort(QBN.alphabetically)` "linkbox">>\ <<unset _driving>> <<return "Exit Car">>

<<nobr>> <<set _product to true>> <<set _products to QBN.cards()>> /% Don't forget to clear the variable, or products will show up in other card selections on the same "page". %/ <<unset _product>> <<if _products.length eq 0>> There is nothing for sale here. <<else>> There are <<cardlist _products>> for sale here. <</if>> <</nobr>>

<<set _productstory to true>>\ <<set _storycards to QBN.cards(1)>>\ <<unset _productstory>>\ <<if _storycards.length>> <<includeall _storycards>> <</if>>

ripe red strawberries

eggs from happy hens

heads of broccoli<<set _broccoli to true>>

bunches of spinach

russet potatoes

bunches of kale

A woman in her sixties stops short. "Is that //organic// broccoli? Look at that //color//! That's the most beautiful broccoli I've ever seen! I'll have to buy some for my dog; he //loves// broccoli."

A large black pickup truck parks outside and a tall, broad-shouldered man in a torn sweatshirt enters the store. "Oh good, they //do// have broccoli today. I got a lovely piece of sharp cheddar over at Anderson's and I'm craving some cream of broccoli soup."

A young couple saunters through the store. One turns to the other. "How about we make beef and broccoli tonight? We have those steak tips in the fridge that we need to use up."

pork chops

trays of ground beef

beef roasts

steaks

jugs of milk

bags of shredded mozzarella

blocks of sharp cheddar

cod fillets

mackerel

lobsters

mussels

shrimp

swordfish steaks

/* * Comma-separated lists: call with "linkto" for links instead * of contents. */ <<widget "cardlist">>\ <<includeall $args[0] `$args[1] or "content"` "comma">>\ <</widget>> /* * Rows and columns of card contents in boxes: call with "linkbox" * for links, or "coverbox" for covers. */ <<widget "cardcolumn">>@@.qbn-column; <<includeall $args[0] `$args[1] or "contentbox"`>> @@<</widget>> <<widget "cardrow">>@@.qbn-row; <<includeall $args[0] `$args[1] or "contentbox"`>> @@<</widget>> /* Comma separator (no serial comma). */ <<widget "comma">><<if $args[0]>> and <<else>>, <</if>><</widget>> /* Wrapper widgets (card contents or links, optionally boxed). */ <<widget "cover">>\ <<set _qbn_cover to true>><<includecard $args[0]>><<unset _qbn_cover>>\ <</widget>> <<widget "content">><<if `QBN.available($args[0])`>>\ <<unset _qbn_cover>><<includecard $args[0]>><<removecard $args[0] false>>\ <</if>><</widget>> <<widget "linkto">><<print '[\[' + $args[0] + ']]'>><</widget>> <<widget "coverbox">>@@.qbn-card; <<cover $args[0]>> @@<</widget>> <<widget "contentbox">>@@.qbn-card; <<content $args[0]>> @@<</widget>> <<widget "linkbox">>@@.qbn-card; <<linkto $args[0]>> @@<</widget>> /* Conditional Links */ <<widget "linkif">>\ <<if $args[0]>><<= '[\['+($args[2] or $args[1])+'->'+$args[1]+']]'>>\ <<else>>@@.qbn-nolink;<<= $args[2] or $args[1]>>@@<</if>>\ <</widget>> <<widget "linkcontents">><<linkif `QBN.available($args[1] or QBN.current)` `$args[1] or QBN.current` $args[0]>><</widget>> /* Choice helpers */ <<widget "skillcheck">>\ <<set _qbnsuccess to $args[0].check($args[1])>>\ <</widget>> <<widget "gotoresult">>\ <<if _qbnsuccess>><<set $args[0] to $args[0] + ' ' + Success>><</if>>\ <<if State.random() < 0.20 and Story.get('Rare ' + $args[0])>>\ <<set $args[0] to 'Rare ' + $args[0]>>\ <</if>>\ <<unset _qbnsuccess>><<removecard _qbncurrent false>><<goto $args[0]>>\ <</widget>>