-
Path: news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: Michał Lankosz <m...@t...pl>
Newsgroups: pl.misc.elektronika
Subject: 32-bity dla Bascomowców
Date: Thu, 19 Jul 2012 14:25:34 +0200
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 40
Message-ID: <ju8uc5$akm$1@inews.gazeta.pl>
NNTP-Posting-Host: 91.232.62.46
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
X-Trace: inews.gazeta.pl 1342700742 10902 91.232.62.46 (19 Jul 2012 12:25:42 GMT)
X-Complaints-To: u...@a...pl
NNTP-Posting-Date: Thu, 19 Jul 2012 12:25:42 +0000 (UTC)
X-User: dxfm
User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:14.0) Gecko/20120713 Thunderbird/14.0
Xref: news-archive.icm.edu.pl pl.misc.elektronika:634118
[ ukryj nagłówki ]
http://www.mikroe.com/eng/products/view/753/mikrobas
ic-pro-for-arm/
Za Basicem nie przepadam. Specjalnie dla Tibbo trochę musiałem grzebnąć
w tym języku. Za to Bascomowcom przesiadkę na 32 bity pewnie ułatwi,
szczególnie że już wspiera popularne i tanie u nas układy STM32.
Przykład chyba dobrze wygląda, a zapis typu @nazwa nie odstraszy aż tak
bardzo...
' Project name:
' Button_Test (Sample usage of Button() function)
[...]
program Button_Test
dim oldstate as byte
main:
GPIO_Digital_Input(@GPIOA_BASE, _GPIO_PINMASK_0) ' Set PA0 as
digital input
GPIO_Digital_Output(@GPIOD_BASE, _GPIO_PINMASK_ALL) ' Set PORTD as
digital output
oldstate = 0
while TRUE
if (Button(GPIOA_IDR, 0, 1, 1) <> 0) then ' detect
logical one on PA0 pin
oldstate = 1 ' update flag
end if
if (oldstate and Button(GPIOA_IDR, 0, 1, 0)) then ' detect
one-to-zero transition on PA0 pin
GPIOD_ODR = not GPIOD_ODR ' invert
PORTD value
oldstate = 0 ' update flag
end if
wend ' endless loop
end.
--
Michał
Najnowsze wątki z tej grupy
- Thunderbird i dysk...
- opornosc falowa
- Bateria 9V 6F22, alkaliczna v cynkowa, samorozładowanie, bateria wysokiej trwałości do miernika
- Tani zakup z ali?
- w czasach LED komary mają ciężko
- walizka z kodami
- Rejestrator temperatur - termopara, siec
- Router LTE z możliwością zmian MTU
- Fajny film widziałem...
- Jaka ładowarka sieciowa do Iphona?
- Taśma izolacyjna do prac elektrycznych
- Recenzja 3.1A ;) w 6 gniazdach...
- Re: Recenzja 3.1A ;) w 6 gniazdach...
- Re: Recenzja 3.1A ;) w 6 gniazdach...
- Re: Recenzja 3.1A ;) w 6 gniazdach...
Najnowsze wątki
- 2025-07-25 Warszawa => Konsultant Wiodący SAP PP <=
- 2025-07-25 Re: Brawo !!! Osy chronione w Niemczech. Za usunięcie gniazda grozi mandat
- 2025-07-25 cudzoziemiec bez biletu
- 2025-07-25 Gdynia => Sales Executive / KAM <=
- 2025-07-25 Inżynierzy z prawomocnym...
- 2025-07-25 Łódź => Mainframe (z/OS, Assembler) Developer <=
- 2025-07-25 Warszawa => Inżynier oprogramowania .Net <=
- 2025-07-25 Kraków => Senior Fullstack Engineer (Low-Code Platform) <=
- 2025-07-25 Skrobanie
- 2025-07-25 Lublin => Konsultant ds. Wdrożeń ERP (moduł FK) <=
- 2025-07-25 Warszawa => Senior Frontend Developer (React + React Native) <=
- 2025-07-25 Re: Boeing Bad Dream (Koszmar) Liner rozbity w Delhi ...
- 2025-07-24 Re: Wypadek kolejowy na stacji Wiesiółka- analiza tragicznego zdarzenia z czerwca 2001 roku.
- 2025-07-23 Re: Tysiące wypadków na niebezpiecznych przejazdach kolejowych a Polskie Linie Kolejowe nic nie robią odlat, bo kierowca pociągu nie ginie
- 2025-07-23 Re: Tysiące wypadków na niebezpiecznych przejazdach kolejowych a Polskie Linie Kolejowe nic nie robią odlat, bo kierowca pociągu nie ginie