Vítejte na Elektro Bastlírn?
Nuke - Elektro Bastlirna
  Vytvořit účet Hlavní · Fórum · DDump · Profil · Zprávy · Hledat na fóru · Příspěvky na provoz EB

Vlákno na téma KORONAVIRUS - nutná registrace


Nuke - Elektro Bastlirna: Diskuzní fórum

 FAQFAQ   HledatHledat   Uživatelské skupinyUživatelské skupiny   ProfilProfil   Soukromé zprávySoukromé zprávy   PřihlášeníPřihlášení 

Podmíněnej překlad Atmel Ax51

 
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů
Zobrazit předchozí téma :: Zobrazit následující téma  
Autor Zpráva
Celeron



Založen: Apr 02, 2011
Příspěvky: 18093
Bydliště: Nový Bydžov

PříspěvekZaslal: so říjen 12 2013, 18:05    Předmět: Podmíněnej překlad Atmel Ax51 Citovat

Ahoj!
Byl jsem donucen se asi po 8 letech vrátit k úpravě nějakýho programovýho balíku v regulaci s Atmelem 89C52. Potřeboval bych v tom udělat podmíněnej překlad aby pouze pro ladění posílal obsah registrů po sériový lince a po odladění se to zase podmíněným překladem přeložilo bez toho odesílání. Vyhrabal jsem dokonce od použitýho macroasembleru AX51 manuál, kde na podmíněnej překlad je funkce:
%iIF(výraz)THEN(text1)ELSE(text2)FI
Má to makat, že pokud je (výraz)=1, se vloží (text1) a při (výraz)=0, se vloží (text2). No a to FI je ukončení funkce.
Používám jen text1, text2 je prázdnej. Šel jsem na to jako u jinejch ASM, na začátku programu nadefinoval:
LADENI EQU 1 ;zapnuti laděni (0=vypnuti)
a pak kde to bylo potřeba vlastní kód odeslání, třeba:
%IF (LADENI) THEN (mov a,r0
mov p1,a
.......) FI

Přeložím a všude výpis "Illegal expresion" což je v chybovníku "špatně zapsaný výraz". Pokud zadám:
%IF (1) THEN (mov a,r0
mov p1,a
.......) FI

tak to maká, jak má. Jenže to je jaksi k prdu, potřebuju to definovat globálně přes jméno. Pokud ale vyzkouším, jakou hodnotu má LADENI, tak je opravdu 1.
Pokud není LADENI v zavorkách, tak to zase hlásí "Mising delimiter"
Netušíte někdo, co dělám blbe? U jinech Makroasembleru to maká a tady nevím proč.
Díky
Jirka
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
procesor



Založen: Oct 02, 2009
Příspěvky: 5286
Bydliště: PO

PříspěvekZaslal: so říjen 12 2013, 18:48    Předmět: Citovat

Zapíš
%IF LADENI==1 THEN....
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Celeron



Založen: Apr 02, 2011
Příspěvky: 18093
Bydliště: Nový Bydžov

PříspěvekZaslal: so říjen 12 2013, 19:29    Předmět: Citovat

Kdepak, pokud to není v závorkách tak hlásí Missing delimiter. Pokud to dám do závorek tak Illegal expression. Jak už jsem psal, maká to jen pokud zadám do závorky za IF 1 nebo 0. Zkusím vyhrabat, doufám že to je inteláckej DOSovej A51 a L51 a zkusím to s níma. Musím ale na starou mašinu, s W7 je to vopruz s mrňavým oknem. Ale jak je to v nich s příkazama makroasembleru, to budu muset někdě stáhnout. Tohle AX51 od Amitu kdoví jestli chodí, v manuálu mají %Repeat (výraz) (text) a taky to píše syntax error pokud zadam %Repeat (3) (NOP) ....
Dík za pokus.
Jirka
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
procesor



Založen: Oct 02, 2009
Příspěvky: 5286
Bydliště: PO

