From: Kalus M. <mik...@go...> - 2012-06-13 22:25:51
|
Hi Jan. I would add the word to amforth-x.x/appl/myproject/words/uitvoer.asm and append them in dict_appl.inc in the way words are included there: .. .include "words/uitvoer.asm" ; my first assembled forth word .. Did you take a look at http://www.forth-ev.de/repos/g4/ allready? g4.fs is a plain_forth to amforth_assembler translater written in gforth. You may enter your word in this way: : uitvoer cr cr ." Dit is mijn eerste test " ; and get this as result: VE_UITVOER: .dw $FF07 .db "uitvoer",0 .dw VE_HEAD .set VE_HEAD = VE_UITVOER XT_UITVOER: .dw DO_COLON PFA_UITVOER: .dw XT_CR .dw XT_CR .dw XT_SLITERAL .dw $18 .db "Dit is mijn eerste test " .dw XT_ITYPE .dw XT_EXIT ok Have fun. :) Michael Am 13.06.2012 um 22:20 schrieb Jan Kromhout: > Hello, > > I have make a word to include in amForth. > Where should I store it so it will be assembled? > > Thanks for any help. > > Cheers, > > Jan Kromhout > > > > ; uitvoer ( -- ) > ; ================================================= > ; Date : 13.06.2012 > ; version 1.00 > ; User written word > ; write a simple text, and do further notting > ; ================================================= > VE_UITVOER: > .dw $ff07 > .db "uitvoer",0 > .dw VE_HEAD > .set VE_HEAD = VE_UITVOER > XT_UITVOER: > .dw DO_COLON > PFA_UITVOER: > .dw XT_CR > .dw XT_CR > .dw XT_SLITERAL > .dw 24 > .db "Dit is mijn eerste test " > .dw XT_ITYPE > .dw XT_EXIT > > > ---------------------------------------------------------------------- > -------- > Live Security Virtual Conference > Exclusive live event will cover all the ways today's security and > threat landscape has changed and how IT managers can respond. > Discussions > will include endpoint security, mobile security and the latest in > malware > threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/ > _______________________________________________ > Amforth-devel mailing list for http://amforth.sf.net/ > Amf...@li... > https://lists.sourceforge.net/lists/listinfo/amforth-devel |