?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. ;       В│ВнВчВ╠ЛGР▀    FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░))
  2. ;               ГVБ[ГУБ@ВTВOВP
  3. ;               Ч╤К╘КwНZБ@ВPБ|В`СхМИРэБIЧщОqВЦВУП╦Оq
  4.  
  5.         INCLUDE SUPER_S.INC
  6.  
  7. START:
  8.         DW      SCTBL,MSGTBL,COMTBL,VNTBL,ENDTBL
  9. SCTBL:
  10.         DW      S1, S2, S3
  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,    NN1,NN2,-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. ;NN1:   DB      1,      'ЧщОq',0
  33. NN1:    DB      1,      'REIKO',0
  34. ;NN2:   DB      2,      'П╦Оq',0
  35. NN2:    DB      2,      'SHOKO',0
  36.  
  37.  
  38. ;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
  39. S1:             DW      VV2, NN1,  2, M2, M3, M4                ;ШbВ╖Б@ЧщОqВR
  40. S2:             DW      VV2, NN2,  3, M5, M6, M7                ;ШbВ╖Б@П╦ОqВR
  41. S3:             DW      VV1, -1,  1, M8, M9             ;МйВщ
  42.  
  43.  
  44. ;ГCГjГVГГГЛГБГbГZБ[ГW
  45. M1:
  46.         DB      BGM,6
  47.         BAK_INIT 'AB_36_4'
  48. ;       DB      'БEБEБEФ~ЙJВрВаВпВ╜ВUМОЙ║П{БB'
  49.         DB      "It's late June. The month-long Japanese rainy season has"
  50.         DB      CR
  51.         DB      "just started."
  52.         DB      NEXT
  53.         DB      "I hate this time of year. That's why I'm happy the entire"
  54.         DB      CR
  55.         DB      "school is off to Hokkaido for our school camp, because"
  56.         DB      CR
  57.         DB      "Hokkaido is far enough north to not have rainy season."
  58.         DB      NEXT
  59. ;       DB      'Бy%001БzБFБEБEБEБEБEБEВдБ[ВёБEБEБEБEБEБE'
  60.         DB      "%001:  Hmmm..."
  61.         DB      NEXT
  62. ;       DB      'Й┤В═БAР^В┴ФТВвОЖВ╠СOВ┼ЪXВшР║ВЁПуВ░В─ВвВ╜БB'
  63.         DB      "I was struggling over a blank sheet of paper, trying to"
  64.         DB      CR
  65.         DB      "figure out what to write."
  66.         DB      NEXT
  67.         DB      BUF,B_COPY01
  68.         TU_CG 'CT14','S',0,37,2
  69.         TU_CG 'CT08','S',0,0,3
  70.         T_CG 'CT07','S',0,23,4
  71.         DB      ANI,A_ON,3
  72.         DB      ANI,A_ON,2
  73. ;       DB      'БyМbИ╦Ф№БzБFБEБEБEВ╟ВдБHМИВ▄В┴В╜БH'
  74.         DB      "Meimi:  Well? Did you decide?"
  75.         DB      NEXT
  76. ;       DB      'Бy%001БzБFВвВёВтБAВ▄В╛БB'
  77.         DB      "%001:  No, not yet."
  78.         DB      NEXT
  79. ;       DB      'БyРпИдБzБFЦ╛У·В╠ТйВ▄В┼В╔ТёПoВ┼В╖ВйВчБAСБВ▀В╔ПСВвВ─Й║В│ВвВ╦БB'
  80.         DB      "Seia:  You have to turn your paper in by tomorrow morning,"
  81.         DB      CR
  82.         DB      "so you'd better hurry."
  83.         DB      NEXT
  84. ;       DB      'Бy%001БzБFХкВйВ┴В─ВщВ┴В─БB'
  85.         DB      "%001:  I know that."
  86.         DB      NEXT
  87. ;       DB      'БyР╜БzБFВ╗ВёВ╚ВрВёБAВ╧В┴В╧В┴В╞ПСВвВ┐В▄ВжВ┴В─БB'
  88.         DB      "Makoto:  Why are you taking so long?"
  89.         DB      NEXT
  90. ;       DB      'В╜ВйВ╛ВйБAЧ╤К╘КwНZВ╠Ф╟МИВ▀В╛ВыБ`ВкБB'
  91.         DB      "Makoto:  Just decide the people you want to be in the same "
  92.         DB      CR
  93.         DB      "group with at camp and write it on the form."
  94.         DB      NEXT
  95. ;       DB      'БEБEБEСхС╠БAКєЦ]Т╩ВшВ╔В╚ВщВ╞В═М└ВчВ╦Б`ВёВ╛БBВ╞В┴В╞В╞ЩrВ▀В┐В▄ВжБB'
  96.         DB      "Makoto:  You don't even know if you'll get to be with them,"
  97.         DB      CR
  98.         DB      "anyway."
  99.         DB      NEXT
  100. ;       DB      'Бy%001БzБFВ╗ВчВ▄Б`В╗Б`В╛ВкБEБEБEБEБEБE'
  101.         DB      "%001:  You're right..."
  102.         DB      NEXT
  103.         DB      ANI,A_INIT
  104.         DB      BUF,B_COPY01
  105.         TU_CG 'CT03','S','K',10,2
  106.         T_CG 'CT01','S','K',35,4
  107.         DB      ANI,A_ON,2
  108. ;       DB      'БyЧщОqБzБF%001ВнБ`ВёБI',CR
  109.         DB      "Reiko:  %001!"
  110.         DB      PAUSE
  111.         DB      CR
  112. ;       DB      'БyФ№ППБzБF%001РцФyБI'
  113.         DB      "Mio:  %001!"
  114.         DB      NEXT
  115. ;       DB      'БyЧщОqБEФ№ППБzБFВиТЛИъППВ╔РHВ╫ВцВ┴БI'
  116.         DB      "Mio & Reiko:  Let's eat lunch together!"
  117.         DB      NEXT
  118.         T_CG1 'CT02','S','K',0,3
  119.         DB      ANI,A_ON,4
  120.         DB      ANI,A_ON,2
  121. ;       DB      'БyР┤Ф№БzБFБEБEБEВаВчБAЧщОqВ│ВёФ№ППВ│ВёБAВ▒ВёВ╔В┐В═БB'
  122.         DB      "Kiyomi:  Hello, Reiko and Mio. How are you?"
  123.         DB C_BLD,C_N_ON,2,2
  124.         DB      ERASE,E_GFLG,10,100,101,102,103,104,105,106,107,108,109 ;ПДЙёГNГКГA
  125.         DW      0000H
  126.  
  127. M8:             ;МйВщ
  128. ;       DB      'БEБEБEВ▒Б[ВфБ[В╠В┴В─БAРlВ╔МйВчВъВ─ВщВ╞ПСВпВ╦Б[ВцВ╚БEБEБE'
  129.         DB      "I can't decide who I want to be grouped with at camp"
  130.         DB      CR
  131.         DB      "right now. There're too many people around."
  132.         DW      0000H
  133.  
  134. M9:             ;МйВщВQ
  135. ;       DB      'В╚ВёВйБEБEБEЛєЛCВкГvГЙГYГ}Й╗В╡В─В╦ВеВйБH'
  136.         DB      "The air's getting hot, wouldn't you say?"
  137.         DW      0000H
  138.  
  139. M2:             ;ШbВ╖Б@ЧщОqВP
  140. ;       DB      'БyЧщОqБzБFВ╦Вж%001МNБEБEБEЧ╤К╘КwНZВ╠КєЦ]БAПСВвВ╜БH'
  141.         DB      "Reiko:  %001, did you decide who you wanted to be with at camp?"
  142.         DB      NEXT
  143. ;       DB      'Бy%001БzБFВвВёВтБAВ▄В╛БB'
  144.         DB      "%001:  No, not yet."
  145.         DB      NEXT
  146. ;       DB      'БyЧщОqБzБFВ╛В┴В╜Вч',CR
  147.         DB      "Reiko:  In that case......."
  148.         DB      ANI,A_INIT
  149.         DB      BUF,B_COPY01
  150.         T_CG 'CT04','S','K',10,1
  151. ;       DB      'БyП╦ОqБzБFВаВ╜В╡В╠Ц╝СOПСВвВ─ВеБI'
  152.         DB      CR
  153.         DB      "Shoko:  Choose me, okay?"
  154.         DB      NEXT
  155. ;       DB      'Бy%001БzБFБEБEБEБEБEБEБEБEБE'
  156.         DB      "%001:  .................................."
  157.         DB      NEXT
  158. ;       DB      'БyЧщОqБzБFБEБEБEБEБEБEБEБEБE'
  159.         DB      "Reiko:  .................................."
  160.         DB      NEXT
  161. ;       DB      'БyП╦ОqБzБFВаВчВчВЯБHВ╟В╡В╜В╠ВзВ▌ВёВ╚БAМ┼В▄В┴В╜ВшВ╚ВёВйВ╡В─ВеБ`БH'
  162.         DB      "Shoko:  Huh? What did I say? Everyone got so serious all"
  163.         DB      CR
  164.         DB      "of the sudden."
  165.         DB      NEXT
  166.         DB      ANI,A_OFF
  167.         T_CG1 'CT01','S','D',35,2
  168.         DB      ANI,A_ON,1
  169. ;       DB      'БyЧщОqБzБFВ╡БAП╦ОqБIВаВёВ╜В╟В┴ВйВчЧNВвВ─ЧИВ╜В╠ВцВ┴БIБH'
  170.         DB      "Reiko:  Shoko! What are you doing here?!"
  171.         DB      NEXT
  172.         K_CG 'CT04','D',10,3
  173.         DB      ANI,A_ON,2
  174. ;       DB      'БyП╦ОqБzБFВаБAЧщОqВ┐ВсВёВ╨В┴В╟Б`ВвБBВаВ╜В╡ВбБAВ┌Б[В╙ВчВ╢ВсВ╚ВвВрВёБI'
  175.         DB      "Shoko:  If you're allowed to be here, I am too!"
  176.         DB      NEXT
  177. ;       DB      'БyЧщОqБzБFГ{Б[ГtГЙВ╠Х√ВкГ}ГVВцВ┴БIВаВёВ╜В▌В╜ВвВ╔В╞В▒ВыН\ВэВ╕ПoВ─В▒В╚ВвВйВчВ┴БI'
  178.         DB      "Reiko:  No, you aren't! Now off with you!"
  179.         DB      NEXT
  180.         K_CG 'CT04','I',10,4
  181.         DB      ANI,A_ON,2
  182. ;       DB      'БyП╦ОqБzБFБEБEБEЧщОqВ┐ВсВёБAВ╨В╟ВвБEБEБEВаВ╜В╡БAЛГВвВ┐ВсВдВгБB'
  183.         DB      "Shoko:  You're so mean, Reiko! I... I'm going to cry!"
  184.         DB      NEXT
  185. ;       DB      'БyЧщОqБzБFЙRЛГВлВ╡В╚ВвВ┼В┴В┴БI'
  186.         DB      "Reiko:  I said leave!"
  187.         DB      FLG,F_COPYI,1,1
  188.         DB      FLG,F_COPYI,2,1
  189.         DB C_BLD,C_N_OFF,2,2
  190.         DW      0000H
  191.  
  192. M3:             ;ШbВ╖Б@ЧщОqВQ
  193. ;       DB      'БyЧщОqБzБF%001МNБIВ▒ВёВ╚В╠У№ВъВ╜ВчГНГNВ╚ОЦВ╔В╚ВчВ╚ВвВэВцБI'
  194.         DB      "Reiko:  %001, never mind Reiko, okay? She's not worth talking"
  195.  
  196.         DB      CR
  197.  
  198.         DB      "to."
  199.         DB      NEXT
  200.         K_CG 'CT04','D',10,5
  201.         DB      ANI,A_ON,2
  202. ;       DB      'БyП╦ОqБzБFВаБ`БIВ╗ВъВ┴В─ВеБuВ╤В┌ВдВ┐ВхБ[В╡ВуБ[БvВ┴В─М╛ВдВ╠ВцВзБH'
  203.         DB      "Shoko:  Ah! I can't believe you said that! That's *slender*!"
  204.         DB      NEXT
  205. ;       DB      'БyР┤Ф№БzБFБEБEБEВаВ╠БEБEБEВ╗ВъВЁМ╛ВдВ╚ВчБuФюцОТЖПЭБvВ┼В═БEБEБE'
  206.         DB      "Kiyomi:  Excuse me, I think the word you're looking for"
  207.         DB      CR
  208.         DB      "is *slander*."
  209.         DB      NEXT
  210. ;       DB      'БyП╦ОqБzБFВ╞В╔ВйВнВдБIВ┐ВхВ┴В╞В╨В╟ВвВ┴В─К┤В╢ВбБ`БI'
  211.         DB      "Shoko:  Whatever. She's so mean. I hate her!"
  212.         DB      NEXT
  213. ;       DB      'БyЧщОqБzБFВ╗Б[ВфБ[ОЦВ═БAОйХкВ╠ИлНsВЁРUВшХ╘В┴В─ВйВчМ╛ВвВ╚В│ВвБI'
  214.         DB      "Reiko:  As if you're perfect."
  215.         DB      NEXT
  216.         K_CG 'CT04','K',10,6
  217.         DB      ANI,A_ON,2
  218. ;       DB      'БyП╦ОqБzБFВ╙ВщВ╙ВщБBВаВ╜В╡ВбБAИлВвВ▒В╞В╚ВёВ─В╡В─В╚ВвВрБ`ВёБB'
  219.         DB      "Shoko:  I'm not perfect, but I'm not mean like you."
  220.         DB      NEXT
  221. ;       DB      'БyЧщОqБzБFЙRВиВ┴В╡ВсВвВ┴В┴БIБI'
  222.         DB      "Reiko:  Liar!"
  223.         DB      FLG,F_COPYI,2,2
  224.         DW      0000H
  225.  
  226. M4:             ;ШbВ╖Б@ЧщОqВR
  227. ;       DB      'БyЧщОqБzБF%001МNБEБEБEРрЦ╛ЙяВ╠ОЮВ╠В▒В╞БAЦYВъВ─В╚ВвВэВцВ╦БH'
  228.         DB      "Reiko:  %001, you haven't forgotten about what happened"
  229.         DB      CR
  230.         DB      "the first week, have you?"
  231.         DB      NEXT
  232. ;       DB      'Бy%001БzБFБEБEБEВдБAВдВёБB'
  233.         DB      "%001:  ......No."
  234.         EF_SET 101
  235.         DW      0000H
  236.  
  237. M5:             ;ШbВ╖Б@П╦ОqВP
  238.         K_CG 'CT04','K',10,6
  239.         DB      ANI,A_ON,2
  240. ;       DB      'БyП╦ОqБzБFВ╦ВеВ╦ВеВ╡ВуБ`МNБEБEБEВаВ╜В╡В╠НьВ┴В╜ГJГМБ[БAРHВ╫В╜ВнВ╚ВЯВвБH'
  241.         DB      "Shoko:  %001, I want to make curry for you. Would that"
  242.         DB      CR
  243.         DB      "make you happy?"
  244.         DB      NEXT
  245. ;       DB      'БyЧщОqБzБF%001МNБAО~В▀В─ВиВвВ╜Х√ВкВвВвВэВцБB'
  246.         DB      "Reiko:  I wouldn't if I were you, %001."
  247.         DB      PAUSE
  248. ;       DB      'П╦ОqВ╠Ч┐ЧЭБAМАЦЄВ╛ВйВчБB'
  249.         DB      " Shoko's cooking is"
  250.         DB      CR
  251.         DB      "horrible."
  252.         DB      NEXT
  253.         K_CG 'CT04','D',10,5
  254.         DB      ANI,A_ON,2
  255. ;       DB      'БyП╦ОqБzБFВ╘Б`БAЙ╜В╔ВрНьВъВ╚ВвВцВшГ}ГVВ╛ВрБ`ВёБB'
  256.         DB      "Shoko:  At least I can cook! What can you do?"
  257.         DB      NEXT
  258. ;       DB      'БyЧщОqБzБFВ╚ВёВ┼В╖В┴В─ВжБI'
  259.         DB      "Reiko:  What did you say to me?"
  260.         DB      NEXT
  261. ;       DB      'Бy%001БzБFБEБEБEБEБEБEГ}ГVВ╚В╠ВйБH'
  262.         DB      "%001:  Did she say 'at least'....?"
  263.         DB      FLG,F_COPYI,3,1
  264.         DW      0000H
  265.  
  266. M6:             ;ШbВ╖Б@П╦ОqВQ
  267.         K_CG 'CT04','K',10,6
  268.         DB      ANI,A_ON,2
  269. ;       DB      'БyП╦ОqБzБFВ╦ВеВ╦ВеВ╡ВуБ`МNБBВаВ╜В╡В╞ВзБAЦщВ╠КCК▌В┼Ве'
  270.         DB      "Shoko:  %001, %001, do you want to take a romantic walk"
  271.         DB      CR
  272.         DB      "on the beach tonight?"
  273.         DB      NEXT
  274. ;       DB      'БyЧщОqБzБFВаВёВ╜В╠ПъНЗВ═БwГGГНГ`ГbГNБxВ┼В╡ВхБH'
  275.         DB      "Reiko:  Don't you mean *erotic* walk?"
  276.         DB      NEXT
  277. ;       DB      'БyП╦ОqБzБFБEБEБEВрБ`БAЧщОqВ┐ВсВёВ┴В╜ВчБEБEБEВжВ┴В┐БB'
  278.         DB      "Shoko:  Oh, Reiko. You're such a bad woman."
  279.         DB      NEXT
  280. ;       DB      'БyЧщОqБzБFБEБEБEБEБEБEВаВ╚В╜В╔В╛ВпВ═М╛ВэВъВ╜ВнВ╚ВвВэВ╦БA'
  281.         DB      "Reiko:  Keep your observations to yourself, thanks."
  282.         DB      NEXT
  283. ;       DB      'Бy%001БzБFБEБEБEБEБEБEБEБEБE'
  284.         DB      "%001:  ............................"
  285.         DB      NEXT
  286. ;       DB      'БiБEБEБEВ╚ВёВйБAЙ╬ЦЄМ╔В╔ВвВщВцБ[В╚ЛCВкВ╡В─ЧИВ╜БEБEБEБj'
  287.         DB      ".............They're really going at it."
  288.         DB      FLG,F_COPYI,3,2
  289.         DW      0000H
  290.  
  291. M7:             ;ШbВ╖Б@П╦ОqВR
  292. ;       DB      'БyП╦ОqБzБFБEБEБEВ╞В╔ВйВнВгБAВаВ╜В╡В╞БuВ╣ВвВ╡ВуВёБvВ╡В▄В╡ВхБH'
  293.         DB      "Shoko:  Shuji...I've got the ice cubes."
  294.         DB      NEXT
  295. ;       DB      'Бy%001БzБFБEБEБEБEБEБEНlВжВ╞ВнБEБEБEБEБEБE'
  296.         DB      "%001:  ........Great."
  297.         EF_SET 102
  298.         DW      0000H
  299.  
  300. M_EXIT:         ;
  301.         DB      FLG,F_AND,255,101,102
  302.         DB      FLG,F_EXIT,255
  303.         DB      NEXT
  304. ;       DB      'ВлБ[ВёВ▒Б[ВёВйБ[ВёВ▒Б[Вё'
  305.         DB      "*DING DONG DING DONG*"
  306.         DB      NEXT
  307. ;       DB      'Бy%001БzБFБEБEБEВаБAГxГЛВ╛БB'
  308.         DB      "%001:  Ah, it's the bell."
  309.         DB      NEXT
  310. ;       DB      'БyП╦ОqБzБFБEБEБEВ╗ВъВ╢ВсВ╡ВуБ`МNБAВ▄В╜В╦ВёБЩ'
  311.         DB      "Shoko:  Okay, well, I'll see you later."
  312.         DB      NEXT
  313. ;       DB      'БyЧщОqБzБFБEБEБEБEБEБEВ╞В╔ВйВнБAП╦ОqВ╠Ц╝СOВ╛ВпВ═ПСВвВ┐ВсГ_ГБВцБI'
  314.         DB      "Reiko:  Whatever you do, don't write Shoko's name on that"
  315.  
  316.         DB      CR
  317.  
  318.         DB      "paper!"
  319.         DB      NEXT
  320.         B_P1 B_SUDA
  321. ;       DB      'Бy%001БzБFБEБEБEБEБEБEБEБEБE'
  322.         DB      "%001:  ..........."
  323.         DB      PAUSE
  324. ;       DB      'В╙ВдБB'
  325.         DB      "Hmmmm."
  326.         DB      NEXT
  327.         DB      SINARIO,'CS501_1.OVL',0
  328.         DW      0000H
  329.  
  330.  
  331. end