RESULT:
Fuses: l=FF h=D9 e=FF
source burned with pony-stk200 via lpt1 and sinaprog (avrdude gui):
> 
ok
> ver
amforth 4.0 ATmega1284P ok
> words
i@ (i!) i! e@ e! not s>d up! up@ >< cmove> unloop i sp! sp@ rp! rp@
+! rshift lshift 1- 1+ xor or and 2* 2/ invert um* um/mod m* + -
log2 d< d> 0> u> u< true 0 0< > < 0= = <> r@ >r r> rot drop over
swap ?dup dup c@ c! ! @ execute exit -int +int show-wordlist +usart
baud tx? tx rx? rx order get-order get-current environment?
environment end-code code abort abort" [char] immediate recurse user
constant variable [ ] ; :noname : does> create ?do leave +loop loop
do again until repeat while begin then else if literal int!
applturnkey is Rdefer Edefer words s" ." .s u. dinvert d- d+ d2* 1ms
fill set-order set-current init-user ee>ram ee-user tib d2/ cmove
dnegate dabs d>s j * defer@ defer! icompare find search-wordlist to
value unused noop ver ?stack interpret depth rp0 sp sp0 cold pause
quit place word /string source cscan parse 2swap >number number char
refill accept cskip throw catch handler ' type count spaces space cr
icount itype s, digit? ud/mod ud.r ud. . d. .r d.r sign #> #s # <#
hold hld within max min abs mod / negate u/mod */ /mod */mod turnkey
bl hex decimal bin ['] , compile ( \ allot here edp dp /key key? key
emit? emit pad #tib >in cell+ cells base state f_cpu  ok
> Pito



----- PŮVODNÍ ZPRÁVA -----
Od: "pito" <[email protected]>
Komu: [email protected], [email protected]
Předmět: Re: [Amforth-devel] 1284p compilation
Datum: 27.8.2010 - 20:12:48

> With (template.asm based on Matthias):
> 
> ; initial baud rate of terminal
> .equ BAUD = 115200
> .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)
> .equ WANT_ISR_RX = 1;
> .if WANT_ISR_RX == 1
> .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)|
> (1<<RXCIE0)
> .else
> .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)
> .endif
> ; 8N1 is commonly used
> .equ USART_C_VALUE = (3<<UCSZ00)
> .include "drivers/usart_0.asm"
> 
> the result of compilation is:
> 
> ATmega1284P memory use summary [bytes]:
> Segment   Begin    End      Code   Data   Used   
> Size   Use%
> ---------------------------------------------------------------
> [.cseg] 0x000000 0x01e7e2   1882   6134   8016 
> 131072   6.1%
> [.dseg] 0x000100 0x000100      0      0      0  
> 16384   0.0%
> [.eseg] 0x000000 0x00003e      0     62     62   
> 4096   1.5%
> 
> Assembly complete, 0 errors. 0 warnings
> 
> I hope WANT_ISR_RX = 1 is what I want.. 
> Pito
> 
> ----- PŮVODNÍ ZPRÁVA -----
> Od: "Matthias Trute" <[email protected]>
> Komu: "Everything around amforth"
> <[email protected]>
> Předmět: Re: [Amforth-devel] 1284p compilation
> Datum: 27.8.2010 - 19:43:36
> 
> > Am Freitag, den 27.08.2010, 17:24 +0200 schrieb
> > pito: 
> > > FYI - result of the compilation for 1284p (avr
> > > studio 4.18), device
> > > > from trunk:
> > > 
> > > AVRASM: AVR macro assembler 2.1.42 (build 1796
> > > Sep 15 2009 10:48:36)
> > > > Copyright (C) 1995-2009 ATMEL Corporation
> > 
> > Thats the version I use too. so far ok
> > 
> > > 
> > > ...
> > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\core\drivers/usart.asm(2):
> > > > > > > > 
> > Here lies probably the root cause: try including
> > the usart_0.asm
> > file instead.
> > 
> > The following template.asm snippet did work out
> > of
> > > the (trunk-) box
> > (note the additional 0 digits almost everywhere)
> > -----------
> > ...
> > ; initial baud rate of terminal
> > .equ BAUD = 9600
> > .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)
> > 
> > .if WANT_ISR_RX == 1
> > .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)|
> > (1<<RXCIE0)
> > .else
> > .set USART_B_VALUE = (1<<TXEN0) | (1<<RXEN0)
> > .endif
> > ; 8N1 is commonly used
> > .equ USART_C_VALUE = (3<<UCSZ00)
> > .include "drivers/usart_0.asm"
> > ..........
> > -----------------
> > 
> > template.hex:
> > [echo] Producing Hexfiles for atmega1284p
> > 
> > BUILD SUCCESSFUL
> > Total time: 4 seconds
> > 
> > -------------
> > 
> > Without that _0 the wrong usart drivers gets
> > included (dont blame
> > me for that).
> > 
> > HTH
> > 
> > Matthias
> > 
> > 
> > 
> > ------------------------------------------------------------------------------
> > > > > > Sell apps to millions through the Intel(R)
> > Atom(Tm) Developer Program
> > Be part of this innovative community and reach
> > millions of netbook users 
> > worldwide. Take advantage of special
> > opportunities
> > > to increase revenue and 
> > speed time-to-market. Join now, and jumpstart
> > your
> > > future.
> > http://p.sf.net/sfu/intel-atom-d2d
> > _______________________________________________
> > Amforth-devel mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/amforth-devel
> > 
> 
> 
> ------------------------------------------------------------------------------
> > Sell apps to millions through the Intel(R)
> Atom(Tm) Developer Program
> Be part of this innovative community and reach
> millions of netbook users 
> worldwide. Take advantage of special opportunities
> to increase revenue and 
> speed time-to-market. Join now, and jumpstart your
> future.
> http://p.sf.net/sfu/intel-atom-d2d
> _______________________________________________
> Amforth-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/amforth-devel



------------------------------------------------------------------------------
Sell apps to millions through the Intel(R) Atom(Tm) Developer Program
Be part of this innovative community and reach millions of netbook users 
worldwide. Take advantage of special opportunities to increase revenue and 
speed time-to-market. Join now, and jumpstart your future.
http://p.sf.net/sfu/intel-atom-d2d
_______________________________________________
Amforth-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to