?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1. ;       В│ВнВчВ╠ЛGР▀    FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░))
  2. ;               ГVБ[ГУБ@ВUВPВO
  3. ;               ВRУ·В▀Тй
  4.  
  5.         INCLUDE SUPER_S.INC
  6.  
  7. START:
  8.         DW      SCTBL,MSGTBL,COMTBL,VNTBL,ENDTBL
  9. SCTBL:
  10.         DW      S1, S2
  11. MSGTBL:
  12.         DW      M1
  13. COMTBL:
  14.         DW      CM1, CM2
  15. VNTBL:
  16.         DW      V_FNAME,N_FNAME
  17. ENDTBL:
  18.  
  19.         INCLUDE "V_NAME00.INC"                  ; 0=NoCommand , 1-49=NormalCommand
  20.         INCLUDE "N_NAME00.INC"                  ; 50-99=HseenCommand
  21.  
  22. ;       Б@Б@Б@ УоОМБ@Б@Ц╝ОММQ
  23. CM1:    DW      VV1,    -1
  24. CM2:    DW      VV2,    -1
  25.  
  26. ;VV1:   DB      1,      'МйВщ',0
  27. VV1:    DB      1,      "LOOK",0
  28. ;VV2:   DB      2,      'ШbВ╖',0
  29. VV2:    DB      2,      "TALK",0
  30.  
  31. ;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
  32. S1:             DW      VV1, -1,  1, M2, M3             ;МйВщ
  33. S2:             DW      VV2, -1,  2, M4, M5, M6         ;ШbВ╖
  34.  
  35.  
  36. ;ГCГjГVГГГЛГБГbГZБ[ГW
  37. M1:
  38.         DB      BGM,2
  39.         BAK_INIT 'AB_17_1'
  40. ;       DB      'БEБEБEВ╗В╡В─ЦщВкЦ╛ВпВ─БAЛ}чпМИТшВ│ВъВ╜ЙУЙjСхЙяУЦУ·БB'
  41.         DB      ".....So the day of the hastily-arranged swim competition"
  42.         DB      CR
  43.         DB      "dawned."
  44.         DB      NEXT
  45.         DB      BUF,B_COPY01
  46.         TU_CG 'CT01','M',0,20,2
  47.         TU_CG 'CT14','M','D',40,1
  48.         T_CG 'CT08','M',0,0,3
  49.         DB      ANI,A_ON,2
  50.         DB      ANI,A_ON,1
  51. ;       DB      'БyР╜БzБFВ▄ВЯБ[В┴В╜ВнБAВиСOВ═ВыВнВ╚В▒В╞В╡В╦ВеВ╚ВаБI'
  52.         DB      "Makoto:  I can't believe you suggested something like a"
  53.         DB      CR
  54.         DB      "swimming competition to the dean!"
  55.         DB      NEXT
  56. ;       DB      'Бy%001БzБFЙ┤В╛В┴В─В▒ВёВ╚ОЦВ╔В╚ВщВ╞В═ОvВэВ╚ВйВ┴В╜В┴В─В╠БI'
  57.         DB      "%001:  Do you really think I wanted this to happen?"
  58.         DB      NEXT
  59. ;       DB      'БyЧщОqБzБFВ▄ВаВвВвВ╢ВсВ╚ВвБBВ╚ВёВ─М╛В┴В─ВрП▄ХiВ═Й─ЛxВ▌В╠ИъПTК╘ЙДТ╖В╚В╠ВцБI'
  60.         DB      "Reiko:  Well, yeah. But nevertheless the prize is an"
  61.         DB      CR
  62.         DB      "extra week of summer vacation!"
  63.         DB      NEXT
  64.         DB      ANI,A_OFF
  65.         T_CG1 'CT14','M',0,40,4
  66.         DB      ANI,A_ON,2
  67.         DB      ANI,A_ON,3
  68. ;       DB      'БyР╜БzБFВ╗ВшВсБAЧщОqВ│ВёВ═К╘ИсВвЦ│ВнВPИ╩В╛ВыВдВпВ╟БEБEБE'
  69.         DB      "Makoto:  Well, sure, since you'll come in first anyway."
  70.         DB      NEXT
  71. ;       DB      'БyМbИ╦Ф№БzБFПуИ╩ВQВOЦ╝ВйВЯБEБEБEЛ╖ВлЦхВцВ╦БB'
  72.         DB      "Meimi:  The first twenty, that's pretty tight."
  73.         DB      NEXT
  74. ;       DB      'Бy%001БzБFФ▒ГQБ[ГАВ┴В─В╟ВёВ╚ВёВ╛ВыБB'
  75.         DB      "%001:  I wonder what the punishment is."
  76.         DB      NEXT
  77. ;       DB      'БyР╜БzБFНZТ╖В╠ФMБ`ВвГLГbГXВ╞ВйБEБEБE'
  78.         DB      "Makoto:  Maybe a kiss from the dean..."
  79.         DB      NEXT
  80.         DB      ANI,A_OFF
  81.         K_CG 'CT08','I',0,5
  82.         DB      ANI,A_ON,2
  83.         DB      ANI,A_ON,4
  84. ;       DB      'БyМbИ╦Ф№БzБFВдВ┴ВэВЯБ`БEБEБE'
  85.         DB      "Meimi:  Yecccchhh..."
  86.         DB      NEXT
  87. ;       DB      'Бy%001БzБFБEБEБEОАВёВ╛Х√ВкГ}ГVВ╛В╚БB'
  88.         DB      "%001:  Probably be easier just to lay down and die."
  89.         DB      NEXT
  90.         DB      ANI,A_OFF
  91.         K_CG 'CT01','D',20,6
  92.         DB      ANI,A_ON,4
  93.         DB      ANI,A_ON,5
  94. ;       DB      'БyЧщОqБzБFГ_ГБВц%001МNБIЦ╜ВЁСeЦЦВ╔В╡В┐ВсБI'
  95.         DB      "Reiko:  No, %001! Life must be a struggle!"
  96.         DB      NEXT
  97. ;       DB      'БiБHБ@ЧщОqВ│ВёБAЦ┌ВкГ}ГWВ╛БEБEБEБj'
  98.         DB      ".......What's up with Reiko...?"
  99.         DB C_BLD,C_V_ON,2
  100.         DW      0000H
  101.  
  102. M2:             ;МйВщ
  103.         DB      ANI,A_INIT
  104.         DB      BUF,B_COPY01
  105.         T_CG 'CT12','M',0,25,1
  106. ;       DB      'БyНбУ·ОqБzБFВ═Б`ВвБAКFВ│ВёТНЦ┌Б`БI'
  107.         DB      "Kyoko:  Okay, attention, everybody!"
  108.         DB      NEXT
  109. ;       DB      'Бy%001БzБFВвВцВвВцВйБEБEБE'
  110.         DB      "%001:  I guess this is it..."
  111.         DB      NEXT
  112. ;       DB      'БyНбУ·ОqБzБFВжБ`БAНЁУ·У╦СRМИВ▄В┴В╜ЙУЙjСхЙяВ═БAУ╦СRТЖО~В╔В╚ВшВ▄В╡В╜БB'
  113.         DB      "Kyoko:  The swimming competition announced yesterday"
  114.         DB      CR
  115.         DB      "will be cancelled."
  116.         DB      NEXT
  117. ;       DB      'БyЧщОqБzБFВ╟ВдВ╡В─В┼В╖ВйБIБH'
  118.         DB      "Reiko:  Why?!"
  119.         DB      NEXT
  120. ;       DB      'БyНбУ·ОqБzБFМ╛ВвПoВ╡В┴В╪В╠НZТ╖РцР╢ВкБAВ╫ВыВёВ╫ВыВёВ╔РМВ┴ХеВ┴В╜В▄В▄ЦщВ╠КCВ╔НsВ┴В─БAВ╗В╠В▄В▄ЛAВ┴В─ЧИВ─В╚ВвВйВчВ┼В╖БB'
  121.         DB      "Kyoko:  Well, that silly dean got really drunk last"
  122.         DB      CR
  123.         DB      "night and went for a swim, but he never came back."
  124.         DB      NEXT
  125. ;       DB      'Бy%001БzБFВ╗ВъВ┴В─БEБEБEСхОЦМПВ╢ВсВ╦Б[В╠БIБH'
  126.         DB      "%001:  But......that's terrible!"
  127.         DB      NEXT
  128.         K_CG 'CT12','K',25,2
  129. ;       DB      'БyНбУ·ОqБzБFСхПфХvБAВ╚Б`ВёВ╔ВрРSФzЦ│ВвВэБB'
  130.         DB      "Kyoko:  Oh, it's nothing to worry about."
  131.         DB      NEXT
  132. ;       DB      'БyНбУ·ОqБzБFВ╜В╛В╡БAНбУ·В═ВаВ╠ПмУЗВ╔Л▀В├ВвВ─В═Г_ГБВцБB'
  133.         DB      "Kyoko:  However, don't try to go near the little island"
  134.         DB      CR
  135.         DB      "today."
  136.         DB      NEXT
  137. ;       DB      'БyР╜БzБFВ╟Б[В╡В─В┼В╖ВйБH'
  138.         DB      "Makoto:  Why not?"
  139.         DB      NEXT
  140. ;       DB      'БyНбУ·ОqБzБFВ╟Б[В╡В─ВрВ┼В╖БB'
  141.         DB      "Kyoko:  Because."
  142.         DB      NEXT
  143. ;       DB      'БyР╜БzБFБEБEБEВцБ[В╖ВщВ╔БAВаВ╠УЗВ╔ВвВщВёВ╛В╚НZТ╖РцР╢ВкБB'
  144.         DB      "Makoto:  So, you're saying that the dean is over"
  145.         DB      CR
  146.         DB      "there."
  147.         DB      NEXT
  148. ;       DB      'БyМbИ╦Ф№БzБFВ╫ВыВёВ╫ВыВёВ╔РМВвТ╫В╡В╜МуБAВаВ╠УЗВ╔О╠В─В─ЧИВ╜В╠В╦БB'
  149.         DB      "Meimi:  You got him drunk, brought him to the island and "
  150.         DB      CR
  151.         DB      "left him there."
  152.         DB      NEXT
  153. ;       DB      'Бy%001БzБFЛ│РEИїВрСSИїОQЙ┴В┴В─В╠ВкВвВтВ╛В┴В╜ВёВ╛ВыБ[В╚БB'
  154.         DB      "%001:  The professors didn't want to participate in the"
  155.         DB      CR
  156.         DB      "competition, huh?"
  157.         DB      NEXT
  158. ;       DB      'БyЧщОqБzБFРцР╢ТBВрБAВрВдОсВнВ╚ВвВрВ╠В╦БEБEБE'
  159.         DB      "Reiko:  I guess you professors are kind of old for that..."
  160.         DB      NEXT
  161. ;       DB      'БyНбУ·ОqБzБFБEБEБEВ╗В▒БAР├ВйВ╔В╡В╚В│ВвВ╦БB'
  162.         DB      "Kyoko:  Be quiet, over there!"
  163.         DB      NEXT
  164. ;       DB      'Бy%001БzБFВ╓Б`ВвБB'
  165.         DB      "%001:  All right."
  166.         DB      NEXT
  167. ;       DB      'БyНбУ·ОqБzБFВ╞В╔ВйВнБAЙУЙjСхЙяВ═ТЖО~БB',CR,'В╗Б[ВфБ[ОЦВ┼БAНбУ·ВрР▀УxВЁОчВ┴В─ОйЧRВ╔НsУоВ╡В─Й║В│ВвБB'
  168.         DB      "Kyoko:  Anyway, there's no swim competition. So, as you"
  169.         DB      CR
  170.         DB      "were, do as you please today."
  171.         DB      NEXT
  172. ;       DB      'Бy%001БzБFПХВйВ┴В╜БEБEБEБB'
  173.         DB      "%001:  That's good news."
  174.         DB C_BLD,C_V_OFF,2      ;ШbВ╖
  175.         DB      FLG,F_COPYI,1,1
  176.         DW      0000H
  177.  
  178. M3:             ;МйВщ
  179. ;       DB      'МйВ╜В╞В▒ВыБAЙУЙjСхЙяВкТЖО~В╔В╚В┴В─КьВёВ┼ВщУzВ╠Х√ВкС╜РФФhВчВ╡ВвБB'
  180.         DB      "Everyone was relieved to have the swimming competition"
  181.         DB      CR
  182.         DB      "cancelled."
  183.         DB      NEXT
  184. ;       DB      'Й┤ВрВрВ┐ВыВёКьВёВ┼ВщБB'
  185.         DB      "Of course I was happy about it."
  186.         DW      0000H
  187.  
  188. M4:             ;ШbВ╖
  189.         DB      ANI,A_INIT
  190.         DB      BUF,B_COPY01
  191.         TU_CG 'CT01','M',0,20,2
  192.         TU_CG 'CT14','M',0,40,1
  193.         T_CG 'CT08','M','K',0,3
  194.         DB      ANI,A_ON,2
  195.         DB      ANI,A_ON,1
  196. ;       DB      'БyМbИ╦Ф№БzБFВёВ╢ВсБAВаВ╜В╡В═ЙjВвВ┼ВнВщВ╦БB'
  197.         DB      "Meimi:  Well, I'm going swimming."
  198.         DB      NEXT
  199. ;       DB      'БyР╜БzБFВ╗Б[ВвВжВ╬БEБEБEХ╨КДВъВ═В╟ВдВ╡В╜БH'
  200.         DB      "Makoto:  Hey, what happened to your other half?"
  201.         DB      NEXT
  202. ;       DB      'БyМbИ╦Ф№БzБFБEБEБEРпИдВ╠В▒В╞БH'
  203.         DB      "Meimi:  ...You mean Seia?"
  204.         DB      NEXT
  205. ;       DB      'БyР╜БzБFС╝В╔ВвВ╦ВеВ╛ВыБB'
  206.         DB      "Makoto:  Who else?"
  207.         DB      NEXT
  208.         K_CG 'CT14','D',40,4
  209.         DB      ANI,A_ON,2
  210.         DB      ANI,A_ON,3
  211.         DB      "Meimi:  She's just like %001. Seia can't swim."
  212.         DB      NEXT
  213. ;       DB      'Бy%001БzБFВ╓ВеБEБEБEЛgУcВрГJГiГdГ`В╚ВёВ╛БB'
  214.         DB      "%001:  So, Seia can't swim either?"
  215.         DB      NEXT
  216. ;       DB      'БyМbИ╦Ф№БzБFВвВыВвВыУ┴МPВ╡В╜ВёВ╛ВпВ╟БAСSСRЙjВ░ВщВцВдВ╔В╚ВчВ╚ВнВ─БB'
  217.         DB      "Meimi:  She's taken all kinds of classes, but she just can't"
  218.         DB      CR
  219.         DB      "get the hang of it."
  220.         DB      NEXT
  221.         K_CG 'CT14','K',40,5
  222.         DB      ANI,A_ON,2
  223.         DB      ANI,A_ON,3
  224. ;       DB      'БyР╜БzБFЛ│ВжХ√ВкИлВвВёВ╢ВсВ╚ВвБHТЖЦьВ═ЧРЦ\В╛ВйВчВ╚Б`'
  225.         DB      "Makoto:  Well, some people just aren't cut out for sports."
  226.         DB      NEXT
  227.         K_CG 'CT08','D',0,6
  228.         DB      ANI,A_ON,2
  229.         DB      ANI,A_ON,5
  230. ;       DB      'БyМbИ╦Ф№БzБFВ╚ВёВ┼В╖В┴В─Б[В┴БI'
  231.         DB      "Meimi:  What did you say...?"
  232.         DB      NEXT
  233. ;       DB      'БyР╜БzБFВиВ┴В╞БAВтВ╫ВеБI'
  234.         DB      "Makoto:  Oh....OUCH!"
  235.         DB      NEXT
  236.         DB      BUF,B_COPY01
  237.         T_CG 'CT01','M',0,20,2
  238. ;       DB      'УёРlВ═КCВ╠Х√В╔СЦВ┴В─ВвВ┴В─БAВ╗В╠В▄В▄В╟ВёВ╟ВёЙлВ╠Х√В╔ЙjВвВ┼НsВ┴В─В╡В▄В┴В╜БB'
  239.         DB      "The two of them went running towards the ocean and"
  240.         DB      CR
  241.         DB      "plunged into the water."
  242.         DB      NEXT
  243. ;       DB      'Бy%001БzБFБEБEБEМ│ЛCВ╛В╚ВаВвВ┬ВчБB'
  244.         DB      "%001:  .....Well, they're full of energy."
  245.         DB      FLG,F_COPYI,2,1
  246.         DW      0000H
  247.  
  248. M5:             ;ШbВ╖
  249. ;       DB      'БyЧщОqБzБF%001МNБAНбУ·В▒В╗ЙjВмВЁБEБEБEБB'
  250.         DB      "Reiko:  %001, we should probably try some swimming today."
  251.         DB      NEXT
  252.         T_CG1 'CT07','M','I',0,7
  253.         DB      ANI,A_ON,2
  254. ;       DB      'БyРпИдБzБFЧщОqРцФyБI'
  255.         DB      "Seia:  Reiko!"
  256.         DB      NEXT
  257. ;       DB      'УВУ╦В╔БAЛgУcВкМ╗ВэВъВ╜БB'
  258.         DB      "Seia suddenly appeared."
  259.         DB      NEXT
  260. ;       DB      'БyЧщОqБzБFВ╚БAВ╚В╔ВйВ╡ВчБH'
  261.         DB      "Reiko:  W- What's up?"
  262.         DB      NEXT
  263. ;       DB      'БyРпИдБzБFВэВ╜ВнВ╡В╔БAЙjВмВЁЛ│ВжВ─Й║В│ВвБI'
  264.         DB      "Seia:  Please teach me how to swim!"
  265.         DB      NEXT
  266. ;       DB      'БyЧщОqБzБFВжБEБEБE'
  267.         DB      "Reiko:  But I..."
  268.         DB      NEXT
  269. ;       DB      'Бy%001БzБFВ╗Б[ВвВтБAЛgУcВрЙjВ░В╦Б[ВёВ╛В┴В╜В╚БB'
  270.         DB      "%001:  So you can't swim either, Seia?"
  271.         DB      NEXT
  272. ;       DB      'БyРпИдБzБFВ═ВвБEБEБE'
  273.         DB      "Seia:  That's right."
  274.         DB      NEXT
  275. ;       DB      'БyРпИдБzБFВ╣В┴ВйВнМbИ╦Ф№В┐ВсВёВкЛ│ВжВ─ВнВъВщВ╠В╔БAПнВ╡ВрРiХрВкЦ│ВнВ─БEБEБEБBВ▒В╠В▄В▄В┼В═МbИ╦Ф№В┐ВсВёВ╔Р\В╡ЦєВ╚ВвВ╠В┼В╖БB'
  276.         DB      "Seia:  Meimi's been teaching me, but I haven't gotten"
  277.         DB      CR
  278.         DB      "any better. I don't want to keep bothering Meimi."
  279.         DB      NEXT
  280. ;       DB      'Бy%001БzБFВ╗ВйБEБEБEЧщОqВ│ВёБAЛgУcВ╔ЙjВмВЁЛ│ВжВ─ВтВ┴В─БB',CR,'ВлВ┴В╞Й┤ВцВшВ═СfО┐ВаВщВ╞ОvВдВ╡БB'
  281.         DB      "%001:  Well, Reiko, why don't you teach Seia? I'm sure"
  282.         DB      CR
  283.         DB      "she has more talent than I do."
  284.         DB      NEXT
  285. ;       DB      'БyРпИдБzБFВцВыВ╡ВнВиКшВвТvВ╡В▄В╖ВэБB'
  286.         DB      "Seia:  Please, won't you teach me?"
  287.         DB      NEXT
  288. ;       DB      'БyЧщОqБzБFБEБEБEВжВжБAВрВ┐ВыВёВвВвВэВцБB'
  289.         DB      "Reiko:  ......Okay, okay."
  290.         DB      NEXT
  291. ;       DB      'Бy%001БzБFВ╢ВсБAЙ┤В═В╗В╠Х╙В┼ФwТЖВ┼ВрП─ВнВэБB'
  292.         DB      "%001:  Well, I'm going to go get some sunbathing in over"
  293.         DB      CR
  294.         DB      "there."
  295.         DB      NEXT
  296.         B_O B_SUDA
  297. ;       DB      'Й┤В═ЧщОqВ│ВёТBВ╔ОшВЁРUВ┴В─БAКCЙИВвВ╔ХрВвВ─ВвВ┴В╜БB'
  298.         DB      "I waved to them and walked along the water."
  299.         DB      NEXT
  300.         DB      ANI,A_INIT
  301.         DB      BUF,B_COPY01
  302.         T_CG 'CT03','M',0,12,1
  303. ;       DB      'БyФ№ППБzБF%001РцФyБI'
  304.         DB      "Mio:  %001!"
  305.         DB      NEXT
  306. ;       DB      'Бy%001БzБFВаБAФ№ППВ┐ВсВёБB'
  307.         DB      "%001:  Oh, Mio."
  308.         DB      NEXT
  309. ;       DB      'В╡В╬ВчВнХрВвВ╜В╞В▒ВыВ┼БAФ№ППВ┐ВсВёВ╞ЙяВ┴В╜БB'
  310.         DB      "After a bit, I ran into Mio."
  311.         DB      FLG,F_COPYI,2,2
  312.         DW      0000H
  313.  
  314.  
  315. M6:             ;ШbВ╖
  316. ;       DB      'БyФ№ППБzБF%001РцФyБEБEБEИъППВ╔ТкК▒ОыВшБAВ╡В╚ВвБH'
  317.         DB      "Mio:  %001....do you want to go looking for clams?"
  318.         DB      NEXT
  319. ;       DB      'Бy%001БzБFВвБ[ВцБBВ┐ВхВдВ╟ГqГ}В╛В┴В╜В╡БB'
  320.         DB      "%001:  Sure. I happen to have some free time right now."
  321.         DB      NEXT
  322.         K_CG 'CT03','K',12,2
  323. ;       DB      'БyФ№ППБzБFВаВ═В┴БAВтВ┴В╜БI'
  324.         DB      "Mio:  Great!"
  325.         DB      NEXT
  326. ;       DB      'БyФ№ППБzБFНsВ▒В┴БAРцФyБI'
  327.         DB      "Mio:  Let's go!"
  328.         DB      NEXT
  329. ;       DB      'Ф№ППВ┐ВсВёВ═Й┤В╠ШrВЁВоВвВоВвИ°В┴ТгВ┴В─ВвВ┴В╜БB'
  330.         DB      "Mio grabbed my arm and dragged me with her."
  331.         DB      NEXT
  332.         B_O B_WIPE
  333.         DB SINARIO,'CS611.OVL',0
  334.         DW      0000H
  335.  
  336.  
  337. end
  338.