SVN операционной системы NedoOS для ZX-Evo

;       В│ВнВчВ╠ЛGР▀      FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░
;               ГVБ[ГУБ@ВbВrВdБQВbБQВPБ@
;               

        INCLUDE SUPER_S.INC

START:
        DW      SCTBL,MSGTBL,COMTBL,VNTBL,ENDTBL
SCTBL:
        DW      S1, S2, S3
MSGTBL:
        DW      M1
COMTBL:
        DW      CM1, CM2, CM3
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,    -1
CM2:    DW      VV2,    -1
CM3:    DW      VV3,    -1

;VV1:   DB      1,      'Х°ВлВ╡В▀Вщ',0
VV1:    DB      1,      'TAKE HER',0
;VV2:   DB      2,      'В╠В╝Вн',0
VV2:    DB      2,      'PEEK',0
;VV3:   DB      3,      'С╥В┬',0
VV3:    DB      3,      'WAIT',0

;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
S1:             DW      VV1, -1,  1, M2         ;Х°ВлТўВ▀Вщ
S2:             DW      VV2, -1,  2, M3         ;Ф`Вн
S3:             DW      VV3, -1,  3, M4, M5             ;С╥В┬ВQ


;ГCГjГVГГГЛГБГbГZБ[ГW
M1:
        DB      BGM,19
;       DB      'БEБEБEВ╗В╡В─БAПtЛxВ▌В╠ВаВщИъУ·БB'
        DB      ".....Then, one day during Spring Vacation."
        DB      NEXT
;       DB      'Й┤В═Ф№ППВ┐ВсВёВ╠Й╞В╔ЧVВ╤В╔ЧИВ╜БB'
        DB      "I went to Mio's house."
        DB      NEXT
        BAK_INIT 'AB_32'
        DB BUF,B_COPY01
        T_CG 'CT03','C','K',5,1
;       DB      'Бy%001БzБFВ▒ВёВ┐ВэБ`БB'rea
        DB      "%001:  Hello?"
        DB      NEXT
;       DB      'БyФ№ППБzБFВвВчВ┴В╡ВсВвБA%001РцФyБB'
        DB      "Mio:  Hi, %001! Come on in."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEВаВъБHВиВ╢В│ВёВ╞ВиВ╬В│ВёВ═БH'
        DB      "%001:  Where is everyone?"
        DB      NEXT
;       DB      'БyФ№ППБzБFРeР╩В╠Й╞В╔ЧVВ╤В╔НsВ┴В─ВщБB'
        DB      "Mio:  They're all away, at my grandparents'."
        DB      NEXT
;       DB      'Бy%001БzБFВ╗ВъВ╢ВсБAНбУ·В═Й┤В╜В┐УёРlВ┴ВлВшВ┴В─В▒В╞БH'
        DB      "%001:  You mean we're all alone here?"
        DB      NEXT
        K_CG 'CT03','R',5,2
;       DB      'БyФ№ППБzБFБEБEБEВдВёБEБEБE'
        DB      "Mio:  That's right."
        DB      NEXT
;       DB      'Бy%001БzБFВаБIВвВтВ╗В╠БAМИВ╡В─Х╧В╚И╙ЦбВ╢ВсВ╦Б[ВёВ╛БB'
        DB      "%001:  Wait! Don't worry, I didn't mean anything......"
        DB      NEXT
;       DB      'Бy%001БzБFВ╗ВдВ╛БAВ═ВвБIВ▒ВъБAТaР╢ГvГМГ[ГУГgБB'
        DB      "%001:  Oh, I almost forgot. Here's your birthday present."
        DB      CR
        DB      "You're twenty years old now."
        DB      NEXT
        T_CG 'CT03','C','K',5,1
;       DB      'БyФ№ППБzБFВаВшВкВ╞ВдБAКJВпВ─ВрВвВвБH'
        DB      "Mio:  Thank you, %001!  Can I open it?"
        DB      NEXT
;       DB      'Бy%001БzБFВрВ┐ВыВёБB'
        DB      "%001:  Of course."
        DB      NEXT
;       DB      'БyФ№ППБzБFБEБEБEВаВ┴БEБEБEГeГjГXГVГЕБ[ГYВ╛БI'
        DB      "Mio:  Oh! Tennis shoes!"
        DB      NEXT
;       DB      'Бy%001БzБFСOВ╠МCБAВрВдГ{ГНГ{ГНВ╛В┴В╜ВыБB'
        DB      "%001:  Your old shoes are so worn out, so I thought you'd"
        DB      CR
        DB      "like these."
        DB      NEXT
;       DB      'Бy%001БzБFФ№ППВ┐ВсВёВкИъФ╘КьВ╘ХиВ┴В┬В┴В╜ВчБAГeГjГXЧpХiВнВчВвВ╡ВйОvВвХtВйВ╚ВнВ─В╚БBБEБEБEЛCВ╔У№В┴В─ВнВъВ╜БH'
        DB      "%001:  Well, do you?"
        DB      NEXT
;       DB      'БyФ№ППБzБFВаВшВкВ╞ВдБEБEБEВ╖В┴В▓ВнВдВъВ╡ВвБEБEБE'
        DB      "Mio:  Yes, thank you... I'm so happy..."
        DB      NEXT
;       DB      'БEБEБEБEБEБEМ▀МуВVОЮБEБEБEБEБEБE'
        DB      "Later that night."
        DB      NEXT
;       DB      'Бy%001БzБFВиБAГrБ[ГtГVГ`ГЕБ[ВйБB'
        DB      "%001:  Ah, beef stew. It smells delicious."
        DB      NEXT
;       DB      'БyФ№ППБzБFРTОбМNВ╔Л│ВжВ─ВрВчВ┴В╜ВёВ╛ВпВ╟БEБEБEВиВвВ╡ВвБH'
        DB      "Mio:  Shinji taught me how to make it. Do you like it?"
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEВдВёБAВдВ▄ВвБIБI'
        DB      "%001:  Yes, it's really good!"
        DB      NEXT
;       DB      'БyФ№ППБzБFЦ{УЦБH'
        DB      "Mio:  Really?"
        DB      NEXT
;       DB      'Бy%001БzБFГzГУГgГzГУГgБAФ№ППВ┐ВсВёБAВвВвВиЙ┼В│ВёВ╔В╚ВъВщВцБB'
        DB      "%001:  Yes, it is. You'll make a good wife someday."
        DB      NEXT
        K_CG 'CT03','R',5,2
;       DB      'БyФ№ППБzБFБEБEБEРцФyВ╠БH'
        DB      "Mio:  .............Yours?"
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEБEБEБE'
        DB      "%001:  ....................."
        DB      NEXT
;       DB      'БEБEБEПчТkВ╚В╠ВйБHБEБEБE'
        DB      "......How should I answer that?"
        DB      NEXT
;       DB      'БEБEБEВ▒Б[ВфБ[ОЮВ═П╬ВжВ╬ВвВвВ╠ВйБHБEБEБE'
        DB      "Should I laugh?..."
        DB      NEXT
;       DB      'БEБEБEР^Ц╩Ц┌В╔УЪВжВщВ╠ВрХ╧В╚ЛCВкВ╖ВщВ╡БEБEБE'
        DB      "But if she's serious, and I laugh, I'll hurt her feelings..."
        DB      NEXT
;       DB      'Бy%001БzБFВжВ╞БEБEБE'
        DB      "%001:  ........Um, well..."
        DB      NEXT
;       DB      'БyФ№ППБzБFВтВ╛БAГWГЗБ[Г_ГУБAГWГЗБ[Г_ГУВ╛В┴В─В╬БIЧтВ▀В╚ВвВдВ┐В╔РHВ╫В─БB'
        DB      "Mio:  Don't look so serious, %001! I was only kidding!"
        DB      CR
        DB      "Now eat before it gets cold."
        DB      NEXT
;       DB      'Бy%001БzБFВаБAВ╗ВдВ╛В╚БEБEБE'
        DB      "%001:  Alright..."
        DB      NEXT
;       DB      'БEБEБEБEБEБEБEБEБEБEБEБE'
        DB      "....................."
        DB      NEXT
;       DB      'Бy%001БzБFВвВтВЯБAРHВ┴В╜РHВ┴В╜БEБEБEВ▓В┐В╗ВдВ│ВёБB'
        DB      "%001:  That was delicious."
        DB      NEXT
;       DB      'Бy%001БzБFВ╗ВъВ╢ВсБAВ╗ВыВ╗ВыЛAВщВэБB'
        DB      "%001:  Well, I guess I'll be off, then."
        DB      NEXT
        T_CG 'CT03','C',0,5,1
;       DB      'БyФ№ППБzБFРцФyБEБEБEБI'
        DB      "Mio:  %001...!"
        DB      NEXT
;       DB      'Бy%001БzБFВёБH'
        DB      "%001:  Yes?"
        DB      NEXT
;       DB      'БyФ№ППБzБFИъВ┬В╛ВпБEБEБEВаВ╜В╡В╠ВэВкВ▄В▄БAХ╖ВвВ─ВнВъВщБEБEБEБH'
        DB      "Mio:  Will you do something for me?"
        DB      NEXT
;       DB      'Бy%001БzБFЙ╜В╛В┴В─БAФ№ППВ┐ВсВёВ╠М╛ВдТ╩ВшВ╔В╖ВщВцБBНбУ·В═В╗Б[ВфБ[У·В╛ВыБH'
        DB      "%001:  Of course. I'd do anything for my Mio."
        DB      NEXT
        K_CG 'CT03','I',5,3
;       DB      'БyФ№ППБzБFБEБEБEЛAВчВ╚ВвВ┼БB'
        DB      "Mio:  .........Don't go home tonight."
        DB      NEXT
;       DB      'БyФ№ППБzБFНбЦщВ═БEБEБEВаВ╜В╡В╞ВвВ─БEБEБE%001РцФyБEБEБE'
        DB      "Mio:  Stay with me.... Stay with me, tonight."
        DB      BGM,13
        DB C_BLD,C_V_ON,2
        DB C_BLD,C_V_ON,3
        DW      0000H

M2:             ;Х°ВлТўВ▀Вщ
;       DB      'Бy%001БzБFБEБEБE'
        DB      "%001:  ...................."
        DB      NEXT
        E_CG B_FADE,"AE_141"
;       DB      'Й┤В═Ц│М╛В┼Ф№ППВ┐ВсВёВЁВлВ┬ВнХ°ВлТўВ▀В╜БB'
        DB      "Without saying anything, I pulled Mio to me."
        DB      NEXT
;       DB      'БyФ№ППБzБFВёВ┴БEБEБE'
        DB      "Mio:  ....%001!"
        DB      NEXT
;       DB      'Й┤В╠ШrВ╠ТЖВ┼БAФ№ППВ┐ВсВёВ╠Н╫ВвС╠ВкВ╡В╚ВщБB'
        DB      "I crushed Mio's bird-like body against me."
        DB      NEXT
;       DB      'В╗В┴В╞Ц┌ВЁХ┬В╢В╜Ф№ППВ┐ВсВёВ╔БAЙ┤В═Ц└ВэВ╕РOВЁНЗВэВ╣В╜БB'
        DB      "She closed her eyes as a signal. Wihout hesitating, I kissed"
        DB      CR
        DB      "her."
        DB      NEXT
;       DB      'БyФ№ППБzБFБEБEБEВ╙ВгБEБEБE'
        DB      "Mio:  ..........Mmmmm...."
        DB      NEXT
;       DB      'ЬТНЫВ╞В╡В╜Х\ПюВ┼БAВ╗В┴В╞Й┤ВйВчЧгВъВщФ№ППВ┐ВсВёБB'
        DB      "Finally she moved away from me slowly."
        DB      NEXT
;       DB      'БyФ№ППБzБFВаВ╜В╡БEБEБEВиХЧШCУ№В┴В─ВнВщБEБEБE'
        DB      "Mio:  I'm going to take a bath. I'll be right back."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEЙ┤ВрБEБEБEИъППВ╔У№В┴В─ВвВвВйВ╚БH'
        DB      "%001:  Can I...take one with you?"
        DB      NEXT
;       DB      'БyФ№ППБzБFБEБEБEГ_ГББEБEБEВиКшВвБAС╥В┴В─В─БEБEБE'
        DB      "Mio:  ....No, please wait here."
        DB      NEXT
        B_P1 B_SUDA
;       DB      'Ф№ППВ┐ВсВёВ═ВиХЧШCПъВ╔П┴ВжВ╜БB'
        DB      "Mio heads for the bath."
        DB C_BLD,C_V_ON,1
        DB C_BLD,C_V_OFF,2
        DB C_BLD,C_V_OFF,3
        DW      0000H

M3:             ;Ф`Вн
;       DB      'БEБEБEВ╗ВъВ═Р│МОВ╠ВаВъВ┼ТжВшВ╜В╝БEБEБE'
        DB      ".....Did you forget what happened when you did that at the"
        DB      CR
        DB      "hot springs?"
        DB      NEXT
;       DB      'С╥В┴В─В─БAВ┴В─М╛ВдВёВ╛ВйВчБAС╥В┴В─В─ВаВ░ВщВ╠ВкТjВ┴В─ВрВёВ╛ВыБH'
        DB      "She asked you to wait. Don't you think that's a better idea?"
        DW      0000H

M4:             ;С╥В┬
;       DB      'ВаБ`БEБEБEЙ┤ВрЛ┘ТгВ╖ВщВ╚БEБEБE'
        DB      "Waiting around is making me nervous, too."
        DB      NEXT
;       DB      'ВдБ`БEБEБE'
        DB      "Damn!"
        DB      NEXT
;       DB      'Й┤В═УоХиЙАВ╠М╒В▌В╜ВвВ╔БAВдВыВдВыВ╞ХрВлЙёВ┴В╜БB'
        DB      "I started pacing like a caged tiger."
        DB      FLG,F_COPYI,3,1
        DW      0000H

M5:             ;С╥В┬ВQ
;       DB      'БyФ№ППБzБFВиС╥В╜В╣БEБEБE'
        DB      "Mio:  Sorry to keep you waiting..."
        DB      NEXT
;       DB      'Бy%001БzБFВаБAВдБAВ═БAСБВйВ┴В╜В╦БEБEБE'
        DB      "%001:  That was fast."
        DB      NEXT
;       DB      'БyФ№ППБzБFВдБAВдВёБAВаВ═В═БEБEБE'
        DB      "Mio:  Yes, well..."
        DB      NEXT
;       DB      'БyФ№ППБzБFВ╣БAРцФyВрВиХЧШCУ№В┴В╜ВчБH'
        DB      "Mio:  Do...you want to take a bath, too?"
        DB      NEXT
;       DB      'Бy%001БzБFВиБAВиВдБAВ╗ВдВ╖ВщВцБB'
        DB      "%001:  .......I'll do that."
        DB      NEXT
        B_O B_SUDA
;       DB      'БEБEБEЙ┤В═ОйХкВ┼ВрР_МoО┐В╛В┴В─ОvВдВнВчВвБAФOУ№ВшВ╔СSРgВЁРЇВ┴В╜БB'
        DB      "In the shower, I washed my body thoroughly."
        DB      NEXT
;       DB      'ФMВвГVГГГПБ[В┼ЦAВЁЧмВ╡В─ВщК╘В╔ВрБAСБВнВрЙ┤В╠БEБEВвВэВфВщГAГМВ═ПАФїВnВjВ╔В╚В┴В─В╡В▄В┴В─ВщБB'
        DB      "My cock stayed hard the whole time I was washing myself."
        DB      NEXT
;       DB      'ВжВжВвБAВкВ┴В┬ВнВ╚В▌В┴В╞ВрВ╚ВвБIР├В▄ВъБAЧОВ┐ТЕВпБEБEБE'
        DB      "This is bad...I've got to calm down!"
        DB      NEXT
;       DB      'ВдВдБAЛ┘ТгВ╖ВщВ╚ВЯБEБEБEНбУ·ОqРцР╢В╔ВтВчВъВ╜ОЮВ═БAПАФїВрГNГ\ВрЦ│ВйВ┴В╜ВкБEБEБE'
        DB      "Taking time before you do it is terrible for your nerves..."
        DB      CR
        DB      "This is a lot different from when I was with Kyoko-"
        DB      CR
        DB      "sensei."
        DB      NEXT
;       DB      'ВаБEБEБEВ╚ВёВйУкВкВнВчВнВчВ╡В─ВлВ╜БEБEБE'
        DB      "What do I do? I'm too nervous!"
        DB      NEXT
;       DB      'ВаБ`Б`Б`БEБEБEВ┘ВжВ┘ВжБEБEБE'
        DB      "........Shit....!"
        DB      NEXT
        DB      "..........................."
        DB      NEXT
        DB      "Mio:  %001?"
        DB      NEXT
        DB      "Mio:  .....%001, wake up!"
        DB      NEXT
        B_P1 B_SUDA
;       DB      'Бy%001БzБFВаБEБEБEВъБH'
        DB      "%001:  What?"
        DB      NEXT
;       DB      'БyФ№ППБzБF%001РцФyБEБEБEЛCВкВ┬ВвВ╜БH'
        DB      "Mio:  %001, you're awake!"
        DB      NEXT
;       DB      'БEБEБEЛCВкВ┬ВнВ╞БAЙ┤В═ХzТcВ┼РQВ─В╜БBВ╗ВёВ╚Й┤ВЁБAФ№ППВ┐ВсВёВкРSФzВ╗ВдВ╔МйВ┬В▀В─ВвВщБB'
        DB      "When I woke up, I was lying in a futon. Mio was looking"
        DB      CR
        DB      "at me with worry in her eyes."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEЙ┤БEБEБEХЧШCВ╔У№В┴В─В─БEБEБE'
        DB      "%001:  Did I......pass out?"
        DB      NEXT
;       DB      'БyФ№ППБzБFВ╠В┌В╣В─В╜ВйВчБEБEБE'
        DB      "Mio:  ..........Yes."
        DB      NEXT
;       DB      'Бy%001БzБFВёВ┴БIБH'
        DB      "%001:  What?!"
        DB      NEXT
;       DB      'Й┤В═В═В╜В╞ЛCВкВ┬ВвВ─БAХzТcВ╠ТЖВЁВ╠В╝ВлВ▒ВёВ╛БB'
        DB      "Suddenly I sat up and looked under the blanked that"
        DB      CR
        DB      "covered me."
        DB      NEXT
;       DB      'БEБEБEИ─В╠ТшБAЙ╜ВрТЕВ─В╚ВйВ┴В╜БB'
        DB      "......As I suspected, I wasn't wearing anything down"
        DB      CR
        DB      "there."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEБEБEБEБEБEБEБEБEБE'
        DB      "%001:  ..........................."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEБEБEБEФ№ППВ┐ВсВёБEБEБEМйВ╜БH'
        DB      "%001:  ..........Mio, did you look at it?"
        DB      NEXT
;       DB      'БyФ№ППБzБFВ╛В┴В─БEБEБEБI'
        DB      "Mio:  I couldn't help it!"
        DB      NEXT
;       DB      'Бy%001БzБFВ╕ВщВвВ╝БB'
        DB      "%001:  That's not fair."
        DB      NEXT
;       DB      'БyФ№ППБzБFВжВ┴БH'
        DB      "Mio:  What?"
        DB      NEXT
;       DB      'Бy%001БzБFФ№ППВ┐ВсВёВ╬В┴ВйВшЙ┤В╠ЧЗМйВ─В╕ВщВвБI'
        DB      "%001:  It's not fair that you got to see mine, but I"
        DB      CR
        DB      "didn't get to see yours...!"
        DB      NEXT
;       DB      'БyФ№ППБzБFБEБEБE'
        DB      "Mio:  ...................."
        DB      NEXT
;       DB      'Бy%001БzБFЙ┤В╔ВрБEБEБEМйВ╣В─ВцБB'
        DB      "%001:  Show me, Mio. Show me yours."
        DB      NEXT
;       DB      'БyФ№ППБzБFБEБEБE'
        DB      "Mio:  .............."
        DB      NEXT
        DB      SINARIO,'CSE_C_2.OVL',0
        DW      0000H


end
Subversion Repositories NedoOS

(root)/src/games/sakura/jmc_ovl_src/CSE_C_1.ASM – Rev 1340
