TBXL: Wczytanie obrazka - Historia wersji

Sikor: /* Zobacz też */ poprawa linku

2010-05-26T21:23:39Z

Zobacz też: poprawa linku

← poprzednia wersja		Wersja z 26 maj 2010, 22:23
Linia 30:		Linia 30:

	== Zobacz też ==		== Zobacz też ==
	* [[TBXL:Wczytanie danych do pamięci]]		* [[TBXL: Wczytanie danych do pamięci]]

	[[Kategoria:Niezbędnik kodera]]		[[Kategoria:Niezbędnik kodera]]

KMK: popr. wymiarowania

2010-05-26T20:20:28Z

popr. wymiarowania

← poprzednia wersja		Wersja z 26 maj 2010, 21:20
Linia 18:		Linia 18:
	* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]		* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]
	<pre>		<pre>
	100 DIM OBRAZ$(6400):OBRAZ$="#": REM -> dla 160x160 lub 7680 dla 160x192		100 DIM OBRAZ$(6400):OBRAZ$(6400)="#": REM -> dla 160x160 lub 7680 dla 160x192
	110 OPEN #1,4,0,"D:nazwa_obrazka.MIC"		110 OPEN #1,4,0,"D:nazwa_obrazka.MIC"
	120 BGET #1,ADR(OBRAZ$),6400 :REM -> dla 160x160 lub 7680 dla 160x192		120 BGET #1,ADR(OBRAZ$),6400 :REM -> dla 160x160 lub 7680 dla 160x192

KMK: ++

2010-05-26T20:19:55Z

← poprzednia wersja		Wersja z 26 maj 2010, 21:19
Linia 13:		Linia 13:
	160 ENDPROC:REM procedura powinna mieć swoje zakończenie		160 ENDPROC:REM procedura powinna mieć swoje zakończenie
	</pre>		</pre>

			'''UWAGA:''' przy wybieraniu wartości "adresu_obrazka" trzeba pilnować, żeby znalazł się on między wartością wskazywaną przez wektor APPMHI ($0E-$0F), a wartością wskazywaną przez wektor MEMTOP ($02E5-$02E6). Dodatkową komplikacją jest fakt, że APPMHI zmienia się w trakcie działania programu (zwiększa go np. wejście do pętli FOR/NEXT, albo wykonanie GOSUB, zmniejsza - wyjście z pętli albo wykonanie RETURN).

	* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]		* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]

KMK: poprawki (BGET nie wymiaruje stringu + drób)

2010-05-26T20:12:52Z

poprawki (BGET nie wymiaruje stringu + drób)

← poprzednia wersja		Wersja z 26 maj 2010, 21:12
Linia 7:		Linia 7:
	110 OPEN #1,4,0,"D:NAZWA.EXT":REM pod nazwa.ext podstawiamy odpowiednią nazwę obrazka. Open otwiera kanał IOCB		110 OPEN #1,4,0,"D:NAZWA.EXT":REM pod nazwa.ext podstawiamy odpowiednią nazwę obrazka. Open otwiera kanał IOCB
	120 BGET #1,$adres_obrazka,ilość_bajtow:REM adres obrazka - gdzie wczytujemy dane, na przykład $6000,		120 BGET #1,$adres_obrazka,ilość_bajtow:REM adres obrazka - gdzie wczytujemy dane, na przykład $6000,
	ilość bajtów - wielkość obrazka w bajtach, odpowiednio 6400 lub 7680, ~~ewntualnie~~ plus 4 bajty dla obrazka MIC		ilość bajtów - wielkość obrazka w bajtach, odpowiednio 6400 lub 7680, ewentualnie plus 4 bajty dla obrazka MIC
	130 CLOSE #1:REM pamiętamy o zamknięciu kanału IOCB		130 CLOSE #1:REM pamiętamy o zamknięciu kanału IOCB
	140 GRAPHICS n:REM używamy odpowiedniego trybu graficznego, na przykład 24 (8+16)		140 GRAPHICS n:REM używamy odpowiedniego trybu graficznego, na przykład 24 (8+16)
	150 MOVE $adres_obrazka,~~dpeek~~(88),wielkość_obrazka:REM tu wyświetlamy		150 MOVE $adres_obrazka,DPEEK(88),wielkość_obrazka:REM tu wyświetlamy
	160 ENDPROC:REM procedura powinna mieć swoje zakończenie		160 ENDPROC:REM procedura powinna mieć swoje zakończenie
	</pre>		</pre>
Linia 16:		Linia 16:
	* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]		* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek\|Larka]]
	<pre>		<pre>
	100 DIM OBRAZ$(6400) : REM -> dla 160x160 lub 7680 dla 160x192		100 DIM OBRAZ$(6400):OBRAZ$="#": REM -> dla 160x160 lub 7680 dla 160x192
	110 OPEN #1,4,0,"D:nazwa_obrazka.MIC"		110 OPEN #1,4,0,"D:nazwa_obrazka.MIC"
	120 BGET #1,ADR(OBRAZ$),6400 :REM -> dla 160x160 lub 7680 dla 160x192		120 BGET #1,ADR(OBRAZ$),6400 :REM -> dla 160x160 lub 7680 dla 160x192
