jadedctrl/ flora-search-aurora
1
0
Disbranĉigi 0
Fontkodo Issues Tirpetoj Eldonoj 1 Activity

Prefix SAY, MUMBLE, & FACE with 💬 

Why? Because it looks fun, dammit
This commit is contained in:
Jaidyn Ann 2023-07-13 23:58:15 -05:00
parent 8e9e279d9e
commit 460748bfb4
1 changed files with 442 additions and 442 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

424
flora-search-aurora.lisp
View File

@ -43,15 +43,15 @@ of a new item. The attributes set for the entity item should be:
REACTION-TALKING REACTION-TALKING
All are optional, save ID." All are optional, save ID."
(start-dialogue (start-dialogue
(face 'player (or (getf item-plist :reaction-face) "^_^") (💬:face 'player (or (getf item-plist :reaction-face) "^_^")
(or (getf item-plist :reaction-talking) "^o^")) (or (getf item-plist :reaction-talking) "^o^"))
(mumble 'player :en (format nil "(Hey, it's a ~A! ~A!)" (💬:mumble 'player :en (format nil "(Hey, it's a ~A! ~A!)"
(or (getf item-plist :name-en) (getf item-plist :id)) (or (getf item-plist :name-en) (getf item-plist :id))
(or (getf item-plist :remark-en) "Nice!")) (or (getf item-plist :remark-en) "Nice!"))
:eo (format nil "(Ho, jen ~A! ~A)" :eo (format nil "(Ho, jen ~A! ~A)"
(or (getf item-plist :name-eo) (getf item-plist :id)) (or (getf item-plist :name-eo) (getf item-plist :id))
(or (getf item-plist :remark-eo) "Interese!"))) (or (getf item-plist :remark-eo) "Interese!")))
(mumble 'player :en (if (getf item-plist :desc-en) (💬:mumble 'player :en (if (getf item-plist :desc-en)
(format nil "~A" (getf item-plist :desc-en)) (format nil "~A" (getf item-plist :desc-en))
"(I'm glad I found it.)") "(I'm glad I found it.)")
:eo (if (getf item-plist :desc-eo) :eo (if (getf item-plist :desc-eo)
@ -78,7 +78,7 @@ properties of an entity (editable from Tiled)."
(apply #'start-dialogue (apply #'start-dialogue
(loop for en-line in (str:lines (getf item-plist :desc-en)) (loop for en-line in (str:lines (getf item-plist :desc-en))
for eo-line in (str:lines (getf item-plist :desc-eo)) for eo-line in (str:lines (getf item-plist :desc-eo))
collect (mumble 'player :en en-line :eo eo-line)))))) collect (💬:mumble 'player :en en-line :eo eo-line))))))
(defun monologue-interact (map interactee-id) (defun monologue-interact (map interactee-id)
@ -91,7 +91,7 @@ interactee — that is, they say the dialogue defined in the interactee’s
(apply #'start-dialogue (apply #'start-dialogue
(loop for en-line in (str:lines (getf item-plist :speech-en)) (loop for en-line in (str:lines (getf item-plist :speech-en))
for eo-line in (str:lines (getf item-plist :speech-eo)) for eo-line in (str:lines (getf item-plist :speech-eo))
collect (say interactee-id :en en-line :eo eo-line)))))) collect (💬:say interactee-id :en en-line :eo eo-line))))))
(defun random-monologue-interact (map interactee-id) (defun random-monologue-interact (map interactee-id)
@ -104,7 +104,7 @@ dialogue, among which one will be selected randomly."
(eo-line (alexandria:random-elt (str:lines (getf item-plist :speech-eo)))) (eo-line (alexandria:random-elt (str:lines (getf item-plist :speech-eo))))
(en-line (alexandria:random-elt (str:lines (getf item-plist :speech-en))))) (en-line (alexandria:random-elt (str:lines (getf item-plist :speech-en)))))
(make-dialogue-state (make-dialogue-state
map (start-dialogue (say interactee-id :en en-line :eo eo-line))))) map (start-dialogue (💬:say interactee-id :en en-line :eo eo-line)))))
(defun move-trigger (map trigger-plist) (defun move-trigger (map trigger-plist)
@ -119,7 +119,7 @@ Useful for making barriers the player character refuses to traverse."
(append (append
(loop for en-line in (str:lines (getf trigger-plist :desc-en)) (loop for en-line in (str:lines (getf trigger-plist :desc-en))
for eo-line in (str:lines (getf trigger-plist :desc-eo)) for eo-line in (str:lines (getf trigger-plist :desc-eo))
collect (mumble 'player :en en-line :eo eo-line)) collect (💬:mumble 'player :en en-line :eo eo-line))
(list (move 'player (list :Δx (getf trigger-plist :Δx) (list (move 'player (list :Δx (getf trigger-plist :Δx)
:Δy (getf trigger-plist :Δy) :Δy (getf trigger-plist :Δy)
:x (getf trigger-plist :x) :x (getf trigger-plist :x)
@ -165,7 +165,7 @@ messages embedded in the Tiled map data."
(apply #'start-dialogue (apply #'start-dialogue
(loop for eo-line in eo-lines (loop for eo-line in eo-lines
for en-line in en-lines for en-line in en-lines
collect (say entity :en en-line :eo eo-line)))))) collect (💬:say entity :en en-line :eo eo-line))))))
(defun to-person-use (&optional map item-plist) (defun to-person-use (&optional map item-plist)
@ -183,7 +183,7 @@ run the :USE function of the nearest entity, if it has any."
(list :drop 1) (list :drop 1)
(make-dialogue-state (make-dialogue-state
map map
(start-dialogue (mumble 'player :en "(They don't seem to want it.)" (start-dialogue (💬:mumble 'player :en "(They don't seem to want it.)"
:eo "(Ĝi verŝajne ne volas tion.)"))))))) :eo "(Ĝi verŝajne ne volas tion.)")))))))
@ -196,12 +196,12 @@ run the :USE function of the nearest entity, if it has any."
(make-dialogue-state (make-dialogue-state
map map
(start-dialogue (start-dialogue
(face 'player "` `" "`o`") (💬:face 'player "` `" "`o`")
(mumble 'player :eo "(Al ĉi tiu fenesto tute mankas vitro!)" (💬:mumble 'player :eo "(Al ĉi tiu fenesto tute mankas vitro!)"
:en "(This window's got no pane at all!)") :en "(This window's got no pane at all!)")
(mumble 'player :eo "(Mi kredeble povus grimpi tien, fakte...)" (💬:mumble 'player :eo "(Mi kredeble povus grimpi tien, fakte...)"
:en "(I could probably fit my way in there, actually...)") :en "(I could probably fit my way in there, actually...)")
(mumble 'player :eo "(... sed ĉu vere farindas?)" (💬:mumble 'player :eo "(... sed ĉu vere farindas?)"
:en "(... but should I?)" :en "(... but should I?)"
:face "`o`")))) :face "`o`"))))
@ -214,43 +214,43 @@ run the :USE function of the nearest entity, if it has any."
(case (…:incf-0 (getf-act map :kvincent-greetings)) (case (…:incf-0 (getf-act map :kvincent-greetings))
(0 (0
(start-dialogue (start-dialogue
(face 'kvincent "@__@" ">OO<") (💬:face 'kvincent "@__@" ">OO<")
(face 'player ":w:" ":o:") (💬:face 'player ":w:" ":o:")
(say 'kvincent :eo "AIIII! Ve! Ve! Diablo! Jen diablo!" (💬:say 'kvincent :eo "AIIII! Ve! Ve! Diablo! Jen diablo!"
:en "AIIII! Woe is me! The Devil has come!") :en "AIIII! Woe is me! The Devil has come!")
(say 'player :eo "Kvincent, Kvincent! Trankviliĝu, trankviliĝu! Estas mi!" (💬:say 'player :eo "Kvincent, Kvincent! Trankviliĝu, trankviliĝu! Estas mi!"
:en "Kvincent, Kvincent! Calm down, it's just me!") :en "Kvincent, Kvincent! Calm down, it's just me!")
(say 'kvincent :eo "... bedaŭron?" (💬:say 'kvincent :eo "... bedaŭron?"
:en "... pardon?") :en "... pardon?")
(face 'kvincent "@w@" "@o@") (💬:face 'kvincent "@w@" "@o@")
(say 'kvincent :eo "Hooo, vi tute ne estas diablo! Vi estas nura homo!" (💬:say 'kvincent :eo "Hooo, vi tute ne estas diablo! Vi estas nura homo!"
:en "Ooooh, you're not the Devil! You're just a person!" :en "Ooooh, you're not the Devil! You're just a person!"
:face "@v@") :face "@v@")
(say 'player :eo "Kompreneble!" (💬:say 'player :eo "Kompreneble!"
:en "Obviously not!"))) :en "Obviously not!")))
(otherwise (otherwise
(start-dialogue (start-dialogue
(face 'player "=w='" "=o='") (💬:face 'player "=w='" "=o='")
(face 'kvincent "@__@" ">OO<") (💬:face 'kvincent "@__@" ">OO<")
(say 'kvincent :eo "AJJJJ! Ve! Ve! Dia..." (💬:say 'kvincent :eo "AJJJJ! Ve! Ve! Dia..."
:en "AIIII! Woe is me! Dev...") :en "AIIII! Woe is me! Dev...")
(say 'player :eo "Mi ankoraŭ ne estas diablo!!" (💬:say 'player :eo "Mi ankoraŭ ne estas diablo!!"
:en "I'm still no demon!!") :en "I'm still no demon!!")
(face 'kvincent "@w@" "@o@") (💬:face 'kvincent "@w@" "@o@")
(say 'kvincent :eo "Ha, jes. Pardonu." (💬:say 'kvincent :eo "Ha, jes. Pardonu."
:en "Oh, right. Sorry."))))) :en "Oh, right. Sorry.")))))
(defun kvincent-dialogue (map) (defun kvincent-dialogue (map)
(append (kvincent-greetings map) (append (kvincent-greetings map)
(start-dialogue (start-dialogue
(face 'player "` `" "`o`") (💬:face 'player "` `" "`o`")
(say 'player :eo "Ĉu ĉio enordas, Kvincent?" (💬:say 'player :eo "Ĉu ĉio enordas, Kvincent?"
:en "Everything alright, Kvincent?") :en "Everything alright, Kvincent?")
(say 'kvincent :eo "Mi apenaŭ trovas fungojn, hodiaŭ... la dioj malbenis min!" (💬:say 'kvincent :eo "Mi apenaŭ trovas fungojn, hodiaŭ... la dioj malbenis min!"
:en "I'm hardly finding any mushrooms... I've been cursed!") :en "I'm hardly finding any mushrooms... I've been cursed!")
(say 'player :eo "Nek mi povas trovi florojn! Kia malfacila tago." (💬:say 'player :eo "Nek mi povas trovi florojn! Kia malfacila tago."
:en "I can't find any flowers, either! Today sucks." :en "I can't find any flowers, either! Today sucks."
:face "vov\'")))) :face "vov\'"))))
@ -277,33 +277,33 @@ run the :USE function of the nearest entity, if it has any."
:en "How's your trainwreck of a life?"))) :en "How's your trainwreck of a life?")))
(1 (1
(start-dialogue (start-dialogue
(mumble 'player :en "...") (💬:mumble 'player :en "...")
(face 'player "<w<") (💬:face 'player "<w<")
(say sasha :eo "Kial vi restas? Ĉu tiom solecas ke nur ideas ĝeni min?" (💬:say sasha :eo "Kial vi restas? Ĉu tiom solecas ke nur ideas ĝeni min?"
:en "Why are you still here? Are you so lonely you've only got me to bother?") :en "Why are you still here? Are you so lonely you've only got me to bother?")
(face 'player ":w:" ":u:") (💬:face 'player ":w:" ":u:")
(mumble 'player :eo "(Ŝi parolas pri si mem, ĉu ne?)" (💬:mumble 'player :eo "(Ŝi parolas pri si mem, ĉu ne?)"
:en "(She's projecting, isn't she?)"))) :en "(She's projecting, isn't she?)")))
(2 (2
(start-dialogue (start-dialogue
(face 'player ":w:" ":o:") (💬:face 'player ":w:" ":o:")
(say 'player :eo "Nu... Vi staris tie ĉi senmove dum la pastintaj tri tagoj..." (💬:say 'player :eo "Nu... Vi staris tie ĉi senmove dum la pastintaj tri tagoj..."
:en "So... You've stood around here for three days already, you've hardly moved...") :en "So... You've stood around here for three days already, you've hardly moved...")
(say sasha :eo "Pŝ! Do?! Mi simple havas multajn pripensindaĵojn! Mi tiom multe okupiĝas!" (💬:say sasha :eo "Pŝ! Do?! Mi simple havas multajn pripensindaĵojn! Mi tiom multe okupiĝas!"
:en "Pff! So what?! My mind's just busy! I've got a lot going on right now!" :en "Pff! So what?! My mind's just busy! I've got a lot going on right now!"
:face "vov") :face "vov")
(say sasha :eo "Ne ŝajnigu vin supera al mi, dum vi mem senespere sencelas!!" (💬:say sasha :eo "Ne ŝajnigu vin supera al mi, dum vi mem senespere sencelas!!"
:en "Don't act all haughty when you're such an aimless loser yourself!!" :en "Don't act all haughty when you're such an aimless loser yourself!!"
:face ">o<") :face ">o<")
(face 'player "=w=" "=u=") (💬:face 'player "=w=" "=u=")
(mumble 'player :eo "Eee.. pardonu." (💬:mumble 'player :eo "Eee.. pardonu."
:en "Well... sorry."))) :en "Well... sorry.")))
(3 (3
(start-dialogue (start-dialogue
(say 'player :eo "Nu, vere, mia celo sufiĉe klaras al mi. Jam baldaŭ redungiĝos." (💬:say 'player :eo "Nu, vere, mia celo sufiĉe klaras al mi. Jam baldaŭ redungiĝos."
:en "I'm not too aimless, actually. I've got good job prospects, right about now." :en "I'm not too aimless, actually. I've got good job prospects, right about now."
:face "<w<") :face "<w<")
(say sasha :eo "Mi tute ne prizorgas." (💬:say sasha :eo "Mi tute ne prizorgas."
:en "I really don't care.")))))) :en "I really don't care."))))))
@ -337,74 +337,74 @@ run the :USE function of the nearest entity, if it has any."
(defun childhood-friend-dialogue-bracelet-intro (sasha) (defun childhood-friend-dialogue-bracelet-intro (sasha)
(start-dialogue (start-dialogue
(face 'player "=w=" "=v=") (💬:face 'player "=w=" "=v=")
(say 'player :eo "Nu, mi ankoraŭ opinias ke ĉi tio akordas vian stilon tre bone." (💬:say 'player :eo "Nu, mi ankoraŭ opinias ke ĉi tio akordas vian stilon tre bone."
:en "I still think this suits you, you know.") :en "I still think this suits you, you know.")
(face sasha ";w:" ":o:") (💬:face sasha ";w:" ":o:")
(say sasha :en "...") (💬:say sasha :en "...")
(say sasha :eo "... vi ankoraŭ havas tion?" (💬:say sasha :eo "... vi ankoraŭ havas tion?"
:en "... you still have that?") :en "... you still have that?")
(say 'player :eo "Kompreneble mi plu havas!" (💬:say 'player :eo "Kompreneble mi plu havas!"
:en "Of course I do!") :en "Of course I do!")
(say 'player :eo "Sed mi ne plu; ĝi ja estas via." (💬:say 'player :eo "Sed mi ne plu; ĝi ja estas via."
:en "But I shouldn't; it's yours, after all.") :en "But I shouldn't; it's yours, after all.")
(say sasha :en "..."))) (💬:say sasha :en "...")))
(defun childhood-friend-dialogue-bracelet-bad-end (sasha) (defun childhood-friend-dialogue-bracelet-bad-end (sasha)
(start-dialogue (start-dialogue
(face sasha "v-v" "vov") (💬:face sasha "v-v" "vov")
(face 'player ":w;" ":o;") (💬:face 'player ":w;" ":o;")
(say sasha :eo "Pŝ!" (💬:say sasha :eo "Pŝ!"
:en "Psh!") :en "Psh!")
(say sasha :eo "Ankoraŭ estas la malĝusta koloro, do..!" (💬:say sasha :eo "Ankoraŭ estas la malĝusta koloro, do..!"
:en "It's still the wrong colour, so..!" :en "It's still the wrong colour, so..!"
:face "<o<") :face "<o<")
(say sasha :eo "Lasu min!" (💬:say sasha :eo "Lasu min!"
:en "Leave me alone!" :en "Leave me alone!"
:face ">o<") :face ">o<")
(say 'player :eo "Kial vi ankoraŭ forpuŝas min ĉi tiom?" (💬:say 'player :eo "Kial vi ankoraŭ forpuŝas min ĉi tiom?"
:en "Why do you still push me away this much?") :en "Why do you still push me away this much?")
(say sasha :eo "Puŝas? Bona ideo, mi falpuŝu vin al la maro!" (💬:say sasha :eo "Puŝas? Bona ideo, mi falpuŝu vin al la maro!"
:en "Push? Good idea, I'll push you off this cliff!") :en "Push? Good idea, I'll push you off this cliff!")
(say 'player :eo "Vi ankoraŭ kompenas nenion ajn, Saŝa." (💬:say 'player :eo "Vi ankoraŭ kompenas nenion ajn, Saŝa."
:en "You still don't get it at all, Sasha.") :en "You still don't get it at all, Sasha.")
(say 'player :eo "... kaj ne puŝu min, bonvole!!" (💬:say 'player :eo "... kaj ne puŝu min, bonvole!!"
:en "... and please don't push me!!" :en "... and please don't push me!!"
:face "@o@"))) :face "@o@")))
(defun childhood-friend-dialogue-bracelet-good-end (sasha) (defun childhood-friend-dialogue-bracelet-good-end (sasha)
(start-dialogue (start-dialogue
(face sasha "=v=\"" "=v=\"") (💬:face sasha "=v=\"" "=v=\"")
(say sasha :eo "Nu, dankon..." (💬:say sasha :eo "Nu, dankon..."
:en "Well, thanks...") :en "Well, thanks...")
(say sasha :eo "[SAŜA prenas ĈIRKAŬMANON de vi.]" (💬:say sasha :eo "[SAŜA prenas ĈIRKAŬMANON de vi.]"
:en "[SASHA takes BRACELET from you.]") :en "[SASHA takes BRACELET from you.]")
(face sasha "<w<" "<w<") (💬:face sasha "<w<" "<w<")
(say sasha :eo "Verdire, mi mensogetis tiam..." (💬:say sasha :eo "Verdire, mi mensogetis tiam..."
:en "To be honest, I lied a bit, back then...") :en "To be honest, I lied a bit, back then...")
(say sasha :eo "Ĉi tiu koloro fakte tre plaĉas al mi." (💬:say sasha :eo "Ĉi tiu koloro fakte tre plaĉas al mi."
:en "I actually really like this colour." :en "I actually really like this colour."
:face ">w>") :face ">w>")
(say 'player :eo "Mi ĝojas, ke finfine estos via." (💬:say 'player :eo "Mi ĝojas, ke finfine estos via."
:en "I'm glad it's finally yours.") :en "I'm glad it's finally yours.")
(say sasha :eo "Mi suportos ĝin ĉiutage!" (💬:say sasha :eo "Mi suportos ĝin ĉiutage!"
:en "I'll wear it every day!" :en "I'll wear it every day!"
:face "^o^") :face "^o^")
(say sasha :eo "... ho. Fek! Nu!" (💬:say sasha :eo "... ho. Fek! Nu!"
:en "... wait. Shit!" :en "... wait. Shit!"
:face "<w<\"") :face "<w<\"")
(say sasha :eo "Simple pro la aspekto! Ne gravas al mi, ĉu estas donaco aŭ ne!!" (💬:say sasha :eo "Simple pro la aspekto! Ne gravas al mi, ĉu estas donaco aŭ ne!!"
:en "Just because it's pretty! I don't care that it's a gift or whatever!!" :en "Just because it's pretty! I don't care that it's a gift or whatever!!"
:face ">o<") :face ">o<")
(face 'player "` `" "`o`") (💬:face 'player "` `" "`o`")
(mumble 'player :eo "(Mi supozas, ke la kerno de homo ne tro multe sanĝiĝas...)" (💬:mumble 'player :eo "(Mi supozas, ke la kerno de homo ne tro multe sanĝiĝas...)"
:en "(At the end of the day, I guess people can't change too much...)") :en "(At the end of the day, I guess people can't change too much...)")
(mumble 'player :eo "(Sed tamen." (💬:mumble 'player :eo "(Sed tamen."
:en "(But y'know what? This is good enough for me.)") :en "(But y'know what? This is good enough for me.)")
(face 'player "^w^" "^o^") (💬:face 'player "^w^" "^o^")
(mumble 'player :eo "(Ĉi tio sufiĉas al mi!)" (💬:mumble 'player :eo "(Ĉi tio sufiĉas al mi!)"
:en "(This is good enough for me!)"))) :en "(This is good enough for me!)")))
@ -446,42 +446,42 @@ avoid triggering this."
(defun flashback-childhood-friend-dialogue-intro (sasha) (defun flashback-childhood-friend-dialogue-intro (sasha)
(start-dialogue (start-dialogue
(face 'player "` `" "`o`") (💬:face 'player "` `" "`o`")
(say 'player :eo "Ĉu ĉio enordas, Saŝa? Iom malfruas, ĉu ne?" (💬:say 'player :eo "Ĉu ĉio enordas, Saŝa? Iom malfruas, ĉu ne?"
:en "Is everything OK, Sasha? It's a bit late, isn't it?") :en "Is everything OK, Sasha? It's a bit late, isn't it?")
(face sasha "=_=" "=o=") (💬:face sasha "=_=" "=o=")
(say sasha :eo "Ho, jes, mi simple ĵus eliris klubkunvenon." (💬:say sasha :eo "Ho, jes, mi simple ĵus eliris klubkunvenon."
:en "Yea, I just left a club-meeting, is all.") :en "Yea, I just left a club-meeting, is all.")
(say 'player :eo "Hodiaŭ ne estas klubotago..." (💬:say 'player :eo "Hodiaŭ ne estas klubotago..."
:en "Today isn't club day...") :en "Today isn't club day...")
(say sasha :eo "Nu, estas escepte speciala klubo!" (💬:say sasha :eo "Nu, estas escepte speciala klubo!"
:en "Well, whatever, it's a special club!" :en "Well, whatever, it's a special club!"
:face "<o<") :face "<o<")
(say sasha :eo "Nu, kial VI restas? Ĉu ankoraŭ havas ne amikojn?" (💬:say sasha :eo "Nu, kial VI restas? Ĉu ankoraŭ havas ne amikojn?"
:en "And what're YOU doing here? Still no friends?") :en "And what're YOU doing here? Still no friends?")
(say 'player :eo "Ankoraŭ sole vin." (💬:say 'player :eo "Ankoraŭ sole vin."
:en "Still just you.") :en "Still just you.")
(face sasha ":v:" ":o:") (💬:face sasha ":v:" ":o:")
(mumble sasha :en "...") (💬:mumble sasha :en "...")
(say sasha :eo "Nu..." (💬:say sasha :eo "Nu..."
:en "Well...") :en "Well...")
(mumble sasha :en "...") (💬:mumble sasha :en "...")
(face sasha "<-<" "<o<") (💬:face sasha "<-<" "<o<")
(face 'player ":w:" ":u:") (💬:face 'player ":w:" ":u:")
(say sasha :eo "Pŝ! Fermu la buŝon, vermo!" (💬:say sasha :eo "Pŝ! Fermu la buŝon, vermo!"
:en "Ugh! Just shut up, you loser!") :en "Ugh! Just shut up, you loser!")
(face sasha ">->" ">o>") (💬:face sasha ">->" ">o>")
(say sasha :eo "Kvazaŭ ni povus esti tiel!" (💬:say sasha :eo "Kvazaŭ ni povus esti tiel!"
:en "As if!") :en "As if!")
(face sasha "<-<" "<o<") (💬:face sasha "<-<" "<o<")
(say sasha :eo "Simple lasu min al paco, fek'!!" (💬:say sasha :eo "Simple lasu min al paco, fek'!!"
:en "Just get the hell out of my face!!" :en "Just get the hell out of my face!!"
:face ">o<") :face ">o<")
(say 'player :eo "Bedaŭron..." (💬:say 'player :eo "Bedaŭron..."
:en "Sorry...") :en "Sorry...")
(move 'player '(:x 46 :y 11) :delay .05) (move 'player '(:x 46 :y 11) :delay .05)
(face 'player "^_^" "^o^") (💬:face 'player "^_^" "^o^")
(say 'player :eo "Ho, jes!" (💬:say 'player :eo "Ho, jes!"
:en "Oh, yea!") :en "Oh, yea!")
(move sasha '(:x 36 :y 3) :delay .03) (move sasha '(:x 36 :y 3) :delay .03)
(move 'player '(:x 43 :y 4) :delay .05) (move 'player '(:x 43 :y 4) :delay .05)
@ -490,27 +490,27 @@ avoid triggering this."
(defun flashback-childhood-friend-dialogue-bracelet (map sasha) (defun flashback-childhood-friend-dialogue-bracelet (map sasha)
(start-dialogue (start-dialogue
(say 'player :eo "Mi freŝe trovis ĉi tion, ĝi ŝajnis akorda al via stilo." (💬:say 'player :eo "Mi freŝe trovis ĉi tion, ĝi ŝajnis akorda al via stilo."
:en "I found this a while back, I thought you'd like it.") :en "I found this a while back, I thought you'd like it.")
(face sasha ";w:" ";u:") (💬:face sasha ";w:" ";u:")
(mumble 'player :eo "[Vi donas al SAŜA ĉirkaŭmanon belbrilan.]" (💬:mumble 'player :eo "[Vi donas al SAŜA ĉirkaŭmanon belbrilan.]"
:en "[You give SASHA a shiny bracelet.]") :en "[You give SASHA a shiny bracelet.]")
(say sasha :eo "Ho, tio surprize afablis...." (💬:say sasha :eo "Ho, tio surprize afablis...."
:en "Oh, that's surprisingly nice...") :en "Oh, that's surprisingly nice...")
(face sasha "<w<" "<o<") (💬:face sasha "<w<" "<o<")
(face 'player ":w;" ":o;") (💬:face 'player ":w;" ":o;")
(say sasha :eo "... jen la sola koloro, kiun mi malamas." (💬:say sasha :eo "... jen la sola koloro, kiun mi malamas."
:en "... this is literally the one color I hate.") :en "... this is literally the one color I hate.")
(say sasha :eo "Kial vi ne elektis bluan? Dio mia." (💬:say sasha :eo "Kial vi ne elektis bluan? Dio mia."
:en "You couldn't have gotten blue?") :en "You couldn't have gotten blue?")
(say sasha :eo "Mi jam bone sciu, ne atendi bonon de vi." (💬:say sasha :eo "Mi jam bone sciu, ne atendi bonon de vi."
:en "I should know not to expect so much from you...") :en "I should know not to expect so much from you...")
(say sasha :eo "Bonaj \"amikoj\" ni estas, ja..." (💬:say sasha :eo "Bonaj \"amikoj\" ni estas, ja..."
:en "\"Friends,\" whatever...") :en "\"Friends,\" whatever...")
(face 'player "T_T" "ToT") (💬:face 'player "T_T" "ToT")
(move 'player '(:x 41 :y 3) :delay .05) (move 'player '(:x 41 :y 3) :delay .05)
(face sasha ":_;") (💬:face sasha ":_;")
(mumble 'player :eo "[Vi prenas de SAŜA ĉirkaŭmanon belbrilan.]" (💬:mumble 'player :eo "[Vi prenas de SAŜA ĉirkaŭmanon belbrilan.]"
:en "[You take a shiny bracelet from SASHA.]") :en "[You take a shiny bracelet from SASHA.]")
(move 'player '(:x 46 :y 5) :delay .05) (move 'player '(:x 46 :y 5) :delay .05)
(move 'player '(:x 51 :y 19) :delay .05) (move 'player '(:x 51 :y 19) :delay .05)
@ -545,43 +545,43 @@ avoid triggering this."
(defun boozy-lady-dialogue-ring () (defun boozy-lady-dialogue-ring ()
(start-dialogue (start-dialogue
(say 'boozy-lady :eo "Vi volas edzinigi min, belulo?" (💬:say 'boozy-lady :eo "Vi volas edzinigi min, belulo?"
:en "Ya wanna marry me, hot stuff?") :en "Ya wanna marry me, hot stuff?")
(say 'boozy-lady :eo "Booone, niiru tuj!" (💬:say 'boozy-lady :eo "Booone, niiru tuj!"
:en "Shuree, lez go now!") :en "Shuree, lez go now!")
(say 'boozy-friend :eo "Vi NE iros tuj." (💬:say 'boozy-friend :eo "Vi NE iros tuj."
:en "You \"shure\" as hell WON'T."))) :en "You \"shure\" as hell WON'T.")))
(defun boozy-lady-dialogue-wallet () (defun boozy-lady-dialogue-wallet ()
(start-dialogue (start-dialogue
(say 'boozy-lady :eo "...? Monujo?" (💬:say 'boozy-lady :eo "...? Monujo?"
:en "...? Wallet?") :en "...? Wallet?")
(say 'boozy-lady :eo "Monujo, mono! Mono, biero!!" (💬:say 'boozy-lady :eo "Monujo, mono! Mono, biero!!"
:en "Wallet, money! Money, booze!") :en "Wallet, money! Money, booze!")
(say 'boozy-friend :eo "... kaj vi certe ne bezonas pli da TIO." (💬:say 'boozy-friend :eo "... kaj vi certe ne bezonas pli da TIO."
:en "You don't need any more of THAT, hon."))) :en "You don't need any more of THAT, hon.")))
(defun boozy-lady-dialogue-bracelet () (defun boozy-lady-dialogue-bracelet ()
(start-dialogue (start-dialogue
(face 'player "^_^" "^o^") (💬:face 'player "^_^" "^o^")
(say 'boozy-lady :eo "Ooo, brile! Ĝi belasss" (💬:say 'boozy-lady :eo "Ooo, brile! Ĝi belasss"
:en "Ooo, shiny! It's prettyy") :en "Ooo, shiny! It's prettyy")
(say 'boozy-lady :eo "Ĉu por mji?" (💬:say 'boozy-lady :eo "Ĉu por mji?"
:en "Is it for mi?") :en "Is it for mi?")
(say 'player :eo "Estos via, se vi ĵuras ne plu drinki ĉi-nokte." (💬:say 'player :eo "Estos via, se vi ĵuras ne plu drinki ĉi-nokte."
:en "It's yours, if you promise to slow your roll a bit.") :en "It's yours, if you promise to slow your roll a bit.")
(say 'boozy-lady :eo "Jeŝ! Ne pluuu!" (💬:say 'boozy-lady :eo "Jeŝ! Ne pluuu!"
:en "Okieeee!" :en "Okieeee!"
:face "= w =") :face "= w =")
(say 'boozy-lady :eo "[MAJA prenas ĈIRKAŬMANON de vi.]" (💬:say 'boozy-lady :eo "[MAJA prenas ĈIRKAŬMANON de vi.]"
:en "[MAJA takes BRACELET from you.]" :en "[MAJA takes BRACELET from you.]"
:face "= w =") :face "= w =")
(face 'player ">_<" ">o<") (💬:face 'player ">_<" ">o<")
(say 'boozy-lady :eo "Plia biero por mi, sinjoro!!" (💬:say 'boozy-lady :eo "Plia biero por mi, sinjoro!!"
:en "Jkjk. One more for me, barkeep!!") :en "Jkjk. One more for me, barkeep!!")
(say 'casino-bartender (💬:say 'casino-bartender
:eo "Bone, momenton!!" :eo "Bone, momenton!!"
:en "Sure thing, lady!" :en "Sure thing, lady!"
:face "xD "))) :face "xD ")))
@ -614,74 +614,74 @@ avoid triggering this."
(case (getf-act map :gambler-greetings) (case (getf-act map :gambler-greetings)
(0 (0
(start-dialogue (start-dialogue
(face gambler "xD ") (💬:face gambler "xD ")
(mumble gambler :en "Hahaha... haha.") (💬:mumble gambler :en "Hahaha... haha.")
(say gambler :eo "Kia spektalo! Hahaha!" (💬:say gambler :eo "Kia spektalo! Hahaha!"
:en "Good one! Hahaha!" :en "Good one! Hahaha!"
:face "xDD") :face "xDD")
(say gambler :en "Hahahaha! Hahahahaha!" (💬:say gambler :en "Hahahaha! Hahahahaha!"
:face "x'D") :face "x'D")
(face 'player "^^'") (💬:face 'player "^^'")
(face gambler ">V<" ">O<") (💬:face gambler ">V<" ">O<")
(say gambler :eo "Tiom amuze! Bona ŝerco!" (💬:say gambler :eo "Tiom amuze! Bona ŝerco!"
:en "Shit that's funny!" :en "Shit that's funny!"
:face ">V<") :face ">V<")
(face 'player "^^\"") (💬:face 'player "^^\"")
(say gambler :eo "Mi tute ruinigis mian vivon! MDR!" (💬:say gambler :eo "Mi tute ruinigis mian vivon! MDR!"
:en "I totally fucked my life! LMAO!" :en "I totally fucked my life! LMAO!"
:face ">V<") :face ">V<")
(face 'player "o-o" "ouo") (💬:face 'player "o-o" "ouo")
(say gambler :en "HAHAHAHAHAHAHAHAHAHAAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAAHAHAHAHAHAHAHAHAHAHAHAHA") (💬:say gambler :en "HAHAHAHAHAHAHAHAHAHAAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAAHAHAHAHAHAHAHAHAHAHAHAHA")
(face gambler "=w=" "=w=") (💬:face gambler "=w=" "=w=")
(mumble gambler :en "...") (💬:mumble gambler :en "...")
(mumble gambler :eo "Fek'." (💬:mumble gambler :eo "Fek'."
:en "Fuck."))) :en "Fuck.")))
(1 (1
(start-dialogue (start-dialogue
(say 'player :eo "Ĉu... ĉio enordas, samideano?" (💬:say 'player :eo "Ĉu... ĉio enordas, samideano?"
:en "Everything alright, man..?") :en "Everything alright, man..?")
(say gambler :eo "Jes! Tutorde! Bonas!" (💬:say gambler :eo "Jes! Tutorde! Bonas!"
:en "Yup! For sure! All good!") :en "Yup! For sure! All good!")
(say gambler :eo "Mi simple trafis iujn monproblemojn, ne problemas." (💬:say gambler :eo "Mi simple trafis iujn monproblemojn, ne problemas."
:en "I've just hit a slight snag financially, it's no problem.") :en "I've just hit a slight snag financially, it's no problem.")
(say gambler :eo "Nur povas ne repagi monprunton." (💬:say gambler :eo "Nur povas ne repagi monprunton."
:en "I just can't repay my mortgage.") :en "I just can't repay my mortgage.")
(say gambler :eo "... kiun mi pruntis por repagi alian monprunton." (💬:say gambler :eo "... kiun mi pruntis por repagi alian monprunton."
:en "... that I took out to pay back a loan.") :en "... that I took out to pay back a loan.")
(say gambler :eo "... kiun mi pruntis por subteni la kompanion de mia frato." (💬:say gambler :eo "... kiun mi pruntis por subteni la kompanion de mia frato."
:en "... that I borrowed to support my bro's company.") :en "... that I borrowed to support my bro's company.")
(say gambler :eo "... kiu estas senpaga lernejo por handikapuloj." (💬:say gambler :eo "... kiu estas senpaga lernejo por handikapuloj."
:en "... that's a non-profit school for disabled kids.") :en "... that's a non-profit school for disabled kids.")
(say gambler :eo "... danke al kiu mia filino povas edukiĝi bone." (💬:say gambler :eo "... danke al kiu mia filino povas edukiĝi bone."
:en "... thanks to which my daughter can receive a good education.") :en "... thanks to which my daughter can receive a good education.")
(say gambler :eo "Kial mi forĵetis la monon tie ĉi?! FEK'!!" (💬:say gambler :eo "Kial mi forĵetis la monon tie ĉi?! FEK'!!"
:en "Why'd I waste it all here?! FUCK!!" :en "Why'd I waste it all here?! FUCK!!"
:face ">O<"))) :face ">O<")))
(2 (2
(start-dialogue (start-dialogue
(say gambler :eo "Nu, ĉio enordas! Ni simple perdos la domon, jen ĉio." (💬:say gambler :eo "Nu, ĉio enordas! Ni simple perdos la domon, jen ĉio."
:en "Anyways, all good! We'll just lose the house, that's all.") :en "Anyways, all good! We'll just lose the house, that's all.")
(say gambler :eo "Kompreneble, perdinte la domon, mia edzino lasos min, kunprenante la gefilojn..." (💬:say gambler :eo "Kompreneble, perdinte la domon, mia edzino lasos min, kunprenante la gefilojn..."
:en "Obviously, after losing the house, my wife'll take leave with the kids...") :en "Obviously, after losing the house, my wife'll take leave with the kids...")
(say gambler :eo "Dommastrino sen domo ja ne sencas, do!" (💬:say gambler :eo "Dommastrino sen domo ja ne sencas, do!"
:en "A house-mistress without a house is no mistress at all, of course!") :en "A house-mistress without a house is no mistress at all, of course!")
(say gambler :eo "Kaj kromvirino sen edzino ja ne sencas, do lasos min ankaŭ ŝi..." (💬:say gambler :eo "Kaj kromvirino sen edzino ja ne sencas, do lasos min ankaŭ ŝi..."
:en "And a side-piece without a 'main-piece' is no side-piece at all, so she'll leave me too...") :en "And a side-piece without a 'main-piece' is no side-piece at all, so she'll leave me too...")
(say gambler :eo "Neniu mono, neniu domo, neniu filo, neniu edzino, neniu kromvirino!" (💬:say gambler :eo "Neniu mono, neniu domo, neniu filo, neniu edzino, neniu kromvirino!"
:en "No money, no house, no children, no wife, no mistress!") :en "No money, no house, no children, no wife, no mistress!")
(say gambler :eo "Neniu vivo!" (💬:say gambler :eo "Neniu vivo!"
:en "No life!"))) :en "No life!")))
(3 (3
(start-dialogue (start-dialogue
(say gambler :eo "Mi cedu al la vakuo. Tre komfortas ĉe la fundo, kara." (💬:say gambler :eo "Mi cedu al la vakuo. Tre komfortas ĉe la fundo, kara."
:en "I'm giving into the void. It's quite peaceful down here, buddy.") :en "I'm giving into the void. It's quite peaceful down here, buddy.")
(say gambler :eo "Mi lasu min falu entute, ĉu ne, kara amiko? Ĉu neee?" (💬:say gambler :eo "Mi lasu min falu entute, ĉu ne, kara amiko? Ĉu neee?"
:en "I should let go, right, pal? Righttt?") :en "I should let go, right, pal? Righttt?")
(face 'player ";w;" ";o;") (💬:face 'player ";w;" ";o;")
(say 'player :eo "Ne tro senesperu -- sinjoro, restas al vi fuĝvojo, sendube!" (💬:say 'player :eo "Ne tro senesperu -- sinjoro, restas al vi fuĝvojo, sendube!"
:en "Guy, there's still hope for you, somewhere!") :en "Guy, there's still hope for you, somewhere!")
(face gambler "=v=" "=v=") (💬:face gambler "=v=" "=v=")
(say gambler :eo "Mi ideas IAN fuĝvojon..." (💬:say gambler :eo "Mi ideas IAN fuĝvojon..."
:en "Five feet under, maybe...")))))) :en "Five feet under, maybe..."))))))
@ -732,20 +732,20 @@ avoid triggering this."
(defun flashback-bad-gambler-dialogue () (defun flashback-bad-gambler-dialogue ()
(let ((gambler 'flashback-bad-gambler)) (let ((gambler 'flashback-bad-gambler))
(start-dialogue (start-dialogue
(say gambler :eo "Kia spektalo! Hahaha!" (💬:say gambler :eo "Kia spektalo! Hahaha!"
:en "How nice! Hahaha!") :en "How nice! Hahaha!")
(face gambler ">v<" ">u<") (💬:face gambler ">v<" ">u<")
(face 'player "o-o") (💬:face 'player "o-o")
(say gambler :en "HAHAHAHAHAHAHAHAHAHAHAHA!") (💬:say gambler :en "HAHAHAHAHAHAHAHAHAHAHAHA!")
(face 'player "=w='") (💬:face 'player "=w='")
(say gambler :eo "Hehe-Heŭreka! Ĉi-nokte, Sorto estas mia kromvirino!" (💬:say gambler :eo "Hehe-Heŭreka! Ĉi-nokte, Sorto estas mia kromvirino!"
:en "Haha-Hot damn, lady luck's my mistress tonight!") :en "Haha-Hot damn, lady luck's my mistress tonight!")
(face gambler "^#^" "^O^") (💬:face gambler "^#^" "^O^")
(say gambler :eo "ĉu vi sciis, kara?" (💬:say gambler :eo "ĉu vi sciis, kara?"
:en "Guess what, buddy?") :en "Guess what, buddy?")
(say gambler :eo "Por tiu ĉi ludo mi havas feke legendan vetaĵon!" (💬:say gambler :eo "Por tiu ĉi ludo mi havas feke legendan vetaĵon!"
:en "I've got one hell of a chip for this game!") :en "I've got one hell of a chip for this game!")
(face 'player "^_^" "^o^")))) (💬:face 'player "^_^" "^o^"))))
(defun flashback-bad-gambler-interact (map &optional interactee-id) (defun flashback-bad-gambler-interact (map &optional interactee-id)
@ -759,33 +759,33 @@ avoid triggering this."
(geezer 'flashback-casino-geezer) (geezer 'flashback-casino-geezer)
(gambler 'flashback-bad-gambler)) (gambler 'flashback-bad-gambler))
(start-dialogue (start-dialogue
(say dealer :eo "Ĉu ĉiu pretas?" (💬:say dealer :eo "Ĉu ĉiu pretas?"
:en "Everyone ready?") :en "Everyone ready?")
(say geezer :eo "Pretis jam antaŭ vi eĉ naskiĝis!" (💬:say geezer :eo "Pretis jam antaŭ vi eĉ naskiĝis!"
:en "I've been ready since before you were born!") :en "I've been ready since before you were born!")
(say gambler :eo "Ĉu necesas demandi?" (💬:say gambler :eo "Ĉu necesas demandi?"
:en "Need you ask?") :en "Need you ask?")
(say father :eo "Ni pretas, ankaŭ!" (💬:say father :eo "Ni pretas, ankaŭ!"
:en "We're ready, too!") :en "We're ready, too!")
(say 'player :en "Eee...!" (💬:say 'player :en "Eee...!"
:face ";w:") :face ";w:")
(say father :eo "Ho, jes, vi ne scipovas ludi." (💬:say father :eo "Ho, jes, vi ne scipovas ludi."
:en "Oh, right, you still don't know how to play.") :en "Oh, right, you still don't know how to play.")
(say father :eo "Atendu momente, ĉiu, mi klarigos rapide!" (💬:say father :eo "Atendu momente, ĉiu, mi klarigos rapide!"
:en "Hold on, everyone, we'll be quick!") :en "Hold on, everyone, we'll be quick!")
(say father :eo "Bone: Vikĉjo, atentu! Mi ne min ripetos!" (💬:say father :eo "Bone: Vikĉjo, atentu! Mi ne min ripetos!"
:eo "Alright, Vic! Listen up, 'cuz I'm not gonna repeat myself!") :eo "Alright, Vic! Listen up, 'cuz I'm not gonna repeat myself!")
(say father :eo "La ludestro disdonas kartojn hazardkaŝe. La kartvaloro sekvas la numerojn, krom se estas kolora karto. Se estas kolora karto, la valoro sekvas la Epokon de la ludo. La unua Epoko estas Antaŭhistorio, kaj kompreneble plej valoras tiam la..." (💬:say father :eo "La ludestro disdonas kartojn hazardkaŝe. La kartvaloro sekvas la numerojn, krom se estas kolora karto. Se estas kolora karto, la valoro sekvas la Epokon de la ludo. La unua Epoko estas Antaŭhistorio, kaj kompreneble plej valoras tiam la..."
:en "The dealer hands out cards randomly and discretely. The cards' value is based on their number, unless they're a coloured card, in which case the value is based on the Era of the game. The first Era is Pre-history, and of course the most imporant card in Pre-history is...") :en "The dealer hands out cards randomly and discretely. The cards' value is based on their number, unless they're a coloured card, in which case the value is based on the Era of the game. The first Era is Pre-history, and of course the most imporant card in Pre-history is...")
(face 'player "=w='" "=o='") (💬:face 'player "=w='" "=o='")
(say 'player :eo "(Mi ĝojas festi kun ĉiu, sed ĉi tiu ludo sonas jam tro malsimpla por mi...)" (💬:say 'player :eo "(Mi ĝojas festi kun ĉiu, sed ĉi tiu ludo sonas jam tro malsimpla por mi...)"
:en "(I'm glad to party like this with my folks, but this game sounds a bit complicated...)") :en "(I'm glad to party like this with my folks, but this game sounds a bit complicated...)")
(say 'player :eo "(Ĉu ne ni povus simple ludi Hanafudan?)" (💬:say 'player :eo "(Ĉu ne ni povus simple ludi Hanafudan?)"
:en "(Why can't we just play Hanafuda?)" :en "(Why can't we just play Hanafuda?)"
:face "=w='") :face "=w='")
(say father :eo "... kaj tiel oni venkas la markizon.") (💬:say father :eo "... kaj tiel oni venkas la markizon.")
(say father :eo "Bone, jen ĉio!") (💬:say father :eo "Bone, jen ĉio!")
(say gambler :eo "Finfine!!")))) (💬:say gambler :eo "Finfine!!"))))
(defun flashback-casino-dialogue-bet (map) (defun flashback-casino-dialogue-bet (map)
@ -796,63 +796,63 @@ avoid triggering this."
(gambler 'flashback-bad-gambler)) (gambler 'flashback-bad-gambler))
(append (append
(start-dialogue (start-dialogue
(say gambler :eo "Jen, mi vetas ĉi tion!" (💬:say gambler :eo "Jen, mi vetas ĉi tion!"
:en "Now, I'm putting this down!") :en "Now, I'm putting this down!")
(say gambler :eo "Momenton..." (💬:say gambler :eo "Momenton..."
:en "Wait..." :en "Wait..."
:face "`o`") :face "`o`")
(say gambler :eo "He?! Mi perdis la geeziĝan ringon?!" (💬:say gambler :eo "He?! Mi perdis la geeziĝan ringon?!"
:en "Wait... what?! I lost my wedding ring?!" :en "Wait... what?! I lost my wedding ring?!"
:face "O_O")) :face "O_O"))
(if (aget-item map 'ring) (if (aget-item map 'ring)
(start-dialogue (start-dialogue
(face 'player "^_^" "^o^") (💬:face 'player "^_^" "^o^")
(say 'player :eo "Ho! jen!" (💬:say 'player :eo "Ho! jen!"
:en "Ĉu estas tia ĉi?") :en "Ĉu estas tia ĉi?")
(mumble 'player :eo "[Vi donas RINGON al HAZARDLUDEMULO]" (💬:mumble 'player :eo "[Vi donas RINGON al HAZARDLUDEMULO]"
:en "[You give RING to GAMBLER]") :en "[You give RING to GAMBLER]")
(face gambler "=w=" "=w=") (💬:face gambler "=w=" "=w=")
(say gambler :eo "..." (💬:say gambler :eo "..."
:en "...") :en "...")
(face gambler ":W:" ":O:") (💬:face gambler ":W:" ":O:")
(say gambler :eo "Je dio!! Dankegon, kara!!" (💬:say gambler :eo "Je dio!! Dankegon, kara!!"
:en "God damn!! Thank you, buddy!!") :en "God damn!! Thank you, buddy!!")
(say gambler :eo "Mi preskaŭ tiom senesperis!" (💬:say gambler :eo "Mi preskaŭ tiom senesperis!"
:en "I almost gave into despair!") :en "I almost gave into despair!")
(face gambler "^#^" "^O^") (💬:face gambler "^#^" "^O^")
(say gambler :eo "NUN mi pretas ludi." (💬:say gambler :eo "NUN mi pretas ludi."
:en "NOW I'm ready to play.") :en "NOW I'm ready to play.")
(mumble gambler :eo "[HAZARDLUDEMULO donas GEEDZIĜAN RINGON al TABLO]" (💬:mumble gambler :eo "[HAZARDLUDEMULO donas GEEDZIĜAN RINGON al TABLO]"
:en "[GAMBLER gives WEDDING RING to TABLE") :en "[GAMBLER gives WEDDING RING to TABLE")
(say 'player :eo "Ĉu vere?! Kio misas je vi!?!" (💬:say 'player :eo "Ĉu vere?! Kio misas je vi!?!"
:en "Seriously?! What's wrong with you!?!" :en "Seriously?! What's wrong with you!?!"
:face ">O<") :face ">O<")
(face 'player ":w:'") (💬:face 'player ":w:'")
(say gambler :en "Live fast die hard, brother!" (💬:say gambler :en "Live fast die hard, brother!"
:eo "Vivu akre mortu frue!" :eo "Vivu akre mortu frue!"
:face "B-)") :face "B-)")
(say mother :eo "Vi provis, Vikĉjo..." (💬:say mother :eo "Vi provis, Vikĉjo..."
:en "You tried, Vic...")) :en "You tried, Vic..."))
(start-dialogue (start-dialogue
(say gambler :eo "... bone do, tio ĉi sufiĉos." (💬:say gambler :eo "... bone do, tio ĉi sufiĉos."
:en "... fine then, this'll have to do." :en "... fine then, this'll have to do."
:face "<v<") :face "<v<")
(mumble gambler :eo "[HAZARDLUDEMULO donas BIENPOSEDON al TABLO]" (💬:mumble gambler :eo "[HAZARDLUDEMULO donas BIENPOSEDON al TABLO]"
:en "[GAMBLER gives LAND OWNERSHIP to TABLE]") :en "[GAMBLER gives LAND OWNERSHIP to TABLE]")
(face 'player ":w:" ":0:") (💬:face 'player ":w:" ":0:")
(say 'player :eo "Ĉu vi frenezas?! Ne tion faru!!" (💬:say 'player :eo "Ĉu vi frenezas?! Ne tion faru!!"
:en "Are you crazy?! Don't do that!!") :en "Are you crazy?! Don't do that!!")
(say mother :eo "Lasu lin, Vikĉjo." (💬:say mother :eo "Lasu lin, Vikĉjo."
:en "Leave him, Vic.") :en "Leave him, Vic.")
(say mother :eo "La fonto de amuzo estas senzorga risko!" (💬:say mother :eo "La fonto de amuzo estas senzorga risko!"
:en "The root of all of joy is careless, unthinking risk!") :en "The root of all of joy is careless, unthinking risk!")
(say father :eo "Tielas la animokerno de la kartoj." (💬:say father :eo "Tielas la animokerno de la kartoj."
:en "Such is the nature of the cards.")))))) :en "Such is the nature of the cards."))))))
(defun flashback-casino-outro (map) (defun flashback-casino-outro (map)
(start-dialogue (start-dialogue
(say 'flashback-casino-dealer (💬:say 'flashback-casino-dealer
:eo "Nu, ĉiu krom li, metu viajn vetaĵojn. Ni komencos je la Nula Epoko!" :eo "Nu, ĉiu krom li, metu viajn vetaĵojn. Ni komencos je la Nula Epoko!"
:en "As for the rest of you, place your bets. It's time for the Zeroth Era!") :en "As for the rest of you, place your bets. It's time for the Zeroth Era!")
(list (make-leave-flashback-state map)))) (list (make-leave-flashback-state map))))