Otwieramy nasz magazynowy kuferek. Wrzuciliômy do niego to wszystko, czego nie da sië wtîoczyê w ramy innych dziaîów, a czego naszym zdaniem nie powinno w Magazynie AMIGA zabraknâê.
Znajdziecie tu zarówno sztuki i sztuczki, jak i krótkie, lecz przydatne porady, programiki genialne i caîkiem do niczego, a takûe to, o czym jeszcze nawet sami nie mamy pojëcia - bowiem schowaîo sië na samym dnie kuferka i nie zdâûyliômy sië jeszcze do tego dokopaê. Przy odrobinie wysiîku ze swojej strony bëdziecie mogli takûe znaleúê w naszym kuferku doôê praktycznâ nagrodë. Kaûdy, kto przeôle na adres redakcji coô, co bëdzie moûna wîoûyê do kuferka (czyli nigdzie dotâd nie opublikowanâ sztuczkë, poradë itp) - otrzyma w zamian cztery czyste, lecz mimo tego i tak wspaniaîe, dyskietki Verbatim 3.5 cala. A teraz przekrëcamy klucz w kîódce... i juû moûemy oddaê sië lekturze.
UWAGA: Teksty przeznaczone dla "zaawansowanych" uûytkowników majâ w tytule trzy gwiazdki. Dwie gwiazdki to teksty dla "klasy ôredniej", zaô to, co oznaczone jest w tytule jednâ gwiazdkâ - nie powinno sprawiê kîopotu nawet poczâtkujâcym. Nasza selekcja nie wyklucza jednak moûliwoôci czytania wszystkiego przez wszystkich.
Kaûdy z nas uwielbia pîataê bliúnim psikusy. W tym celu
moûna sië takûe posîuûyê Amigâ. Naleûy tylko wpisaê kilka
poniûszych linijek, wykorzystujâc w tym celu krytykowany zewszâd
AMIGA BASIC, i uruchomiê stworzony tak program.
UWAGA: Aby poniûsza procedura zadziaîaîa wîaôciwie, w
aktualnym katalogu musi znajdowaê sië zbiór
"exec.bmap".
LIBRARY "exec.library"
FOR x=0 TO 1
a&(X) = PEEKL(PEEKL(WINDOW(8)+4)+8+x*4)
NEXT SCREEN 1,640,256,2,2
WINDOW 1,,,0,1
FOR x=0 TO 1
b& = PEEKL(PEEKL(WINDOW(8)+4)+8+x*4)
CALL
CopyMemQuick(a&(x),b&,20480&)
NEXT
LIBRARY CLOSE
Poczekaj, aû program zakoïczy dziaîanie, a nastëpnie spróbuj zmieniê coô na ekranie Workbench'a. ...No i co? Nic sië nie da zrobiê! Czyûby Amiga sië zepsuîa? Kaûdy doôwiadczony uûytkownik Amigi natychmiast zauwaûy, ûe nic takiego sië nie zdarzyîo. Program skopiowaî tylko wszystkie dane graficzne Workbench'a z ekranu (jaki "normalnie" zgîasza sië po wczytaniu WB) na drugi ekran. Rzecz jasna, przy okazji nieco namieszaî. Na tak spreparowanym ekranie nie da sië przesunâê okna, nie moûna go takûe powiëkszaê czy pomniejszaê. Aby przywróciê stan "normalny" komputera, wystarczy nacisnâê jednoczeônie klawisze [N] i [lewy klawisz Amiga].
UWAGA: Na starszych klawiaturach zamiast "lewej" Amigi znajduje
sië w tym miejscu klawisz z logo Commodore [C=].
Rzecz jasna, procedury tej moûesz uûyê takûe w nieco
powaûniejszych programach.
Opisane poniûej wskazówki sâ "wytrychami". Nie sâ one zalecane w oficjalnych wytycznych dla programistów (no proszë! nawet na Zachodzie coô takiego teû majâ - red.), poniewaû zgodnie z reguîami, powinno sië wykonywaê obie opisane poniûej czynnoôci za pomocâ sprawdzenia flag IDCMP. Ale poniewaû dziaîajâ i nie psujâ przy tym komputera, to chyba moûna je stosowaê, zwîaszcza ûe w przypadku Amiga BASIC "oficjalne" procedury sâ wyjâtkowo czasochîonne. Prosimy doktora Piotra (nie, nie ten - chodzi o dr. Petera Kittela - red.) o wybaczenie.
' REAKCJA PRAWEGO KLAWISZA MYSZY
WHILE PEEK(14675990&) AND 4: WEND.
Ten sam efekt moûna uzyskaê równieû przez:
PEEKW(14675990&) AND 1024
ale funkcja PEEK jest nieco szybsza niû PEEKW
'SPRAWDZANIE ZMIANY DYSKIETKI
WHILE PEEK(12574721&) AND 16: WEND
PRINT "Dyskietka byîa zmieniona"
(Od redakcji: Stosowanie "nielegalnych" sztuczek wymaga rozwagi. Mogâ one spowodowaê, ûe program nie zadziaîa, na przykîad wówczas, gdy idâc z postëpem wymienisz swój procesor, powiedzmy, na 68010).