Linia 23:		Linia 23:
	</pre>		</pre>

	* Dla obrazów typu MIC mamy dodatkowe 4 bajty (przed danymi obrazu lub za nimi), należy wtedy pamiętać o odpowiednim ustawieniu adresu obrazu. Te cztery bajty zawierają ~~rejestry~~ kolorów~~, które także możemy wykorzystać w swoich programach~~.		* Dla obrazów typu MIC mamy dodatkowe 4 bajty (przed danymi obrazu lub za nimi), należy wtedy pamiętać o odpowiednim ustawieniu adresu obrazu. Te cztery bajty zawierają wartości czterech rejestrów kolorów (od COLPFS1 do COLBAKS).
	== Uwagi dodatkowe ==		== Uwagi dodatkowe ==
	* Korzystając z metody stosowanej przez Sikora, wpisując jako adres_obrazka ~~dpeek~~(88) możemy obrazek załadować bezpośrednio na ekran.		* Korzystając z metody stosowanej przez Sikora, wpisując jako adres_obrazka DPEEK(88) możemy obrazek załadować bezpośrednio na ekran.

	== Zobacz też ==		== Zobacz też ==
	* [[TBXL: Wczytanie danych do pamięci]]		* [[TBXL:Wczytanie danych do pamięci]]

	[[Kategoria:Niezbędnik kodera]]		[[Kategoria:Niezbędnik kodera]]

Sikor o 15:56, 26 maj 2010

2010-05-26T15:56:15Z

← poprzednia wersja		Wersja z 26 maj 2010, 16:56
Linia 6:		Linia 6:
	100 proc OBRAZEK: REM w TBXL stosujemy procedury		100 proc OBRAZEK: REM w TBXL stosujemy procedury
	110 OPEN #1,4,0,"D:NAZWA.EXT":REM pod nazwa.ext podstawiamy odpowiednią nazwę obrazka. Open otwiera kanał IOCB		110 OPEN #1,4,0,"D:NAZWA.EXT":REM pod nazwa.ext podstawiamy odpowiednią nazwę obrazka. Open otwiera kanał IOCB
	120 BGET #1,$adres_obrazka,ilość_bajtow:REM adres obrazka - gdzie wczytujemy dane, na przykład $6000, ilość bajtów - wielkość obrazka w bajtach, odpowiednio 6400 lub 7680, ewntualnie plus 4 bajty dla obrazka MIC		120 BGET #1,$adres_obrazka,ilość_bajtow:REM adres obrazka - gdzie wczytujemy dane, na przykład $6000,
			ilość bajtów - wielkość obrazka w bajtach, odpowiednio 6400 lub 7680, ewntualnie plus 4 bajty dla obrazka MIC
	130 CLOSE #1:REM pamiętamy o zamknięciu kanału IOCB		130 CLOSE #1:REM pamiętamy o zamknięciu kanału IOCB
	140 GRAPHICS n:REM używamy odpowiedniego trybu graficznego, na przykład 24 (8+16)		140 GRAPHICS n:REM używamy odpowiedniego trybu graficznego, na przykład 24 (8+16)

Sikor o 15:54, 26 maj 2010

2010-05-26T15:54:57Z

Nowa strona

Poniżej znajdują się przykłady dla wczytania i wyświetlenia standardowego obrazu dla Atari dla trybów graficznych. Dane obrazu mają zazwyczaj 6400 (z oknem tekstowym) lub 7680 (bez okna) bajtów.

* Wczytanie i wyświetlenie danych bezpośrednio do pamięci, sposób stosowany zazwyczaj przez [[Sikor]]a

<pre>
100 proc OBRAZEK: REM w TBXL stosujemy procedury
110 OPEN #1,4,0,"D:NAZWA.EXT":REM pod nazwa.ext podstawiamy odpowiednią nazwę obrazka. Open otwiera kanał IOCB
120 BGET #1,$adres_obrazka,ilość_bajtow:REM adres obrazka - gdzie wczytujemy dane, na przykład $6000, ilość bajtów - wielkość obrazka w bajtach, odpowiednio 6400 lub 7680, ewntualnie plus 4 bajty dla obrazka MIC
130 CLOSE #1:REM pamiętamy o zamknięciu kanału IOCB
140 GRAPHICS n:REM używamy odpowiedniego trybu graficznego, na przykład 24 (8+16)
150 MOVE $adres_obrazka,dpeek(88),wielkość_obrazka:REM tu wyświetlamy
160 ENDPROC:REM procedura powinna mieć swoje zakończenie
</pre>

* Wczytanie i wyświetlenie danych jako zmienna tekstowa, sposób stosowany przez [[Larek|Larka]]
<pre>
100 DIM OBRAZ$(6400) : REM -> dla 160x160 lub 7680 dla 160x192
110 OPEN #1,4,0,"D:nazwa_obrazka.MIC"
120 BGET #1,ADR(OBRAZ$),6400 :REM -> dla 160x160 lub 7680 dla 160x192
130 CLOSE #1
140 MOVE ADR(OBRAZ$),DPEEK(DPEEK(560)+4),6400 :REM -> dla 160x160 lub 7680 dla 160x192, wyświetlenie
</pre>

* Dla obrazów typu MIC mamy dodatkowe 4 bajty (przed danymi obrazu lub za nimi), należy wtedy pamiętać o odpowiednim ustawieniu adresu obrazu. Te cztery bajty zawierają rejestry kolorów, które także możemy wykorzystać w swoich programach.
== Uwagi dodatkowe ==
* Korzystając z metody stosowanej przez Sikora, wpisując jako adres_obrazka dpeek(88) możemy obrazek załadować bezpośrednio na ekran.

== Zobacz też ==
* [[TBXL: Wczytanie danych do pamięci]]

[[Kategoria:Niezbędnik kodera]]