PříspěvekZaslal: so říjen 12 2013, 20:44    Předmět: Citovat

Tak to skús bez % a iných znakov..
IF LADENI = 1 THEN....
Tým IF pre asm je jasné, že nasleduje podmienený preklad.
MicroChip MPASS preferuje "IF" a podporuje aj "#IF" a ".IF"
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Celeron



Založen: Apr 02, 2011
Příspěvky: 18093
Bydliště: Nový Bydžov

PříspěvekZaslal: ne říjen 13 2013, 11:47    Předmět: Citovat

Bez % to hlásí Syntax error. Našel jsem v archivu A51 v1.5 ale nevím autora, možná Intel. Ten se chová úplně stejně. To mě tak namíchlo, že jsem našel na webovkách Kielu balík pro 51 řadu céčko a makroasembler. Kupodivu je volnej jen za registraci, pamatuju, že stával několik desítek. Nainstaloval jsem ho a A51 podmíněnej překlad maká úplně normálně klasika:
IF LADENI=1
...bla, bla...
ENDIF

Trochu práce dá že se všechny definice a volání makra musej opravit.
Sice tam píšou, že po direktivě $MPL by měl umět i Intelácký makra, ale všechno mezi dvěna % se vynechává. Kdoví, jestli to je vůbec Inteláckej zápis....
Původní definice byla:
%*DEFINE(POSLI_NA(PORT,DATA))
(MOV A,#%DATA
MOV DPTR,#%PORT
MOVX @DPTR,A)

A volání:
%POSLI_NA(PB8255,0FFH)
No a u Kielu definice je:
POSLI_NA MACRO PORT,CO
MOV A,#PORT
MOV DPTR,#CO
MOVX @DPTR,A
ENDM

A volání:
POSLI_NA PB8255,0FFH
Akorát zde nejde použít jako u toho původního lokální symbol DATA, nejspíš je globálně rezervovanej.
No vypadá to na všeobecnou spokojenost a navíc si konečně můžu na 51 zablbnout v C.
Díky za pomoc.
Jirka
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
ZdenekHQ
Administrátor


Založen: Jul 21, 2006
Příspěvky: 25741
Bydliště: skoro Brno

PříspěvekZaslal: ne říjen 13 2013, 20:04    Předmět: Citovat

Keil byl vždycky tak drahej a přeplácanej, že ho nikdo nechtěl. Zdarma byl vždycky, ale jen do 2kB výslednýho kódu. Mám na něho crack, zkusil jsem si plnou verzi, ale ani tak mě nezaujal, navíc to ani nemůžu oficiálně používat.

Podmíněnej překlad je věc překladače, co kus, to originál, já teď používám ASEM-51 Copyright (c) 1994, 1996, 2002 by W.W. Heinz .

22000 řádků JSA má přeloženo asi za půl vteřiny, běží pod WIN98 i XP.

Podmíněnej překlad vypadá nějak takto :



kód:
; 10. Conditional Assembly:
; -------------------------
; The most important meta instructions for conditional assembly are
; introduced in this section. The general controls $WARNING and $ERROR,
; and the predefined symbols ??ASEM_51 and ??VERSION are also shown here,
; because the make sense in conjunction with conditional assembly only.

; a.) The IF, IFN, ELSE, and ENDIF meta instructions:

        IF NOTEQ1
          DB 'string 1',0
        ELSE
          IFN EQUAL2
            DB 'string 2',0
          ELSE
            DB 'string 3',0
          ENDIF
        ENDIF

; b.) The IFDEF and IFNDEF meta instructions:

        IFDEF GHOST
          DB 'haunting',0
        ELSE
          DB 'nothing',0
          IFNDEF VAMPIRE
            DB 'boring',0
          ELSE
            DB 'sucking',0
          ENDIF
        ENDIF

