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

;       В│ВнВчВ╠ЛGР▀      FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░))
;               ГVБ[ГУБ@ВWВQВSБQВP
;               КwЙАН╒ВQУ·Ц┌Б@ВRРlЦ║В╞Й┤

        INCLUDE SUPER_S.INC

START:
        DW      SCTBL,MSGTBL,COMTBL,VNTBL,ENDTBL
SCTBL:
        DW      S1, S2, S3, S4, S5, S6, S7, S8, S9
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,NN3,NN4,-1
CM2:    DW      VV2,    NN1,NN2,NN3,-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,      'Т▐Вщ',0
VV4:    DB      4,      'TRY YOUR LUCK',0

;NN1:   DB      1,      'ЧщОq',0
NN1:    DB      1,      'REIKO',0
;NN2:   DB      2,      'Р┤Ф№',0
NN2:    DB      2,      'KIYOMI',0
;NN3:   DB      3,      'Ф№ПП',0
NN3:    DB      3,      'MIO',0
;NN4:   DB      4,      'Т▐ВшЦx',0
NN4:    DB      4,      'FISH POND',0

;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
S1:             DW      VV1, NN1,  1, M2                ;МйВщБ@ЧщОq
S2:             DW      VV1, NN2,  2, M3                ;МйВщБ@Р┤Ф№
S3:             DW      VV1, NN3,  3, M4                ;МйВщБ@Ф№ПП
S4:             DW      VV1, NN4,  4, M5                ;МйВщБ@Т▐ВшЦx
S5:             DW      VV2, NN1,  5, M6                ;ШbВ╖Б@ЧщОq
S6:             DW      VV2, NN2,  6, M7                ;ШbВ╖Б@Р┤Ф№
S7:             DW      VV2, NN3,  7, M8                ;ШbВ╖Б@Ф№ПП
S8:             DW      VV3, -1,  8, M9         ;НlВжВщ
S9:             DW      VV4, -1,  9, M10                ;Т▐Вщ


;ГCГjГVГГГЛГБГbГZБ[ГW
M1:
        DB      BGM,24
        B_O B_SUDA
        BAK_INIT "AB_24"
        ;       DB      'ВвВыВвВыВ╚ПoВ╡ХиВЁМйВ─ЙёВ┴В─ВлВ╜ВпВ╟БAВ╗В╠УxВ╔РVУбВ│ВёВ╠ОшН█В╠Ч╟В│В╔К┤РSВ╡В─ВвВ╜БB'
        DB      "I went around with Kiyomi, looking at the various events"
        DB      CR
        DB      "the other classes put on."
        DB      NEXT
        ;       DB      'В╚В╔В╡ВыБAВ╟ВдВтВ┴В─МvОZВ╡В╜В╠ВйТmВчВ╚ВвВпВ╟БAВ╗ВъВ╝ВъВ╠ПoВ╡ХиВ┼В╠Н┼Ч╟В╠Г|ГWГVГЗГУВЁКmО└В╔ЙЯВ│ВжВ─ВвВщВ╠В╛ВйВчБB'
        DB      "Each time, Kiyomi managed to escort me to each event"
        DB      CR
        DB      "at the best possible time."
        DB      NEXT
        ;       DB      'ГEГ`В╠ГNГЙГXВ╠ЛiТГУXВкФ╔Р╖В╡В─ВвВщВ╠ВрБAРVУбВ│ВёВ╠уkЦзВ╚МvОZВ╠ОТХиВ╛ВыВдБB'
        DB      "The coffee shop that our class put on was great, too."
        DB      NEXT
        ;       DB      'БEБEБEВёВ┼БAНбВ╟В▒В╔ВвВщВйВ╞ВвВдВ╞БAТ▐ВшЦxВ╛В┴В╜ВшВ╖ВщБB
        DB      "And now we were at the fishing pond again."
        DB      BUF,B_COPY01
        TU_CG 'CT03','C',0,20,2
        TU_CG 'CT02','C',0,0,3
        T_CG 'CT01','C','D',12,4
        DB      ANI,A_ON,2
        DB      ANI,A_ON,3
        DB      C_BLD,C_V_ON,4
        DW      0000H
        
M2:             ;МйВщБ@ЧщОq
        ;       DB      'ПнВ╡БAХsЛ@МЩВ╔МйВжВщБB'
        DB      "She looks a little upset."
        DB      NEXT
        ;       DB      'БEБEБEГvБ[ГЛВкТ▐ВшЦxВ╔В│ВъВ─ВвВщВ╠ВкЛCВ╔У№ВчВ╚ВвВцВдВ╛БB'
        DB      "It's understandable. Her pool was turned into a fishpond."
        DW      0000H
        
M3:             ;МйВщБ@Р┤Ф№
        ;       DB      'В╟ВдВвВдЦєВйБAФMРSВ╔Т▐ВшВЁВ╡В─ВвВщБB'
        DB      "She's trying to catch a fish."
        DB      NEXT
        ;       DB      'БEБEБEКДВ╞Р^МХВ╛БB'
        DB      "I've never seen her serious about anything."
        DW      0000H
        
M4:             ;МйВщБ@Ф№ПП
        ;       DB      'Й┤ВкТ▐В┴В╜ЛЫВЁФ`ВлНЮВёВ┼В═К╧О@В╡В╜ВшБAРФВжВ╜ВшВЁМJВшХ╘В╡В─ВвВщБB'
        DB      "She's looking at the fish I've caught."
        DB      NEXT
        ;       DB      'БEБEБEВ╚ВёВ╔В╣ВцБAКyВ╡В╗ВдВ╛ВйВчВвВвВйБB'
        DB      "She seems to be having fun, so I guess it's okay."
        DW      0000H
        
M5:             ;МйВщБ@Т▐ВшЦx
        ;       DB      'В╗В▒В╗В▒БAФ╔Р╖В╡В─В═ВвВщВцВдВ╛БB'
        DB      "This isn't that difficult."
        DB      NEXT
        ;       DB      'БEБEБEТ▐ВшВЁВ╖ВщБAВ╞М╛ВдВцВшБAС╥В┐НЗВэВ╣ПъПКВ╔ЧШЧpВ╡В─ВвВщРlК╘В╠Х√ВкС╜ВвВцВдВ╚ЛCВрВ╖ВщБB'
        DB      "There's not much more to fishing then meeting the fish"
        DB      CR
        DB      "with your hook at a certain time and place."
        DW      0000H
        
M6:             ;ШbВ╖Б@ЧщОq
        ;       DB      'Бy%001БzБFВаВъБHЧщОqВ│ВёБAТ▐ВчВ╚ВвВ╠БH'
        DB      "%001:  Reiko, aren't you going to try to get any fish?"
        DB      NEXT
        ;       DB      'БyЧщОqБzБFБEБEБEОДВ═БAГvБ[ГЛВ┼В═ЙjВоВ▒В╞В╔МИВ▀В─ВщВ╠БB'
        DB      "Reiko:  ......I want to go swimming."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ═ВЯБEБEБEВ│ВвВ┼В╖ВйБB'
        DB      "%001:  .......Oh."
        EF_SET 101
        DW      0000H
        
M7:             ;ШbВ╖Б@Р┤Ф№
        ;       DB      'Бy%001БzБFРVУбВ│ВёБAВ╟ВдБHТ▐ВъВ─ВщБH'
        DB      "%001:  Kiyomi, how is it going? Are you catching a lot"
        DB      CR
        DB      "of fish?"
        DB      NEXT
        ;       DB      'БyР┤Ф№БzБFБEБEБEБEБEБE'
        DB      "Kiyomi:  .............................."
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEРVУбВ│ВёБH'
        DB      "%001:  Kiyomi?"
        DB      NEXT
        ;       DB      'БEБEБEГ_ГБВ╛КоСSВ╔ГnГ}В┴В─ВщВчВ╡ВвБBЙёХЬВ═ОЮК╘В╔ФCВ╣ВщВ╡ВйВ╚ВвБB'
        DB      "It's no use. She's so intent on the fish that she can't"
        DB      CR
        DB      "even hear me."
        EF_SET 102
        DW      0000H
        
M8:             ;ШbВ╖Б@Ф№ПП
        ;       DB      'Бy%001БzБFТ▐ВчВ╚ВвВ╠БHФ№ППВ┐ВсВёБB'
        DB      "%001:  Aren't you going to try for any fish?"
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВдВёБEБEБEЛЫВкВйВэВвВ╗ВдВ╛ВйВчБEБEБE'
        DB      "Mio:  ..............I just feel sorry for the fish."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ╗ВйБEБEБEЧDВ╡ВвВёВ╛В╚БAФ№ППВ┐ВсВёБB'
        DB      "%001:  Oh, well, that's awfully nice of you, Mio."
        DB      NEXT
        ;       DB      'БyФ№ППБzБFВжБEБEБEБHВ╗БAВ╗ВдВйВ╚БH'
        DB      "Mio:  Really? I don't think so."
        EF_SET 103
        DW      0000H
        
M9:             ;НlВжВщ
        ;       DB      'БEБEБEВ┼ВрВ▄ВаБAСзФ▓ВлВ╔В═В┐ВхВдВ╟ВвВвВцВ╚БB'
        DB      "The fishing pond is a nice place to sit down and relax."
        DB      NEXT
        ;       DB      'ВлВ┴В╞РVУбВ│ВёБAВ╗В╠Х╙В▄В┼МvОZВ╡В╜ВёВ╛ВыВдВ╚БB'
        DB      "I'm sure Kiyomi had thought of that when she led me here."
        DB      NEXT
        ;       DB      'БyР┤Ф№БzБFВ▄ВаБAУжВ░ВчВъВ─В╡В▄ВвВ▄В╡В╜ВэБB'
        DB      "Kiyomi:  I lost him!"
        DB      NEXT
        ;       DB      'БEБEБEВ┼ВрБAОйХкВкГnГ}ВщОЦВ═МvОZКOВ╛В┴В╜В╞ОvВдВ╝БH'
        DB      "I'm sure she didn't plan on getting hooked on fishing herself."
        DW      0000H
        
M10:            ;Т▐Вщ
        ;       DB      'Бy%001БzБFВцБ[В╡БEБEБEВ┘ВвВ┴БAВ╞БB'
        DB      "%001:  Got another one."
        DB      NEXT
        K_CG 'CT03','K',20,5
        DB      ANI,A_ON,4
        DB      ANI,A_ON,3
        ;       DB      'БyФ№ППБzБFВэБ[БA%001РцФyБAПуОшБI'
        DB      "Mio:  %001, you're great!"
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEВ▄ВаБAНЁУ·В│ВёВ┤ВёВтВ┴В╜ВйВчВ╚ВаБB'
        DB      "%001:  I got a lot of practice going up against the"
        DB      CR
        DB      "dean yesterday."
        DB      NEXT
        ;       DB      'БyЧщОqБzБFБEБEБEБEБEБE'
        DB      "Reiko:  ......................."
        DB      NEXT
        ;       DB      'Бy%001БzБFВ╟В╡В╜В╠БHЧщОqВ│ВёБAЛ@МЩИлВ╗ВдВ╛ВпВ╟БH'
        DB      "%001:  What's wrong, Reiko? You look upset."
        DB      NEXT
        ;       DB      'БyЧщОqБzБFВ╛В┴В─БEБEБEЦИФNВ╟В▒ВйВ╠ГNГЙГXВкТ▐ВшЦxВтВщВёВ╛ВпВ╟БAВ╗В╠МуС|ПЬВкПIВэВщВ▄В┼ГvБ[ГЛВкВ┬ВйВжВ╚ВнВ╚ВщВёВ╛ВрВ╠БB'
        DB      "Reiko:  Every year some class uses the pool for a fish"
        DB      CR
        DB      "pond. It keeps me from be swimming when I want to."
        DB      NEXT
        TU_CG 'CT03','C',0,20,2
        TU_CG 'CT02','C',0,0,3
        T_CG 'CT01','C','D',12,4
        DB      ANI,A_ON,4
        DB      ANI,A_ON,3
        ;       DB      'БyФ№ППБzБFВаБEБEБEВ▓В▀ВёВ╚В│ВвБEБEБE'
        DB      "Mio:  .....I'm sorry."
        DB      NEXT
        K_CG 'CT01','V',12,6
        DB      ANI,A_ON,2
        DB      ANI,A_ON,3
        ;       DB      'БyЧщОqБzБFВаБEБEБEВ╗В╠БAФ№ППВ┐ВсВёВЁУ{В┴В─ВщВэВпВ╢ВсВ╚ВнВ─В╦БEБEБE'
        DB      "Reiko:  No, I'm not angry with you."
        DB      NEXT
        ;       DB      'Бy%001БzБFФ№ППВ┐ВсВёБAЧщОqВ│ВёВ═ЦИФNГvБ[ГЛВкОЦВжВ╚ВнВ╚ВщВ▒В╞В╔ХаВЁЧзВ─В─ВщВ╛ВпВ┼БAНбФNВ═В╟В╠ГNГЙГXВкВтВ┴В╜ВйБAВ╚ВёВ─ЛCВ╔В╡В┐ВсВвВ╚ВвВцБB'
        DB      "%001:  Reiko's upset that the pool is always used for a"
        DB      CR
        DB      "fish pond, but she's not angry with your class specifically."
        DB      NEXT
        ;       DB      'БyЧщОqБzБFВ╗БAВ╗ВдВ╗ВдБI'
        DB      "Reiko:  That's right!"
        DB      NEXT
        ;       DB      'Бy%001БzБFЙ╜В╜В┴В─НкВкТPПГВ╛ВйВчБEБEБE'
        DB      "%001:  She always talks too much."
        DB      NEXT
        K_CG 'CT01','D',12,4
        DB      ANI,A_ON,2
        DB      ANI,A_ON,3
        ;       DB      'БyЧщОqБzБFВ╗ВдВ╗ВдБEБEБEВ╚ВёВ┼В╖В┴В─БIБH'
        DB      "Reiko:  That's right...Wait, I what?!"
        DB      NEXT
        ;       DB      'Бy%001БzБFВаБ`Б`БAЧщОqВ│ВёБAСхВлВвР║ПoВ│В╚ВвВ┼БAЛЫВкУжВ░ВщБAУжВ░ВщБI'
        DB      "%001:  Reiko, don't raise your voice like that. You're"
        DB      CR
        DB      "scaring the fish away."
        DB      NEXT
        ;       DB      'БyЧщОqБzБFВ▓В▄ВйВ│ВъВ╚ВвВэВцБIВрВдБA%001МNБEБEБE'
        DB      "Reiko:  Don't try to change the subject..."
        DB      NEXT
        ;       DB      'БyР┤Ф№БzБFВ▄ВаБAМйВ─Й║В│ВвВ▌В╚В│ВёБAВэВ╜ВнВ╡БAВиЛЫВ│ВёВЁТ▐ВшПуВ░В▄В╡В╜ВэБI'
        DB      "Kiyomi:  Look, everyone! I caught a fish!"
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEБEБEБE'
        DB      "%001:  ..............................."
        DB      NEXT
        ;;      DB      'БyФ№ППБzБFБEБEБEБEБEБE'
        DB      "Mio:  ..............................."
        DB      NEXT
        ;       DB      'БyЧщОqБzБFБEБEБEР┤Ф№В┐ВсВёБEБEБEВаВ╚В╜БAГzГУГgВ╔Г}ГCГyБ[ГXВцВ╦ВеБEБEБE'
        DB      "Reiko:  That's, um, nice Kiyomi."
        DB      NEXT
        ;       DB      'БyР┤Ф№БzБFВ▄ВаБAНвВшВ▄В╡В╜ВэБBВэВ╜ВнВ╡БAВ▒ВъВйВчВ╟ВдВ╖ВъВ╬Ч╟ВвВ╠В┼В╡ВхВдВйБH'
        DB      "Kiyomi:  What should I do with the fish now?"
        DB      NEXT
        ;       DB      'Бy%001БzБFБEБEБEБEБEБE'
        DB      "%001:  ..............................."
        DB      NEXT
        ;       DB      'УрРSВ═В╞ВрВйВнБAКOМйВ╞Р║В═В┐В┴В╞ВрНвВ┴В─В╚В│В╗ВдВ╚РVУбВ│ВёВ╠ОЭВ┬К╞В╔В═БA'
        ;       DB      'МяВкИъХCЦ└ШfВ╗ВдВ╔В╘ВчЙ║ВкВ┴В─ВвВ╜БEБEБE'
        DB      "In Kiyomi's unsure hands was a fish, flopping around"
        DB      CR
        DB      "trying to escape."
        DB      NEXT
        DB      SINARIO,'CS824_2.OVL',0
        DW      0000H
        
M_EXIT: 
        DB      FLG,F_COPYI,100,1
        DB      FLG,F_MAND,4,100,101,102,103
        DB      FLG,F_EXIT,100
        DB      C_BLD,C_V_OFF,4
        DW      0000H


end
Subversion Repositories NedoOS

(root)/src/games/sakura/jmc_ovl_src/CS824_1.ASM @ 2046 – Rev 1340
