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

;       В│ВнВчВ╠ЛGР▀      FILENAME:CSas#_##(CS+П═+╝┼╪╡ No.(+╗╠▐┼▌╩▐░))
;               ГVБ[ГУБ@ВUВOВX
;               УёУ·Ц┌ЦщБ@ХlХ╙

        INCLUDE SUPER_S.INC

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

;VV1:   DB      1,      'МйВщ',0
VV1:    DB      1,      "LOOK",0
;VV2:   DB      2,      'ШbВ╖',0
VV2:    DB      2,      "TALK",0

;NN1:   DB      1,      'ХlХ╙',0
NN1:    DB      1,      "BEACH",0
;NN2:   DB      2,      'НZТ╖',0
NN2:    DB      2,      "DEAN",0

;       Б@Б@Б@ УоОМ Ц╝ОМ ╠╫╕▐ ╥п╛░╝▐
S1:             DW      VV1, NN1,  1, M2, M3            ;МйВщБ@ХlХ╙
S2:             DW      VV1, NN2,  2, M4                ;МйВщБ@НZТ╖
S3:             DW      VV2, -1,  3, M5, M6, M7         ;ШbВ╖


;ГCГjГVГГГЛГБГbГZБ[ГW
M1:
        DB      BGM,2
        BAK_INIT "AB_17_2"
        DB      BUF,B_COPY01
        T_CG "CT02","M",0,40,1
;       DB      'Бy%001БzБFХаМ╕В┴В╜БAГБГVГБГVБ`БB'
        DB      "%001:  I'm starving."
        DB      NEXT
;       DB      'БyР┤Ф№БzБFВэВ╜ВнВ╡ВрВиВ╚ВйГyГRГyГRВ┼В╖ВэБB'
        DB      "Kiyomi:  I'm really hungry too."
        DB C_BLD,C_V_ON,2               ;ШbВ╖
        DB      C_BLD,C_N_ON,1,2        ;МйВщБ@НZТ╖
        DW      0000H

M2:             ;МйВщБ@ХlХ╙
;       DB      'БyР┤Ф№БzБF%001В│ВёБAВаВ┐ВчВ╔ЧщОqВ│ВёВ╞Ф№ППВ│ВёВкВвВчВ┴В╡ВсВвВ▄В╖ВэБB'
        DB      "Kiyomi:  Look, %001, there are Reiko and Mio."
        DB      NEXT
;       DB      'БyФ№ППБzБFВ╣ВёВ╧Б`ВвБI'
        DB      "Mio:  %001!"
        DB      NEXT
;       DB      'Ф№ППВ┐ВсВёВкВ╘ВёВ╘ВёВ╞ОшВЁРUВ┴В─ВвВщБB'
        DB      "Mio waved at us frantically."
        DB      NEXT
;       DB      'Й┤ТBВ═ЧщОqВ│ВёВ╞Ф№ППВ┐ВсВёВ╠ВвВщПъПКВ╔М№ВйВ┴В╜БB'
        DB      "We turned to face where Mio and Reiko were."
        TU_CG "CT03","M",0,13,3         ;Ф№ПП
        T_CG "CT01","M",0,0,2           ;ЧщОq
        DB      BUF,B_COPY10
        DB      ANI,A_ON,1
        DB      ANI,A_ON,3
        DB C_BLD,C_V_OFF,2              ;ШbВ╖
        DB      FLG,F_COPYI,1,1
        DW      0000H


M3:             ;МйВщБ@ХlХ╙
;       DB      'В▌ВёВ╚В╝ВыВ╝ВыВ╞ПhВ╔И°ВлХ╘В╡В─НsВнБB'
        DB      "Everybody was flocking back to the lodge."
        DW      0000H

M4:             ;МйВщБ@НZТ╖
;       DB      'Й┤В╠ФwМуВ╔ВвВ╜В╠В═БAС╝В┼ВрВ╚ВвНZТ╖РцР╢В╛В┴В╜БB'
        DB      "Right behind me was none other than the dean himself."
        DB      NEXT
;       DB      'Р_ПoЛSЦvВ╛В╚БAВ▒В╠РlБB'
        DB      "He always just pops out of nowhere."
        DW      0000H

M5:             ;ШbВ╖
;       DB      'БyФ№ППБzБFУёРlВ╞ВрБAВ╟В▒В╔НsВ┴В─В╜В╠БH'
        DB      "Mio:  So where did you two go?"
        DB      NEXT
;       DB      'Бy%001БzБFВ╗В▒В╠ПмУЗВ▄В┼НsВ┴В─ЧVВёВ┼В╜ВёВ╛БB'
        DB      "%001:  We went over to that little island."
        DB      NEXT
;       DB      'БyР┤Ф№БzБFВиУёРlВ╠Х√В═В╟ВдВ┼В╡В╜ВйБH'
        DB      "Kiyomi:  How did the swimming lessons go?"
        DB      NEXT
;       DB      'БyЧщОqБzБFВ╗ВъВкБAСзМpВмВ╠ОdХ√ВЁЛ│ВжВ╜ВчВрВдГXГCГXГCВцБB'
        DB      "Reiko:  Well, she's mastered her breathing."
        DB      NEXT
;       DB      'БyФ№ППБzБFВаВ╜В╡НбВ▄В┼СзМpВмВ╠УxВ╔РЕИ∙ВёВ┼В╜ВйВчБEБEБE',CR,'В┼ВрБAЧщОqРцФyВ╔Л│ВжВ─ВрВчВ┴В╜ВйВчЙjВ░ВщВцВдВ╔В╚В┴В╜В╠БI'
        DB      "Mio:  I'd always just swallow water before, but thanks"
        DB      CR
        DB      "to Reiko, I can swim properly now!"
        DB      NEXT
;       DB      'БyЧщОqБzБF%001МNВ╞В═УVВ╞ТnВ╠КJВлВкВаВщВэВ╦Б`БB',CR,'Ф№ППВ┐ВсВёБAРЕЙjХФВ╔У№ВщЛCВ╚ВвБH'
        DB      "Reiko:  There's definitely a big difference between %001"
        DB      CR
        DB      "and Mio. Mio, want to try out for the swim team?"
        DB      NEXT
;       DB      'БyФ№ППБzБFВаВ╜В╡В═ГeГjГXИъЛ╪В╛ВйВчБEБEБE'
        DB      "Mio:  Well, I'm kind of married to tennis..."
        DB      FLG,F_COPYI,3,1
        DW      0000H

M6:             ;ШbВ╖
;       DB      'БyР┤Ф№БzБFВ╡ВйВ╡БAВ▒В╠СOВ╠Ч╤К╘КwНZВ╞ВвВвБAНбЙёВ╠Ч╒КCКwНZВ╞ВвВвОйЧRОЮК╘В╬В┴ВйВшВ┼В╖ВэВцВ╦БB'
        DB      "Kiyomi:  It seems really strange that on our camping"
        DB      CR
        DB      "trip, and now this one, we've had nothing but free time."
        DB      NEXT
;       DB      'Бy%001БzБFВ╗Б[В╛В╚БBЧ╒КCКwНZВ┴В─М╛ВжВ╬БAСSИїОQЙ┴В╠ЙУЙjВ╞ВйВаВшВ╗ВдВ╚ВрВёВ╛ВкБB'
        DB      "%001:  Yeah, you'd think that there would be a swimming"
        DB      CR
        DB      "meet that everybody had to be in or something."
        DB      NEXT
        E_CG B_NORM,"AB_17_2"
        T_CG1 "CT13","F",0,15,5
;       DB      'БyНZТ╖БzБFВцВ╡БAВтВыВдБB'
        DB      "Dean:  What a fine idea!"
        DB      NEXT
;       DB      'БyФ№ППБzБFВэВ┴БIНZТ╖РцР╢БI'
        DB      "Mio:  Ack! The dean!"
        DB      NEXT
;       DB      'БyЧщОqБzБFВвВ┬В╠В▄В╔БEБEБE'
        DB      "Reiko:  When did he...?"
        DB      NEXT
;       DB      'БyНZТ╖БzБFВ▄В│ВйЙjВ░В╚ВвМNВйВчВ╗ВёВ╚СфОМВкХ╖ВпВщВ╞В═ОvВ┴В─В╚ВйВ┴В╜В╝БA%001МNБB'
        DB      "Dean:  Well, I certainly didn't expect a non-swimmer"
        DB      CR
        DB      "like you to suggest something like that, %001."
        DB      NEXT
;       DB      'Бy%001БzБFЙ┤ВрНZТ╖РцР╢ВкВ▒ВёВ╚ПКВ╔ВвВщВ╞В═ОvВ┴В─В▄В╣ВёВ┼В╡В╜БB'
        DB      "%001:  Well, I also didn't think you were anywhere close"
        DB      CR
        DB      "by!"
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEЙ╜В┼НZТ╖РцР╢В▄В┼Й┤ВкГJГiГdГ`В╛В┴В─ТmВ┴В─ВщВёВ┼В╖ВйБH'
        DB      "%001:  How is it that you know I can't swim?"
        DB      NEXT
;       DB      'БyНZТ╖БzБFВиВтБHЙ╜В┼ВрЙ╜ВрБAОДВ═БEБEБE'
        DB      "Dean:  Me? Oh, I have my ways..."
        DB      NEXT
;       DB      'БyЧщОqБzБFВаБ[В┴В▒В┴НZТ╖РцР╢БAНбУ·ВрГ_ГУГfГBВ┼В╖ВэВ╦БI'
        DB      "Reiko:  Wow, you sure look sharp again today, sir!"
        DB      NEXT
        K_CG "CT13","K",15,6
;       DB      'БyНZТ╖БzБFВдВ▐БAВ▒В╠Ч╒КCКwНZВ╠В╜В▀В╔ГXБ[ГcВЁРVТ▓В╡В╜ВйВчВ╦БB'
        DB      "Dean:  Well, yes, I had this suit specially made for"
        DB      CR
        DB      "this trip."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEЙ╜В╡В╔КCВ╔ЧИВ─ВщВёВ┼В╖БH'
        DB      "%001:  ...Why are you wearing it here?"
        DB      FLG,F_COPYI,3,2
        DB      C_BLD,C_N_OFF,1,2       ;МйВщБ@НZТ╖
        DW      0000H


M7:             ;ШbВ╖
;       DB      'БyНZТ╖БzБFПФМNВрТmВ┴В─В╠Т╩ВшБAР╢УkВ╠ОйОхРлВЁСхОЦВ╔В╖ВщВ╠ВкЙфВкНZВ╠ГВГbГgБ[В╛ВйВчВ╦БB'
        DB      "Dean:  Well, as you all know, at this university we value"
        DB      CR
        DB      "the independence of our students."
        DB      NEXT
;       DB      'НZТ╖РцР╢В═В╔ВэВйВ╔ЧзВ┐ПуВкВ┴В─БAВ▄ВэВшВ╔ВвВщСSИїВ╔Х╖В▒ВжВщВцВдВ╔ШbВ╡ОnВ▀В╜БB'
        DB      "The dean stood up and began addressing all the"
        DB      CR
        DB      "students around us."
        DB      NEXT
;       DB      'БyНZТ╖БzБFВ╗ВъВ┼В═БAЦ╛У·В═ЙУЙjСхЙяВЁНsВдВ▒В╞В╔В╖ВщБB',CR,'ЙjВ░В╚ВвВрВ╠В═ХВВлЧ╓ВЁОgВ┴В─ВрН\ВэВ╚ВвВйВчБAВ╞В╔ВйВн',CR,'Л│РEИїВрК▄В▀В─СSИїОQЙ┴В╛БB'
        DB      "Dean:  All right. Tomorrow there will be a distance"
        DB      CR
        DB      "competition. Those who can't swim can use lifesavers,"
        DB      CR
        DB      "and the faculty will also participate."
        DB      NEXT
;       DB      'БyНZТ╖БzБFЛЧЧгВ═В▒В╠ХlВйВчВаВ╠ПмУЗВ▄В┼В╠ЙЭХЬБB'
        DB      "Dean:  The distance will be from the beach to the"
        DB      CR
        DB      "island and back."
        DB      NEXT
;       DB      'БyНZТ╖БzБFПуИ╩ВQВOЦ╝В═БAУ┴Х╩В╔Й─ЛxВ▌ВЁИъПTК╘ЙДТ╖В╡ВцВдБI'
        DB      "Dean:  The first twenty back will get an extra week of"
        DB      CR
        DB      "summer vacation!"
        DB      NEXT
;       DB      'БuВиВиВиВиБ[В┴БIБv'
        DB      "All:  Oooooh!"
        DB      NEXT
;       DB      'БyНZТ╖БzБFВ╜В╛В╡БIКоЙjПoЧИВ╚ВйВ┴В╜О╥В╔В═ФщЦзВ╠Ф▒ГQБ[ГАВкС╥В┴В─ВвВщВ╝ВзБI'
        DB      "Dean:  However! There will be a secret punishment"
        DB      CR
        DB      "awaiting those who can't finish!"
        DB      NEXT
;       DB      'БyНZТ╖БzБFВ╗ВъВ┼В═БAПФМNВ╠МТУмВЁЛFВщБI'
        DB      "Dean:  May the best swimmer win!"
        DB      NEXT
        DB      ANI,A_OFF
        BN_P1 B_SUDA
        DB      ANI,A_ON,1
        DB      ANI,A_ON,2
        DB      ANI,A_ON,3
;       DB      'НZТ╖РцР╢В═щDСuВ╞ПhВ╔У№В┴В─ВвВ┴В╜БB'
        DB      "The dean walked impressively into the lodge."
        DB      NEXT
;       DB      'БEБEБEВ╗Б[ВфБ[ВэВпВ┼БAЧ╒КCКwНZОOУ·Ц┌В═СхЙУЙjСхЙяВ╞В╚В┴В─В╡В▄В┴В╜В╠В╛В┴В╜БB'
        DB      "So it looked like we would all have to be in the"
        DB      CR
        DB      "swimming competition on the third day of seaside camp."
        DB      NEXT
;       DB      'Бy%001БzБFБEБEБEВ┼ВрБAЙ╜В┼НZТ╖РцР╢В═Й┤ВкГJГiГdГ`В╛В┴В─ТmВ┴В─ВщВёВ╛БH'
        DB      "%001:  But I really wonder how he knew I can't swim."
        DB      NEXT
        DB      BUF,B_COPY01
        K_CG "CT01","V",0,4             ;ЧщОq
        DB      ANI,A_ON,1
        DB      ANI,A_ON,3
;       DB      'БyЧщОqБzБFВаВ═В═В═БEБEБE'
        DB      "Reiko:  Ohohoho..."
        DB      NEXT
;       DB      'Бy%001БzБFБHБHБH'
        DB      "%001:  ???"
        DB      NEXT
        E_CG B_FADE,"AB_17_3"
        DB      NEXT
        DB SINARIO,'CS610.OVL',0
        DW      0000H


end
Subversion Repositories NedoOS

(root)/src/games/sakura/jmc_ovl_src/CS609.ASM @ 1669 – Rev 1340
