Witam, wie może ktoś z was czy jest w pascalu jakaś funkcja lub procedura zawarta w standardowych modułach do zmiany znaków z klawiatury na kod ASCII, lub zmiany liczb dziesiętnych na liczby binarne i czy można zdeklarować tablicę którą program by rozpoznawał jako tablicę liczb binarnych ?
Wszystko jest ok, ale w Turbo Pascalu. Program jeszcze nie jest napisany nawet w połowie, więc dużo mu do celu jakim jest obsługa biblioteki. Przykro mi ale z Free pascalem ci nie pomogę. Za dużo pieniędzy wydałem na TP, żeby z tego rezygnować. I będę bronił Borland/Turbo Pascal-a aż do śmierci :) Tymczasem mi chodzi o kompilator Free Pascala, który...
Poniżaj zamieszczam mój program. Konfigurujesz i po odbiorze chwali się tym co dostał w ASCII więc literki, cyferki i znaki. Program napisany w Delphi więc jak kolega jest zainteresowany to udostępnie kod w Object Pascalu. PS. Na dole masz białe pole - wpisz coś i ENTER, aby wysłać.
Dokladnie, moze to byc dowolny klawisz, wystarczy ze zaraz po pobraniu tego klawisza sprawdzisz jego kod (ASCII) funkcja IF... Enter ma jak dobrze pamietam #13. Pozdrawiam
Szyfr Cezara. Dokonaj skoku na koniec pliku i po każdym odczycie skacz wstecz (Seek - jeśli dobrze pamiętam). Z dodaniem kodu ASCII chyba nie powinno być problemu? Możesz równocześnie zapisywać wynik do drugiego pliku.
Tak się zastanawiam czy zamiast obróbki bitmapy w programie nielepiej było by wcześniej za pomocą programu graficznego np IrfanView przekształcić obrazek na czarnobiały o danej rozdzielczości a następnie zapisać w formacie RAW czyli bez jakichkolwiek nagłówków w pliku. Wówczas konwersja pliku podczas działania programu była by bardzo uproszczona. Pozostaje...
Czy wie ktoś, jak to zrobić, żeby program napisany w pascalu zapisywał pliki txt w kodowaniu ASCII? Piszę program szyfrujący, który wstawia zamienione litery do pliku tekstowego, a szyfr zawiera polskie znaki, które są w ASCII. Plik jednak zapisany jest (chyba) w ANSI i zamiast polskich znaków są w nim jakieś krzaczki. Co zrobić, aby te znaki były poprawnie...
Z tego co pamiętam z dawnych wdrożeń programów FK-GM, to czytniki kodów paskowych na portach szeregowych były obsługiwane programowo, czyli musi być oprogramowanie komunikacyjne samego portu wraz z dekoderem otrzymanej porcji danych według jednego ze standardów kodowania Nie sądzę, aby sam system operacyjny mógł sterować czytnikiem, ale poszukaj w Internecie,...
1) Nie programowałem w Pascalu wieki, ale na pierwszy rzut oka - czy read(liczba); nie zwraca czasem kodu ASCII wpisanego znaku? wówczas w case należałoby liczby ująć w apostrof, '1'. 2) Widzę literówkę przy "procedure". 3) Radzę nauczyć się używać wcięć.
Panowie elektronicy przepraszam jeżeli to co powiem jest głupie ale nie pisałem programów na mikrokontrolery i mogę się mylić, to co napisze opiera się na niewielkich doświadczeniach z VB na kompach. Ja mam pomysł żeby w programie mikrokontrolera napisać interpretator poleceń zawartych w eeprmie. Widzę to w ten sposób że program ma kilka określonych...
Ja programuję w Tubo Pascalu, ale w C++ będzie tak samo. Jeśli chodzi o COM, to nie wiem. Jeśli chodzi o LPT to sprawa jest stosunkowo prosta: Diody podłączasz tak, że minus jest na GND, a plus na piny wyjściowe, jest ich 8, nie pamiętam pinouta LPT, ale znalezienie go to żaden problem. To, jak zaimplementować w C++, znajdziesz w każdym lepszym "poradniku"...
Ja używam programu Free Pascal IDE. Własnie a jak zoblokowac litery bo jak sie wcisnie np. h to sie program wyłączy Dlatego właśnie powinieneś użyć modułu CRT i jego funkcji READKEY wtedy nie trzeba naciskać enter-a gdyż program monitoruje czy nie nacisneliśmy jakiegoś klawisza, następnie porównujemy kod ASCII naciśniętego klawisza z kilkoma opcjami...
Witam. Jak juz wszyscy sie wtracaja, to ja tez. Napisz procedurke: procedure GetKey; assembler; asm in al.60h mov [Key], al mov ah,0Ch mov al,0 int 21h end; i zadeklaruj zmienna globalna var Key: byte Procedurka wczytuje klawisz z portu klawiatury, nastepnie czysci bufor klawiatury (tu uwaga do Caladan - jak nie wiesz, o czym piszesz, to...
Poprawiony program: program quiz; type pytanie=record pytanie,a,b,c,d:string[150]; prawidlowa:string[15]; oznaczono:boolean; end; var pytania:array[1..50] of pytanie; wybrane:array[1..10] of pytanie; i,j,pom,prawidlowo:integer; wybrano:string; begin pytania[1].pytanie:='Polecen...
Programowania orientowanego obiektowo - podobno - bardzo ciężko jest się nauczyć samemu. Wszyscy guru zalecają przede wszystkim znalezienie sobie mentora - kogoś, kto łagodnie wprowadzi w świat tego programowania. Z mojego doświadczenia wynika ponadto, że osobom, które programowały już proceduralnie, jest jeszcze ciężej. Bardzo ciężko jest wykorzenić...
Coś tam mi wyszło :P. Jestem zerem z pro także to jest dla mnie coś :P: [syntax=pascal]program gwiazda; uses crt; var a: byte; begin clrscr; for a:=1 to 5 do writeln('*'); readln; end.[/syntax] Pytanie do Was takie: Jak dodać do programu zamykanie (podanym przez nas) klawiszem?? Wiem, że coś z kodami ASCII, ale jak to zadeklarować???
arnoldziq. Dostałeś pomógł, bo na prawdę mi pomogłeś. Chodzi o funkcję ReadKey oraz KeyPressed. To eliminuje użycie asemblera do odczytu znaków z klawiatury. Reszcie dziękuję za spopularyzowanie tego tematu. Ogólnie to program chodzi paskudnie. Działa bardzo powoli. Spodziewałem się tego. Ale na początek nauki programowania wystarczy. Na razie nie chcę...
Robię program, który po wpisaniu danych narysuje prostokąt. Używam znaków ASCII, więc nie dziwić się tymi char(218) dla przykładu. Oto program: [syntax=pascal]program rysowanie; uses crt; var i,sz,dl:integer; BEGIN clrscr; write('Podaj szerokość prostokatu: '); readln(sz); write('Podaj długość prostokątu: '); readln(dl); clrscr; gotoxy(1,1); write(char(218));...
Zauważyłem, że Malolatt pisał też coś o użyciu putchar, więc wykorzystam to jako pretekst i przedstawię własną wersję programu, chociaż już dawno nic w C nie pisałem. Pozwolę sobie też na skomentowanie tego i owego w nadziei, że jeśli zrobię gdzieś pomyłkę to beluosus się nie obrazi i mnie poprawi. beluosus , czyli poprzez użycie zmiennej (const unsigned...
No to na takiej samej zasadzie dzial tylko ten program to na rekordach jest zrobiony zdajsie:) a jak chcesz sie poruszac kursorem to musisz znalesc odpowiedni kod ascii klawisza i jak go wcisniej to przejdzie tam gdzie ma przejsc
Funkcja ord( z ) zwraca kod ascii od z, a 13 to kod ascii entera - czyli program zaproponowany przez kolegę czeka na enter. Generalnie jeżeli nie jeteśmy pewni co do ilości wprowadzanych znaków, to czytamy je pojedyńczo i czekamy ma znacznik końca wprowadzania czyli enter ( ew. na escape lub inne ) przy czym kolego redie podawanie gotowych rozwiązań...
Brawo. To dokładnie miałem na myśli. To prehistoria, więc na tamte czasy więcej niż dopracowany. To co napisałem nie miało dotyczyć jednak wcześniejszych maszyn niż PC (swoją drogą 8086 był 16-bitowy), dlatego napisałem o tym ograniczeniu. Na ICL1900/1305 też było ograniczenie pamięci (musiało być), ale całkiem inaczej robione. Najpopularniejszy chyba...
Zmieniłam według opisu na: [syntax=pascal]program miniszyfr; uses crt; const n=20; var dlugosc, s: byte; napis:string[n]; begin clrscr; writeln('wypisz wyraz'); readln(napis); dlugosc:=length(napis); Pos('20',s); write(miejsca spacji,'s'); readln; end.[/syntax] Myślałam też,żeby zrobić to za pomocą funkcji paramstring,ale też znajduje błędy w programie:...
1. No gdyby był trudniejszy, to bym zaczął marudzić, że kawa mi się rozpuściła i nie widać błędów, a szklana kula potłukła... 2. W nazwach: programów , zmiennych, stałych, procedur, funkcji nie wolno stosować znaków spoza zakresu A-Z,a-z,0-9,_ (ANSI, a więc z podstawowego zakresu tablicy ASCII) a na dodatek pierwszym znakiem musi być litera lub _ 3....
Jak się nie da ? Da się - otwierasz port Com i wysyłasz bajty. A to że korzystasz z funkcji PORT która nie działa dla virtual port to już nie nasz wina. Piszesz program w jakimś innym języku, znasz Pascala wiec Delphi powinno Ci spasować, a jak nie to C,C++,C# i wiele innych. Jeśli w ramach testów chcesz sprawdzić czy przejściówka działa, to otwórz...
Narazie postanowiłem skupić się na szyfrze cezara. Mam zamiar go dopracować. Napisałem próbny kod i mam pytania: dlaczego jeśli wpisuję klucz szyfrowania, nie mogę tego zrobić z NumLocka?; co robią funkcje 'chr' i 'ord'?; czy odpowiednikiem spacji w kodzie ascii jest przecinek? program asd; var i,klucz:byte; slowo:string; begin write ('Podaj...
Z tego co zdążyłem zauważyć na podanej stronie, to ten "1 byte checksum" dodaje wartości ASCII poszczególnych znaków i zwraca najmniej znaczący bajt tej sumy. M + 2 + 0 + 1 + 0 + 0 77 + 50 + 48 + 49 + 48 + 48 = 320 320 mod 256 = 64 [syntax=pascal]program CRC; function CRC1BYTE(ciag: string):byte; var x,suma : word; begin suma:=0; for x:=1 to length(ciag)...
Najczęściej zadawane pytania : Jaki język programowania wybrać? Wszystkich, których interesuje to pytanie, kieruję do wyszukiwarki forum, lub do dokładnego przejrzenia tego wątku : - Jaki język programowania wybrać ? Obsługa Portu LPT : - LPT FAQ - VisualBasic6 i INNE RS232 pod Linux : - Serial-Programming-HOWTO.pdf Visual Basic : - 0-255 ASCII Przez...
programy pascalu programy turbo pascalu kalkulator pascalu
nierówne obroty silnika astra subwoofer modecom monter elektronik
Zbyt krótkie przełożenie 5. biegu w Renault Laguna Kolor kabla biegu wstecznego Skoda Fabia 2