(c)  騭, ᪢

ZXNet : 500:95/462.53
E-mail: bestview@mtu-net.ru
WWW   : http://www.ivr.da.ru

	     Art Studio  ਭ樯 ⮩ ⥪
	     

(Adventurer #8,
 "⥫.  " 8/2000)
 ᫥ ।஢: 24.09.2004.

     ⠪  ᪮ । Art Studio (v2.01c,
corrected by ROM/SM and FUX/SM),   ந뢠
  ६ ࠡ. ..  ᪥ ᠭ ᠬ । 
ࠧ    - 䠩 "artmusic", ᮤঠ騩 ⪮஢
  ଠ Pro Tracker 2  Sound Tracker Pro. 
᪥ ।  䠩 㦠  ᢮   (1
 6),    ࠡ ந室 맮  
뢠. (,   ⮣ 䠩   祭,
    ᠭ ।⢥  ।஬, .. 
䠩 "ART <B>".)
      짮 㣨 ﬨ Art Studio,  
뫨 ᢮ ⪨:  ५ 祧 ⭮ 㤠,  
࠭  梥    ᭥...   
  ᨨ    .    
  ᮡ ( 饬-,  ᥬ
짮⥫ Art Studio) - 祭    ०
Magnify, Font editor  Scrapbook.  뫮 -  ⨬
,   訫     䠩  몮.
 ⠭   -  뢠  뢠
,  ᭮ ᢮ , ⠭ 㦭 
梥 .
    쭮   ࠡ⠫  ⠪ ᨥ Art Studio,  
 㣠 ஡: 㦭 뫮 ᮢ ஥
ࠦ   न⠬  祪. , ਬ,
⬥  㭪   न⠬ x=45, y=83?  ᫨ 
 ࠭ ﭭ ⮡ࠦ ⥪騥 न ...
       㬠:   ᫨    ⠪ 
