Subversion Repositories NedoOS

;       В│ВнВчВ╠ЛGР▀      FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░))
;               ГVБ[ГУБ@
;               Ф№ППВ╞ЧxВщ

        INCLUDE SUPER_S.INC

START:
        DW      SCTBL,MSGTBL,COMTBL,VNTBL,ENDTBL
SCTBL:
        DW      S1, S2, S3, S4, S5
MSGTBL:
        DW      M1
COMTBL:
        DW      CM1, CM2, CM3, CM4
VNTBL:
        DW      V_FNAME,N_FNAME
ENDTBL:

        INCLUDE "V_NAME00.INC"                  ; 0=NoCommand , 1-49=NormalCommand
        INCLUDE "N_NAME00.INC"                  ; 50-99=HseenCommand

;       Б@Б@Б@ УоОМБ@Б@Ц╝ОММQ
CM1:    DW      VV1,    NN1,NN2,-1
CM2:    DW      VV2,    NN1,-1
CM3:    DW      VV3,    -1
CM4:    DW      VV4,    -1

;VV1:   DB      1,      'МйВщ',0
VV1:    DB      1,      'LOOK',0
;VV2:   DB      2,      'ШbВ╖',0
VV2:    DB      2,      'TALK',0
;VV3:   DB      3,      'НlВжВщ',0
VV3:    DB      3,      'THINK',0
;VV4:   DB      4,      'ЧxВщ',0
VV4:    DB      4,      'DANCE',0

;NN1:   DB      1,      'Ф№ПП',0
NN1:    DB      1,      'MIO',0
;NN2:   DB      2,      'В▄ВэВш',0
NN2:    DB      2,      'AROUND',0

;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
S1:             DW      VV1, NN1,  1, M2, M3            ;МйВщБ@Ф№ПП
S2:             DW      VV1, NN2,  2, M4                ;МйВщБ@В▄ВэВш
S3:             DW      VV2, NN1,  3, M5, M6            ;ШbВ╖Б@Ф№ПП
S4:             DW      VV3, -1,  4, M7         ;НlВжВщ
S5:             DW      VV4, -1,  5, M8, M9, M10, M11           ;ЧxВщ


;ГCГjГVГГГЛГБГbГZБ[ГW
M1:
        DB      BGM,24
        BAK_INIT 'AB_27_2'
        DB BUF,B_COPY01
        T_CG "CT03","C",0,10,1
        ;       DB      'БyФ№ППБzБFВаБEБEБE%001РцФyБEБEБE'
        DB      "Mio:  Ah, %001..."
        DB      NEXT
        ;       DB      'Бy%001БzБFВтБAВтВаБAФ№ППВ┐ВсВёБB'
        DB      "%001:  Hi, Mio."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВ╟БAВ╟ВдВ╡В╜ВёВ┼В╖ВйБH'
        DB      "Mio:  Is anything wrong?"
        DB      NEXT
        ;       DB      'Бy%001БzБFВвВтБAВаВ╠БEБEБEФ№ППВ┐ВсВёВ═Г_ГУГXБAВ┼ВлВщБH'
        DB      "%001:  No, I just wanted to ask you... Do you know"
        DB      CR
        DB      "how to dance?"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВжБEБEБEВ┼БAВ┼ВлБAВ┼ВлВщВцБB'
        DB      "Mio:  Um, a little."
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEЙ┤В╔БEБEБEЛ│ВжВ─Ч~В╡ВвВёВ╛БB'
        DB      "%001:  Would you teach me?"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВжБEБEБEВаВ╜В╡БEБEБEБHБEБEБEБEБEБEВдВёБIВвВвВцБI'
        DB      "Mio:  Me? Sure, I'll do it."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ╢БAВ╢ВсВаБAНsВ▒ВдВйБB'
        DB      "%001:  Thanks. Let's go."
        DB      NEXT
        ;       DB      'БEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБE'
        DB      "............................................."
        DB      NEXT
        DB      BGM,8
        E_CG B_FADE,'AE_035'
        ;       DB      'Й┤В═Ф№ППВ┐ВсВёВ╔Г_ГУГXВЁЛ│ВэВ┴В─ВвВщБB'
        DB      "Mio's teaching me how to dance."
        DB      NEXT
        ;       DB      'Р│Т╝В╚ШbБAЙ┤В═Г_ГУГXВкВ┼ВлВ╚ВвБB'
        DB      "When I told her I didn't know how to dance, I was telling"
        DB      CR
        DB      "the truth."
        DB      NEXT
        ;       DB      'БEБEБEТPВ╔МoМ▒ВкВ╚ВйВ┴В╜В╣ВвВ╛В┴В╜ВшВ╖ВщБB'
        DB      "I just never had the chance to learn."
        DB      NEXT
        ;       DB      'ВвВ┤ЧxВ┴В─В╡В▄ВжВ╬В╟ВдВ╔ВйВ╚ВщБAВ╞ВйОvВ┴В╜В╠В═К├ВйВ┴В╜ВчВ╡ВвБB'
        DB      "I always thought it was something you could pick up"
        DB      CR
        DB      "without any special lessons, but I was wrong."
        DB      NEXT
        ;       DB      'В╚В╔ВкВ╚ВёВ╛ВйХкВйВчВ╕В╔ГIГНГIГНВ╡В─ВвВщЙ┤В╔БAФ№ППВ┐ВсВёВ═РhХ°ЛнВнХtВлНЗВ┴В─ВнВъВ─ВвВщБB'
        DB      "Mio's a good teacher."
        DW      0000H
        
M2:             ;МйВщБ@Ф№ПП
        ;       DB      'Й┤В╔Г_ГУГXВЁЛ│ВжВ─ВнВъВ─ВщБB'
        DB      "She's teaching me how to dance."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВ┘ВчБA%001РцФyБI'
        DB      "Mio:  %001, you have to pay attention to your feet!"
        DB      NEXT
        ;       DB      'Бy%001БzБFВаБAВ▓В▀ВёБI'
        DB      "%001:  Oh, sorry."
        DB      FLG,F_COPYI,1,1
        DW      0000H
        
M3:             ;МйВщБ@Ф№ПП
        ;       DB      'В┐ВсВёВ╞МйВ─В╚ВлВсВэВйВёВ╚ВвВпВ╟БEБEБE'
        DB      "If I stare at her, she'll get angry again."
        DB      NEXT
        ;       DB      'В┌Б[В┴В╞МйВ─ВщВ╞У{ВчВъВщВ╝БB'
        DB      "I've got to do it casually."
        DW      0000H
        
M4:             ;МйВщБ@В▄ВэВш
        ;       DB      'НбВ═В▄ВэВшВ╠В▒В╞ВцВшВрГ_ГУГXВЁКoВжВщВ▒В╞ВкРцМИВ╛БB'
        DB      "After I learn how to dance, I'll waste time looking at"
        DB      CR
        DB      "the other people."
        DW      0000H
        
M5:             ;ШbВ╖Б@Ф№ПП
        ;       DB      'Бy%001БzБFВ▓В▀ВёВ╚БAФ№ППВ┐ВсВёБEБEБE'
        DB      "%001:  I'm sorry, Mio."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFСSСRХ╜ЛCВ╛ВцБI'
        DB      "Mio:  Don't worry about it!"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВ│БA%001РцФyБIОЯВ═В▒ВдБEБEБEВтВ┴В─В▌В─БI'
        DB      "Mio:  Okay, not, try doing this..."
        DB      NEXT
        ;       DB      'Бy%001БzБFВжБEБEБEВ╞БAВ▒ВдВйВ╚БH'
        DB      "%001:  Is this right?"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВдВёБAВ╗ВдБI'
        DB      "Mio:  Yes, that's good."
        DB      FLG,F_COPYI,3,1
        DW      0000H
        
M6:             ;ШbВ╖Б@Ф№ПП
        ;       DB      'Бy%001БzБFВаВшВкВ╞БAФ№ППВ┐ВсВёБB'
        DB      "%001:  Thanks, Mio."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВжБHВтВ╛БA%001РцФyБAВ▄В╛ПIВэВ┴В─В╚ВвВцБH'
        DB      "Mio:  Why are you thanking me? I'm not done teaching you"
        DB      CR
        DB      "yet."
        DB      NEXT
        ;       DB      'Бy%001БzБFВаВаБEБEБEВ╗ВдВ╛В╦БB'
        DB      "%001:  Oh, you're right."
        DW      0000H
        
M7:             ;НlВжВщ
        ;       DB      'В╗БAВ╗ВёВ╚Ч]ЧTВ═В╚ВвВ╝БEБEБE'
        DB      "I don't have time for that."
        DW      0000H
        
M8:             ;ЧxВщ
        ;       DB      'БyФ№ППБzБFВдВдВёБAИсВдВцБA%001РцФyБAВ▒В▒В═БAВ▒ВдВ╛ВцБAВ▒ВдБB'
        DB      "Mio:  No, that's wrong. Try your left foot this way."
        DB      NEXT
        ;       DB      'Бy%001БzБFВжБHВ▒БAВ▒ВдБH',PAUSE,CR,'БiВ║БAВ║ВёВ║ВёХкВйВчВёБj'
        DB      "%001:  Is this right? ",PAUSE,CR,"(I don't know what the hell I'm doing.)"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВдВёБAВ╗ВдБIВтВ┴В╧ВшРцФyБAХиКoВжВкВвВвВ╚ВаБB'
        DB      "Mio:  Yes, that's good. You're really a fast learner."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ╗БAВ╗ВдБH',PAUSE,CR,'БiНбВ╠БAВ╟В▒ВкИсВ┴В╜ВёВ╛ВыВдБj'
        DB      "%001:  Really? ",PAUSE,CR,"(How is what I'm doing now different from what I was just"
        DB      CR
        DB      "doing?)"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВ╗ВдБAВ╗ВдБEБEБEВаБI%001РцФyБAВ╗В▒БAВ▒ВдВ╛ВцБI'
        DB      "Mio:  Yes, you're great. Oops, that's wrong..."
        DB      NEXT
        ;       DB      'Бy%001БzБFВжБHВ▒БAВ▒ВдВйВ╚БH',PAUSE,CR,'БiВтВ┴В╧ВшХкВйВчВёВ╚ВаБj'
        DB      "%001:  Um, is this right? ",PAUSE,CR,"(I don't know what she wants me to do!)"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВдВёБAВ╗ВдБI'
        DB      "Mio:  That's right!"
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEБEБEБE'
        DB      "%001:  ................................."
        DB      NEXT
        ;       DB      'БiВ╟В▒ВкИсВдВёВ╛ВыВдБHБj'
        DB      "I don't understand dancing!"
        DB      FLG,F_COPYI,5,1
        DW      0000H
        
M9:             ;ЧxВщ
        ;       DB      'БyФ№ППБzБFВ╗ВдБAВ╗В╠Т▓ОqБIВтВ┴В╧ВшБA%001РцФyВ┴В─В╖В▓ВвВцБI'
        DB      "Mio:  You're great, %001!"
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEВ╓В╓БAУЦСRБB',PAUSE,CR,'БiБEБEБEО└В═ВаВёВ▄ВшВцВнХкВйВ┴В─В╚ВвВёВ╛ВпВ╟БEБEБEБj'
        DB      "%001:  ....Of course, ha ha. ",PAUSE,CR,"(I don't know what she's so happy about...)"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВжВ┴В╞БAОЯВ═В▒ВдБI'
        DB      "Mio:  Okay, let's try the next step."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ╚ВёВ╛БAК╚ТPВ╛В╚БBВ▒ВдВйВ┴БB'
        DB      "%001:  Hey, this is really easy.....Whoops!"
        DB      NEXT,GATA,1
        ;       DB      'В╕В┼Б`ВёБB'
        DB      "*CRASH*"
        DB      NEXT
        ;       DB      'Бy%001БzБFВвВ─В─В─В─БEБEБEВаВъБH'
        DB      "%001:  Ouch."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFБEБEБE%001РцФyБAСхПфХvБH'
        DB      "Mio:  .....%001, are you alright?"
        DB      NEXT
        ;       DB      'Бy%001БzБFВаБAВаВаБAСхПфХvБBБiВ╚ВёВ┼У]ВёВ╛ВёВ╛БHЙ┤Бj'
        DB      "%001:  Yes, I'm fine. I wonder what happened back there."
        DB      FLG,F_COPYI,5,2
        DW      0000H
        
M10:            ;ЧxВщ
        ;       DB      'БyФ№ППБzБFОЯВ═БAВ▒ВдБEБEБEВ╦БH'
        DB      "Mio:  Next, try this."
        DB      NEXT
        ;       DB      'Бy%001БzБFВдВёБBВжБEБEВ╞БAВ▒ВдБH'
        DB      "%001:  Is this right?"
        DB      NEXT
        ;       DB      'ВоВчБEБEБE'
        DB      "*SLIP*"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВаБIВаВ╘В╚ВвБA%001В╣ВёВ╧БEБEБEБI'
        DB      "Mio:  Oh! Be careful, %001!"
        DB      NEXT
        ;       DB      'Бy%001БzБFВиВ┴В╞В┴В╞БI'
        DB      "%001:  ....Not again!"
        DB      NEXT
        ;       DB      'В▄В╜ГXГbУ]В╤В╗ВдВ╔В╚В┴В╜Й┤ВЁБAФ№ППВ┐ВсВёВкОxВжВ─ВнВъВ╜БB'
        DB      "Almost falling, I managed to grab ahold of Mio at the last"
        DB      CR
        DB      "moment."
        DB      NEXT
        ;       DB      'Бy%001БzБFВаБ`В╘В╦ВеБBВаВшВкВ╞В╚Ф№ППВ┐ВсВёБEБEБEБH'
        DB      "%001:  That was dangerous. I almost went down again."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВаБEБEБE'
        DB      "Mio:  %001..."
        DB      NEXT
        ;       DB      'БEБEБEФ№ППВ┐ВсВёВ╠КчВкБAВэВ╕ВйВRГZГУГ`В╠ЛЧЧгВ╔ВаВ┴В╜БB'
        DB      "My face was just an inch away from Mio's."
        DB      NEXT
        ;       DB      'ИъПuВ╠Т╛Ц┘БB',PAUSE,'Й┤ТBВ═ВаВэВ─В─ФЄВ╤В╠ВвВ╜БB'
        DB      "There was a silence. ",PAUSE,"And then I moved away from her."
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEВ┬БAС▒ВпВцВдВйБA',PAUSE,'БEБEБEЧxВшВ╠Ч√ПKБB'
        DB      "%001:  .....Well, l- let's get on with the dance lessons."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFБEБEБEВдБAВдВёБB'
        DB      "Mio:  ......Okay."
        DB      FLG,F_COPYI,5,3
        DW      0000H
        
M11:            ;ЧxВщ
        ;       DB      'БyФ№ППБzБFВ╖В▓ВвВ╖В▓ВвБAВрВдВ┘В╞ВёВ╟Кор°В╛В╦БI'
        DB      "Mio:  You're almost perfect!"
        DB      NEXT
        ;       DB      'Бy%001БzБFВжБHВ╗Б[ВйВ╚БH'
        DB      "%001:  Really? I don't know about that."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВдВёБAВ▄В╛В┐ВхВ┴В╞КыВ╚В┴ВйВ╡ВвВпВ╟БAВ│В┴ВлВцВшВ═РПХкПуОшВ╔В╚В┴В╜ВцБA%001В╣ВёВ╧БEБEБE'
        DB      "Mio:  You're still a little wobbly, but you've improved"
        DB      CR
        DB      "a lot."
        DB      NEXT,GATA,1
        ;       DB      'В╕В┼Б`ВёБB'
        DB      "*SMASH*"
        DB      NEXT
        ;       DB      'Бy%001БzБFВвВ─В─В─В─БEБEБE'
        DB      "%001:  Ouch!"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFБEБEБE%001РцФyБAВ╨ВхВ┴В╞В╡В─ЧVВёВ┼ВщБHБA'
        DB      "Mio:  .....%001, are you doing that on purpose?"
        DB      NEXT
        ;       DB      'Бy%001БzБFВвВтБEБEБEВэВ┤В╞В╢ВсВ╚ВвВёВ╛ВпВ╟БEБEБE'
        DB      "%001:  No, I'm not..."
        DB      NEXT
        ;       DB      'БEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБEБE'
        DB      "................................................"
        DB      NEXT
        ;       DB      'Й┤В═Ф№ППВ┐ВсВёВ╠ВиВйВ░В┼В╟ВдВ╔ВйРlХ└В╔ЧxВъВщВцВдВ╔В╚В┴В╜БB'
        DB      "Thanks to Mio I was soon able to dance with the other"
        DB      CR
        DB      "dancers."
        DB      NEXT
        ;       DB      'БEБEБEФ№ППВ┐ВсВёВкЙ┤В╔НЗВэВ╣В─ВнВъВщВйВчВ╛ВпВ╟БB'
        DB      "Although Mio was helping me quite a bit."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFБEБEБEРцФyВ┴В─БAГzГУГgВ╔В╖ВоВ╔В╚ВёВ┼ВрПoЧИВ┐ВсВдВёВ╛БEБEБEБB'
        DB      "Mio:  %001, you're really a fast learner."
        DB      NEXT
        ;       DB      'Бy%001БzБFЙ┤ВкВ▒ВдВ╡В─ЧxВъВщВ╠В═БAФ№ППВ┐ВсВёВкЙ┤В╔НЗВэВ╣В─ВнВъВщВйВчВ╛ВцБBИъРlВ┼ЧxВъВ┴В─М╛ВэВъВ╜ВчВ▄В╜ГRГPВ▄ВнВщВ╛ВыБ[В╚БB'
        DB      "%001:  I couldn't do any of this on my own. It's all"
        DB      CR
        DB      "because you're leading me, keeping me from making"
        DB      CR
        DB      "mistakes."
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEВ╛ВйВчВ│БBНбУ·В═Й┤ВкГRГPВ╚ВвВцВдВ╔БAН┼МуВ▄В┼ИъППВ╔ЧxВ┴В─ВнВъВ╦Б[ВйБH'
        DB      "%001:  .....I'm going to do my best to finish the evening"
        DB      CR
        DB      "without falling anymore."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFБEБEБEВдВёБI'
        DB      "Mio:  That's good."
        DB      NEXT
        ;       DB      'БEБEБEМОЦ╛ВйВшВ╠Й║БAЙ┤В╞Ф№ППВ┐ВсВёВ═РSВфВнВ▄В┼ЧxВ┴В╜БB'
        DB      ".....In the silver moonlight, Mio and I danced and"
        DB      CR
        DB      "danced."
        DB      NEXT
        ;       DB      'НбЦщВ╠МОВЁБAЙ┤В═В╕В┴В╞ЦYВъВ╚ВвВ╛ВыВдБB'
        DB      "I'll never forget that moonlit night."
        DB      NEXT
        DB      "...................................................."
        DB      NEXT
        DB G_FLG,G_COPYI,136,1
        DB G_FLG,G_COPYF,130,130
        DB      FLG,F_CALI,130,20
        DB G_FLG,G_COPYG,130,130
        DB      SINARIO,'CS901.OVL',0
        DW      0000H


end