(set: $ATK to 2)(set: $HP to 10)(set: $DEF to 2)
(set: $woods to 0)(set: $woodHP to (random: 3,7))
(set: $cut to 0)
(set: $meat to 0)(set: $stake to 0)
당신은 고기가 먹고 싶어졌다...
[[고기를 먹자!|main]](forget-undos:-1)
가진 나무 수 : $woods 개
가진 장작 수 : $cut 개
가진 고기 수 : $meat 개
가진 스테이크 수 : $stake 개
무엇을 할까?
[[사냥|hunt]]
[[나무 베기|wood]]
(link:"장작 패기")[(if:$woods is 0)[팰 나무가 없다.](else:)[(go-to:"cutting")]]
(link:"고기 굽기")[(if:$meat is 0)[구울 고기가 없다.](else-if:$cut is 0)[장작이 없다.](else:)[(go-to:"cook")]]
(link:"스테이크 먹기!")[(if:$stake is 0)[먹을 스테이크가 없다.](else:)[(go-to:"eat")]]
[[세이브/로드|save]](set: $dmg to 0)(forget-undos:-1)
사냥을 준비하자...
어떤 사냥감을 노릴까?
당신의 능력치
체력 : $HP, 공격력 : $ATK, 방어력: $DEF
(link-replace: "송아지")[(link: "체력: 15, 공격력 : 0, 방어력 : 0, 보정치: 1d4")[(set:$enehp to 15)(set:$eneatk to 0)(set:$enedef to 0)(set:$ene to 4)(set: $curhp to $HP)(set:$enecur to $enehp)(go-to:"att")]]
(link-replace: "큰 소")[(link: "체력: 20, 공격력 : 1, 방어력 : 1, 보정치: 1d6")[(set:$enehp to 20)(set:$eneatk to 1)(set:$enedef to 1)(set:$ene to 6)(set: $curhp to $HP)(set:$enecur to $enehp)(go-to:"att")]]
(link-replace: "미노타우르스")[(link: "체력: 50, 공격력 : 5, 방어력 : 1, 보정치: 1d10")[(set:$enehp to 50)(set:$eneatk to 5)(set:$enedef to 1)(set:$ene to 10)(set: $curhp to $HP)(set:$enecur to $enehp)(go-to:"att")]]
[[돌아가기|main]](forget-undos:-1)
(if:$woodHP is 0)[(set: $woods to $woods +1)(print:"나무를 얻었다! \n\n 가진 나무 수 : " + (str: $woods))](else:)[(print:"나무를 베자. \n\n 나무의 남은 체력 : "+ (str: $woodHP))]
(if:$woodHP is 0)[(link:"새 나무 찾기")[(set: $woodHP to (random: 3,7))(go-to:"wood")]](else:)[(link:"도끼질!")[(set: $woodHP to $woodHP - 1)(go-to:"wood")]]
[[돌아가기|main]]
(set: _howcut to (random: 1,2))(set: _going to 0)(forget-undos:-1)
장작을 패자!!
가진 나무 수 : $woods
가진 장작 수 : $cut
(box:"X")|a>[??? 방향으로 패야 한다!]
(click-replace: "???")[(if: _howcut is 1)[세로](else:)[가로]]
(link: "나무", (action: 'mouseout'))[(go-to: "cutting")] (link: "나무", (action: 'mouseout'))[(if: _howcut is 1)[좋아!(set:_going to _going+1)(if: _going is 3)[(set: $woods to $woods - 1)(set: $cut to $cut + 2)(if: $woods is 0)[(go-to: "main")](else:)[(go-to: "cutting")]]](else:)[(go-to: "cutting")]] (link: "나무", (action: 'mouseout'))[(go-to: "cutting")]
(link: "나무", (action: 'mouseout'))[(if: _howcut is 2)[좋아!(set:_going to _going+1)(if: _going is 3)[(set: $woods to $woods - 1)(set: $cut to $cut + 2)(if: $woods is 0)[(go-to: "main")](else:)[(go-to: "cutting")]]](else:)[(go-to: "cutting")]] (link: "나무", (action: 'mouseout'))[좋아!(set:_going to _going+1)(if: _going is 3)[(set: $woods to $woods - 1)(set: $cut to $cut + 2)(if: $woods is 0)[(go-to: "main")](else:)[(go-to: "cutting")]]] (link: "나무", (action: 'mouseout'))[(if: _howcut is 2)[좋아!(set:_going to _going+1)(if: _going is 3)[(set: $woods to $woods - 1)(set: $cut to $cut + 2)(if: $woods is 0)[(go-to: "main")](else:)[(go-to: "cutting")]]](else:)[(go-to: "cutting")]]
(link: "나무", (action: 'mouseout'))[(go-to: "cutting")] (link: "나무", (action: 'mouseout'))[(if: _howcut is 1)[좋아!(set:_going to _going+1)(if: _going is 3)[(set: $woods to $woods - 1)(set: $cut to $cut + 2)(if: $woods is 0)[(go-to: "main")](else:)[(go-to: "cutting")]]](else:)[(go-to: "cutting")]] (link: "나무", (action: 'mouseout'))[(go-to: "cutting")]
[[돌아가기|main]]요리를 시작하자!
(forget-undos:-1)
가진 고기 수 : $meat 개
가진 장작 수 : $cut 개
(link: "고기 1개 굽기")[(set: $cook to 1)(go-to: "fire")]
(if: $meat >= 5 and $cut >= 5)[(link: "고기 5개 굽기")[(set: $cook to 5)(go-to: "fire")]]
(if: $meat >= 2 and $cut >= 2 )[(link: "고기 전부 굽기")[if($meat >= $cut)[(set: $cook to $cut)](else:)[(set: $cook to $meat)](go-to: "fire")]]
[[돌아가기|main]]$dmg 의 피해를 주었다!(set: $enecur to $enecur - $dmg)(if:$enecur <= 0)[(go-to: "win")]
적 능력치
체력 : $enecur / $enehp, 공격력 : $eneatk, 방어력 : $enedef
당신의 능력치
체력 : $curhp / $HP, 공격력 : $ATK, 방어력: $DEF
(set: $dmg to $eneatk + (random: 1, $ene))
적이 $dmg의 피해를 주려 한다!
(link: "회피를 시도한다!")[(set: $defty to 1)(go-to: "defres")]
(link: "방어를 시도한다!")[(set: $defty to 2)(go-to: "defres")]
(if: $atsk)[(go-to: "att")]
(forget-undos:-1)$dmg 의 피해를 입었다!(set: $curhp to $curhp - $dmg)(if:$curhp <= 0)[(go-to: "lose")]
적 능력치
체력 : $enecur / $enehp, 공격력 : $eneatk, 방어력 : $enedef
당신의 능력치
체력 : $curhp / $HP, 공격력 : $ATK, 방어력: $DEF
당신의 차례다, 무엇을 할까?
(link: "기습 일격!(1d4, 방어불가)")[(set: $atsk to false)(set: $dmg to $ATK + (random: 1, 4))(go-to: "defe")]
(link: "가벼운 공격(1d6)")[(set: $atsk to false)(set: $dmg to $ATK + (random: 1, 6))(go-to: "attres")]
(link: "전력 강타!!(1d10, 자신 방어 스킵)")[(set: $atsk to true)(set: $dmg to $ATK + (random: 1, 10))(go-to: "attres")]
(forget-undos:-1)적은 $dmg의 피해로 공격을 시도한다!
(set:_en to 0)(set:_al to 0)
당신은 |a>[타입]를 시도한다!
당신의 |a>[타입]력 : (link: "???")[(set:_al to $DEF+(random: 1,6))_al(if: _en is not 0 and _al is not 0)[(replace: ?b)[확인]]]
적의 공격력 : (link: "???")[(set:_en to $eneatk+(random: 1,$ene))_en(if: _en is not 0 and _al is not 0)[(replace: ?b)[확인]]]
(replace: ?a)[(if: $defty is 1)[회피](else:)[방어]]
|b>[]
(click-replace:?b)[(if: $defty is 1)[(if: _al < _en)[당신은 |a>[타입]에 실패했다! 피해는 $dmg!](else:)[당신은 |a>[타입]에 성공했다! 피해는 0!(set: $dmg to 0)]](else:)[(if: _al < _en)[(set: $dmg to $dmg - _en)당신은 |a>[타입]에 실패했다! 피해는 $dmg!](else:)[(set: $dmg to $eneatk + 1)]당신은 |a>[타입]에 성공했다! 피해는 $dmg!](print: "\n\n")[[다음|att]](replace: ?a)[(if: $defty is 1)[회피](else:)[방어]]]
(forget-undos:-1)당신은 $dmg의 피해로 공격을 시도한다!
(set: _deft to (random: 1,2))(set:_en to 0)(set:_al to 0)
적은 |a>[타입]를 시도한다!
적의 |a>[타입]력 : (link: "???")[(set:_en to $enedef+(random: 1,$ene))_en(if: _en is not 0 and _al is not 0)[(replace: ?b)[확인]]]
나의 공격력 : (link: "???")[(set:_al to $ATK+(random: 1,6))_al(if: _en is not 0 and _al is not 0)[(replace: ?b)[확인]]]
(replace: ?a)[(if: _deft is 1)[회피](else:)[방어]]
|b>[]
(click-replace:?b)[(if: _deft is 1)[(if: _al > _en)[적은 |a>[타입]에 실패했다! 피해는 $dmg!](else:)[적은 |a>[타입]에 성공했다! 피해는 0!(set: $dmg to 0)]](else:)[(if: _al > _en)[(set: $dmg to $dmg - _en)적은 |a>[타입]에 실패했다! 피해는 $dmg!](else:)[(set: $dmg to $ATK + 1)적은 |a>[타입]에 성공했다! 피해는 $dmg!]](print:"\n\n")[[다음|defe]](replace: ?a)[(if: _deft is 1)[회피](else:)[방어]]]
(forget-undos:-1)(set:_get to (random: 1, $ene))
(set: $meat to $meat + _get)
이겼다! 고기 _get개를 얻었다!
가진 고기 수 : $meat 개
[[돌아가기|main]]
(forget-undos:-1)
패배했다... 다음을 기약하자!
[[돌아가기|main]]
(forget-undos:-1)(set: _done to 0)(forget-undos:-1)
|a>[고기가 구워진다... 조금만 기다리자... ]
(live: 3s)[(set: _done to _done + 1)(append: ?a)[(either: "조금만 더... ", "기다리자... ", "구워진다... ", "인내심을 갖자... ", "불은 불이요 고기는 고기로다... ")(if: _done is $cook)[(replace: ?a)[다 구워졌다!](replace: ?b)[돌아가기](stop:)]]]
|b>[]
(click: ?b)[(set: $meat to $meat - $cook)(set: $cut to $cut - $cook)(set: $stake to $stake + $cook)(go-to:"main")]가진 스테이크 수 : $stake
얼마나 먹을까?
(link: "1개 먹기")[(set: $eat to 1)(go-to: "yum")]
(if: $stake >= 5)[(link: "5개 먹기")[(set: $eat to 5)(go-to: "yum")]]
(if: $stake >= 2)[(link: "전부 먹기")[(set: $eat to $stake)(go-to: "yum")]]
[[돌아가기|main]]
(forget-undos:-1)(if: $eat is 0)[(go-to: "main")](forget-undos:-1)
$eat 개 남았다.
|y>[... 이 맛은!!!! ]
(live: 10ms)[(append: ?y)[(either: "아름답고","지고하고","예술적이고","환상적이고","강렬하고","고귀하고","수려하고","곱고","청미하고","단화하고","기려하고","빛나고")](if: time > 1s) [(append: ?y)[지금껏 먹어본 모든 고기의 맛을 압도하는 맛!](stop:)]]
(after:1s)[
(link: "그리고 체력이 3 오르는 듯한 맛이다!")[(set: $HP to $HP + 3)(set: $eat to $eat - 1)(set: $stake to $stake -1)(go-to: "yum")](print:"\n")
(link: "그리고 공격력이 1 오르는 듯한 맛이다!")[(set: $ATK to $ATK + 3)(set: $eat to $eat - 1)(set: $stake to $stake -1)(go-to: "yum")](print:"\n")
(link: "그리고 방어력이 1 오르는 듯한 맛이다!")[(set: $DEF to $DEF + 3)(set: $eat to $eat - 1)(set: $stake to $stake -1)(go-to: "yum")](print:"\n")
](link:"슬롯 1 세이브")[(if:(save-game:"A"))[세이브 성공!](else: )[세이브에 실패했습니다. 기타 원인을 확인해주세요.]]
(link:"슬롯 2 세이브")[(if:(save-game:"B"))[세이브 성공!](else: )[세이브에 실패했습니다. 기타 원인을 확인해주세요.]]
(if: (saved-games: ) contains "A")[(link: "슬롯 1 로드")[(load-game:"A")]]
(if: (saved-games: ) contains "B")[(link: "슬롯 2 로드")[(load-game:"B")]]
[[돌아가기|main]]
(forget-undos: -1)