Nie jesteś zalogowany. Proszę się zalogować lub zarejestrować.
FreeMiNT OS Distro Pełna, bootowalna dystrybucja systemu operacyjnego FreeMiNT dla 32-bitowych komputerów Atari.
Atari800MacX 6.1.0 Popularny emulator Atari na Maca otrzymuje wsparcie dla FujiNet/NetSIO oraz liczne poprawki błędów!
RastaConverterBeta19 Najnowsza wersja RastaConvertera wprowadza nowe funkcje odległości kolorów, w tym domyślne "rasta".
Test7800 0.7.1 Nowa wersja emulatora Test7800 w wersji 0.7.1 przynosi usprawnienia w obsłudze Drag and Drop oraz poprawki POKEY dla Stone Age.
Nadchodzi Rogul na Atari ST/STE Konwersja znakomitego Fantasy-Hack'n Slash-Roguelike Rogul z małego Atari na platformy ST/STE
atari.area forum » Programowanie - 16/32bit » ASM w Pure Pascalu
Strony 1
Zaloguj się lub zarejestruj by napisać odpowiedź
No właśnie jak zrobić wstawkę w asemblerze w PP, chodzi o instrukcję MOVE ? Próbowałem ASM, ale nie działa mi to.
Dokładnie to chodzi o ten nieszczęsny odczyt z adresu i zapis pod adres.
Maxon Pascal ma biblio STPascal.UNI i dzięki niemu można użyć PEEK i POKE, a co z tym ziemniaczanym (puree) Pascalem?
Pure Pascal nie ma wstawek. Musisz zrobić osobny plik w asm.
Nie znam Pascala, ale nie ma tam wskaźników jak w C?
Nie znam Pascala, ale nie ma tam wskaźników jak w C?
Oczywiście, że są.
Po polsku ziemniak to też pyra.
PyraPascal.
Nie wiem jak w Pure Pascalu, ale w Turbo można było po prostu podmapować zmienną pod adres w pamięci. Np.
const
IOMem = $f0000000;
var
{ This address has no actual meaning }
MyPort: Byte absolute IOMem + $c030;Wtedy do pamięci (rejestru) można się odnosić jak do zmiennej.
Wskaźniki z Pascalu ładnie opisane są na stronie Pascal - Pointers. Jest tam też opis, jak odwoływać się do komórek pamięci.
Dzięki serdeczne za wszelkie podpowiedzi, pytanie zasadnicze jak to jest konkretnie w Puree Pascalu.. Inaczej w Alice, HI, Maxon itd...
Obaczym i napiszem.
Dokładnie to chodzi o ten nieszczęsny odczyt z adresu i zapis pod adres.
Move da się zrobić na wskaźnikach:
sptr, dptr: ^integer;
sptr := adr1;
dptr := adr2;
dptr^ := sptr^;Ale jak do jasnej ******* odczytać BAJT z KONKRETNEGO adresu np: $12345. Ja mam mózg zniszczony przez Basic i za ChRL nie rozumiem jego dziadostwa (wskaźników).
Jeżeli chcę odczytywać po bajcie, to deklaruję:
wsk : ^byte;gdy potem piszę:
wsk := $12345to jest błąd, że typy niezgodne. Nic z tego nie rozumiem.
Wskaźniki w Pascalu definiuje się jako typy, nie zmienne:
type
Cptr = ^char;
var
a : Cptr;Jeśli po prostu chcesz wypisać zawartość pamięci spod adresu, to powinno wystarczyć:
var
y: ^word;
begin
y := $FFFF;
writeln(y^);
end.EDIT: Przemyślę to, bo nic nie kumam
Sorry, pospieszyłem się i nie sprawdziłem, czy poprzedni przykład jest prawidłowy. Spróbuj poniższej konstrukcji. Nie mam chwilowo dostępu do deasemblera, aby sprawdzić, co z tego wychodzi, ale wstępne testy w debuggerze Pure Pascala wydają się być obiecujące.
type
char_ptr = ^char;
var
s, d : char_ptr;
begin
s := char_ptr($12345);
d := char_ptr($23456);
s^ := d^
end.Wskaźniki w Pascalu definiuje się jako typy, nie zmienne:
Można, ale nie trzeba. Chociaż w moim przykładzie jest to konieczne. :-)
Jeśli po prostu chcesz wypisać zawartość pamięci spod adresu, to powinno wystarczyć:
var y: ^word; begin y := $FFFF; writeln(y^); end.
Powyższe nie zadziała. Próbujesz przypisać wartość wskaźnikowi. To jest to, na czym się wyłożyłem w poprzednim poście.
s := char_ptr($12345);
d := char_ptr($23456);No właśnie tak. Swoją drogą nigdzie takiego zapisu nie widziałem. Każda wersja Pascala na Atari pozwala na inne rzeczy, a książki znalazłem tylko do Hi i Personal.
Dostałem podpowiedź:
https://www.atari-forum.com/viewtopic.p … 80#p440880
i faktycznie teraz działa, choć nie w moim przypadku :) Prosty program działa z wpisaniem pod adres i odczytem, ale zapisywanie do rejestrów karty już coś nie bardzo. Mam program który wykrywa kartę SB i odgrywa prostą melodyjkę.
Wersja Maxon (PEEK, POKE) działa, wersja Puree (ze wskaźnikiem) nie. Muszę to jeszcze raz obejrzeć, bo może jest jakiś czeski błąd, albo kwestia ustawień kompilatora, plik wynikowy jest znacznie większy niż pod Maxon'em.
EDIT: Lizard: tylko deklaracja typu, bez zmiennej.
Tak jak podejrzewałem, kwestia wybrania opcji w kompilatorze i gra muzyka :)
Teraz Pinokio idzie dalej sam :) Przynajmniej spróbuję.
Zmienna nie jest potrzebna, jeżeli lubisz takie fikołki składniowe, jak w przytoczonym przykładzie. :-) Osobiście wolę uproszczony zapis.
Nie zastanawiałeś się nad Puree z C? Tam odwołania do pamięci są czymś naturalnym.
Akurat program który próbuję przerobić jest w Pascalu, więc uznałem że tak będzie szybciej. Na razie zaplątałem się w sieci begin i end :)
Strony 1
Zaloguj się lub zarejestruj by napisać odpowiedź
atari.area forum » Programowanie - 16/32bit » ASM w Pure Pascalu
Wygenerowano w 0.020 sekund, wykonano 59 zapytań