boabab syntax scribble

river.rkt

(def-str form "")

(scene river-bank
  (title "Your birthplace on the river")
  (initial-desc
    "Wetness and cold.  
     The sweet taste of mud fills your nose and coats your teeth. 
     You are a:")
  (link "forbidden hybrid of human and toad"
    (set! form "half-toad")
    (set-scene! underwater))
  (link "withered husk of a forgoton idol"
    (set! form "idol-mummy")
    (set-scene! underwater)))
    
(scene underwater
    (title "Under the rivers surface")
  (initial-desc
    (b/cond 
    (= form "half-toad")
    "You settle down, at home in the chilly dark depths."
    (= form "idol-mummy")
    "The water slowly seeps into your dried flesh, awakening the tendons and coercing your memories to life.)))"