⮢ ᮬ (#C000), ⠪  窠 室 (INIT=#C000,
PLAY=#C006),    ⪮஢ 모,  ⮬
""  ।, ᠢ  䠩 "artmusic". 
 ,  ᢮ ।,  ࠧ,   
ந 饭, 㤥 뢮  ࠭ न
.
     (   art_xy)  ᠭ  ᯥ譮
뢮 न ( ஬ ⮣, ᫥  ஬ 
⠭ 㦭  砫 祭 ਡ⮢).  
⮩  ਢ 室 ⥪   , 
ਣ   ࠧࠡ⪥ ᮡ⢥ 㫥.
       ? 뢠,    Art
Studio  㤭 ॠ ᠬ, ᠢ 
⮣ ᯥ樠 .  ᫨ ᠭ ᪮쪮 㫥, 
 㦠   ।,  室  । (
⮣, ⢥,   㫥   ।ᬮ७
 "㧨 㣮   ।  ࠢ").

	    ͻ     ͻ
	   ĶĿ        
	   Ķ		       ɼ
	   Ķ		         Ŀ    Ȼ
	   ĶArt Studio          1     
	   Ķ		              
	   ĶĿ    	...	    
	   Ķ 1         Ŀ     
	   Ķٳ          n     
	   Ķ              
	    ͼ     ͼ
		  			

     ᢮ ,  ᮬ,  , 祬
  ᪨ । " ".  㫨
  ᠭ ࠧ묨 쬨, ᨬ   㣠. 
 ⮬  砥 ਭ樯  . 猪
James Hutchby,  Art Studio,   ।  ⠪
 ᢮ ।.
     㭪樨  ᮤঠ  ⥫쭮 㫥?
ਬ,  ᬮ ᠭ  ᪥ ⨭ 
㧪   ।, ࠭  ⠭
䨣樨, ᯮ짮 ⥫쭮  ( 128 )
 ⢥ RAM-᪠, 믮 ࠧ ८ࠧ 
⬥祭 ,  , 筮, 몠  ਭᥩ.  
 㬥  16 .
     ZX-Format #7    ஥ "STATE OF THE ART"
㯯 AVALON.  ⠬ ᠭ,   ᪨
।  몭묨 ﬨ, 騩 ⮨⢠
 ।஢  ZX Spectrum, PC  AMiGA. ⥫ , ⮡
 ⠬ ᯮ짮  ਭ樯 ஥,  ஡
ᠭ 䥩  㫥  ।஬, ⮡ 
짮⥫  ᠬ ॠ 㦭  㭪.  
ࠪ᪨ ࠭祭 ७ ⥩ ।.

       ஡ ᪠  ⮬,  
ᮡ⢥   Art Studio.    
ᮢ,   室 ६ ।:

 ink	- 52186 (0-7, 8 - transparent)
 paper	- 52187 (0-7, 8 - transparent)
 border - 52188 (0-7)
 bright - 52189 (0 - off, 1 - on, 2 - transparent)
 flash	- 52190 (0 - off, 1 - on, 2 - transparent)

    ᮫ न  (x - 56035, y - 56036)
㡫  ᠬ 64977  64978 ᮮ⢥⢥. 砫
न ᯮ   孥 㣫 ࠭.
       ६ 室  0  ,  
㦠  1  6 ,    ⢫ 
 ᯥ樠 㭪権 (. ⨭).
     ६  50 饭   (.. 1 ᥪ㭤
ॠ쭮 ६ ᫥ ᪠ ।) ந室 ᯠ
।  樠 ६. ᫨  㫥
।ᬮ७    㬮砭 ਡ⮢ (ink,
paper, border)  㣨,   ਡ 㦭 ⠭
     50 饭. ᭥  ⠪:
祢,  ᪥ । 믮  ᫥饣
:

   LD A,0
   LD (52186),A  ;ink
   LD A,7
   LD (52187),A  ;paper
   LD A,7
   LD (52188),A  ;border

   ... ;ந室 뢠, 뢠 , 
       ;⠭ 㦭 ink, paper, border.

   CALL CLS	 ;⪠ ࠭
		 ; ᮮ⢥⢨  ਡ⠬.

    ,  ⠭ 㦭 ਡ⮢  ந ᫥
⮣,  । ⠭  祭,   ⮣, 
। 믮  ࠭.  ⠪  ⭮,  
 뢠 㤥 ᮮ⢥⢮ ⮬ , 室
믮 ⠭ ਡ⮢ 50 ࠧ.
    , ᫨  ᪥ । 㦭  
 㬮砭 祭 ਡ⮢  transparent,  
ᤥ ᫥  50 맮  -   ६ ⪨
࠭ ਡ  ⠭ 砩 ࠧ.


室 ⥪    art_xy


	ORG	#C000

	JP	INIT  ;#C000 - INIT
	DS	3
	JP	PLAY  ;#C006 - PLAY
	RET	      ;#C009 - STOP

;祭 ink, paper, border:

COLORS	DB	7,0,0

;---------------------------------------
;楤 INIT - 믮 ।
;砫 ࠡ ।.

INIT	DI

;࠭塞   १⮬:

	CALL	SAVE_M

;७ᨬ १ N3  ᪠ .
; 祩 BANK 砥  ,
;㤠 㦥 art_xy:

	LD	HL,RES3_B
	CALL	LOAD_R
	CALL	#6000

;⠭ ࠭ ࠭
;⮪   १⮬:

	CALL	LOAD_M

;뢮 ᮮ饭 "㦥 ..."
;   :

	CALL	#D000
INIT1	XOR	A
	IN	A,(254)
	CPL
	AND	31
	JR	Z,INIT1
	EI
	RET

;---------------------------------------
;楤 PLAY - 믮 
;1/50 ᥪ㭤.

PLAY	DI
	CALL	SAVE_M
	...
	CALL	LOAD_M
	EI
	RET

;---------------------------------------
;楤 LOAD_M ࠭  
;⮪   १⮬
;( 砫 - #6000,  ⪠ -
; ᠬ  १, 
; 㫥  १ N3).

LOAD_M	LD	HL,RES_BUF
LOAD_R	LD	DE,#6000
	LD	BC,RES3_E-RES3_B
	LDIR
	RET

;---------------------------------------
;楤 SAVE_M ⠭ ࠭
; (  LOAD_M) ⮪
;.

SAVE_M	LD	HL,#6000
	LD	DE,RES_BUF
	LD	BC,RES3_E-RES3_B
	LDIR
	RET

;---------------------------------------
;楤 GET_MEM -  
;LD A,(DE). 㦭  㯠  0 
;.

GET_MEM PUSH	HL
	PUSH	BC
	PUSH	DE
	LD	HL,RES1_B
	CALL	LOAD_R
	POP	DE
	CALL	#6000
	POP	BC
	POP	HL
	RET

;---------------------------------------
;楤 TO_MEM -  
;LD (DE),A. 㦭  㯠  0 
;.

TO_MEM	PUSH	HL
	PUSH	BC
	PUSH	DE
	LD	HL,RES2_B
	CALL	LOAD_R
	POP	DE
	CALL	#6000
	POP	BC
	POP	HL
	RET

;---------------------------------------
; N1 - LD A,(DE):

RES1_B	LD	BC,#7FFD
	LD	HL,(BANK)
	OUT	(C),H
	LD	A,(DE)
	OUT	(C),L
	RET
RES1_E

;---------------------------------------
; N2 - LD (DE),A:

RES2_B	LD	BC,#7FFD
	LD	HL,(BANK)
	OUT	(C),H
	LD	(DE),A
	OUT	(C),L
	RET
RES2_E

;--------------------------------------
; N3 ।,   
;(1  6) 㦥  art_xy.
;  祭  ६
;BANK.

RES3_B	LD	BC,#7FFD
	LD	A,#11
	OUT	(C),A
	LD	A,(PRIZN)
	CP	"+"
	LD	A,#11
	JR	Z,RES3_1
	LD	A,#16
RES3_1	OUT	(C),A
	LD	(BANK),A
	RET
RES3_E

;---------------------------------------
;   ⪠ 
; १⮬:

RES_BUF DS RES3_E-RES3_B

PRIZN	DB "+"
BANK	DW #1000
