
					Czesc !!!

   Ten artykuî przeznaczony jest dla poczÌtkujÌcych koderÑw.
OmÑwië w nim zasadë stawiania tzw. barÑw,tj. kolorowych  be-
lek.Zapewne  kaÓdy widzaî w demkach kolorowy pas oddzielajÌ-
cy skrol od obrazka . Jest  on bardzo îatwy do wykonania dla
kaÓdego poczÌtkujÌcego. Informuje takÓe,Óe nie bëde opisywaî
Seki ,bo artykuîy takie moÓecie znaleûÍ w magazynach takich,
jak "Fat Agnus" (nr.2) i "Kebab".
	
    A teraz do dzieîa ...
    
 Belki takie stawia sië za pomocÌ Copper`a i wyglÌda to nas-
tëpujÌco: 

	......
	czekanie na linië
	......
	przeslanie koloru
	.....
	itd.

    Najpierw zaczniemy od podprogramu,ktÑry przesyîa wartoô-
ci pod adres coppera . WyglÌda on nastëpujÌco :

	Start:
		move.l	#Copper,$dff080	; Pobranie wartosci i przes-
								;îanie jej pod adres Coppera 	
		clr.w	$dff088			; Uaktywnienie   ustawionego
								; coppera
	Loop:
		btst	#6,$bfe001		; Testowanie przycisku myszy
		bne.s   Loop			; Jesli przycisk nie przy-
								;ciôniëty,to powrÑt do Loop

    Jak widzimy jest on bardzo îatwy .

Teraz zajmiemy sie czekaniem na okreôlonego rastra . WyglÌda
to tak:
					

		dc.w	$xx07,$fffe	; xx - nr.rastra

    TeÓ bardzo proste !!!

Przesîanie koloru :
		
		dc.w	$0rgb,$0180	; xxx wartoôci kolorÑw
					; r - natëÓenie czerwonego
					; g -  - || -   ûielonego
					; b -  - || -   niebieskiego
    Super îatwe !!!

A teraz przykîad :

	Start:
		move.l	#Copper,$dff080
		clr.w	$dff088
	Loop:
		btst	#6,$bfe001
		bne		Loop
	Copper:
		dc.w	$5007,$fffe	; czekanie na 50 rastra
		dc.w	$0555,$0180	; kolor	555
		dc.w	$5107,$fffe	; czekanie na 51 rastra
		dc.w	$0777,$0180	; kolor 777
		dc.w	$5207,$fffe	; itd.
		dc.w	$0999,$0180
		dc.w	$5307,$fffe
		dc.w	$0777,$0180
		dc.w	$5407,$fffe
		dc.w	$0555,$0180
		dc.w	$5507,$fffe
		dc.w	$0000,$0180
		dc.w	$ffff,$fffe

	Tym,ktÑrym nie chce sië przepisywaÍ,wystarczy zajrzeÍ do
katalogu "Sources" . Znajdzecie tam przykîad lepszego i dok-
îadniejszego Coppera .


				                        Keri of MeditatioN
							     			1992.IV.13