; c.) The predefined symbols ??ASEM_51 and ??VERSION,
;     and the general controls $WARNING and $ERROR:

        IFDEF ??ASEM_51               ;product identification
          IF ??VERSION < 0130H        ;version number
            ;display a user-defined warning:
$WARNING(Warning: ASEM-51 version 1.3 (or later)) required.)
          ENDIF
        ELSE
          ;fire a user-defined error message:
$ERROR(Fatal: Assembler is not ASEM-51!)
        ENDIF

_________________
Pro moje oslovení klidně použijte jméno Zdeněk
Správně navržené zapojení je jako recept na dobré jídlo.
Můžete vynechat půlku ingrediencí, nebo přidat jiné,
ale jste si jistí, že vám to bude chutnat[?
]
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu Zobrazit autorovy WWW stránky
Celeron



Založen: Apr 02, 2011
Příspěvky: 18093
Bydliště: Nový Bydžov

PříspěvekZaslal: ne říjen 13 2013, 22:45    Předmět: Citovat

Na toho Heintze jsem taky narazil ale nijak mě neupoutal, nějak se mi tam nepodařilo nalýzt manuál. Co je na Kielu přeplácaný? Vždyť na JSA stačí A51, L51 a OBJHEX. No a nějakej ten Include na rozšíření registrů na chytřejší procesory z řady. 2Kb omezení myslíš jeden modul? Pokud jo, tak není problém udělat kupu kratších. No a pokud by se kroutil Kieláckej linker, tak vemeš nějakej jinej. Teď jsem zkusil s tím staženým Kielem něco přeložit, bin má skoro 11kb, žádnej problém.
Ty příklady zápisu podmíněnýho překladu jsou u Kielu úplně stejný.
Jirka
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Zobrazit příspěvky z předchozích:   
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů Časy uváděny v GMT + 1 hodina
Strana 1 z 1

 
Přejdi na:  
Nemůžete odesílat nové téma do tohoto fóra.
Nemůžete odpovídat na témata v tomto fóru.
Nemůžete upravovat své příspěvky v tomto fóru.
Nemůžete mazat své příspěvky v tomto fóru.
Nemůžete hlasovat v tomto fóru.
Nemůžete připojovat soubory k příspěvkům
Můžete stahovat a prohlížet přiložené soubory

Powered by phpBB © 2001, 2005 phpBB Group
Forums ©
Nuke - Elektro Bastlirna

Informace na portálu Elektro bastlírny jsou prezentovány za účelem vzdělání čtenářů a rozšíření zájmu o elektroniku. Autoři článků na serveru neberou žádnou zodpovědnost za škody vzniklé těmito zapojeními. Rovněž neberou žádnou odpovědnost za případnou újmu na zdraví vzniklou úrazem elektrickým proudem. Autoři a správci těchto stránek nepřejímají záruku za správnost zveřejněných materiálů. Předkládané informace a zapojení jsou zveřejněny bez ohledu na případné patenty třetích osob. Nároky na odškodnění na základě změn, chyb nebo vynechání jsou zásadně vyloučeny. Všechny registrované nebo jiné obchodní známky zde použité jsou majetkem jejich vlastníků. Uvedením nejsou zpochybněna z toho vyplývající vlastnická práva. Použití konstrukcí v rozporu se zákonem je přísně zakázáno. Vzhledem k tomu, že původ předkládaných materiálů nelze žádným způsobem dohledat, nelze je použít pro komerční účely! Tento nekomerční server nemá z uvedených zapojení či konstrukcí žádný zisk. Nezodpovídáme za pravost předkládaných materiálů třetími osobami a jejich původ. V případě, že zjistíte porušení autorského práva či jiné nesrovnalosti, kontaktujte administrátory na diskuzním fóru EB.


PHP-Nuke Copyright © 2005 by Francisco Burzi. This is free software, and you may redistribute it under the GPL. PHP-Nuke comes with absolutely no warranty, for details, see the license.
Čas potřebný ke zpracování stránky 0.20 sekund