Атари ассемблер

[dosikus]

Нашел на интересном сайте:

Если что еще одна копия того сайта http://retro.hansotten.nl/lee-davison-web-site/

[Advertiser]

[Shiny]

у дядьки генерация квадратов на мой взгляд сомнительная. Хотя.. кто знает? мне понадобилась таблица для знаковых и беззнаковых чисел.

 org $2000
start
	ldy #1
	ldx #0
	sty de
	dey
	sty de+1

	sty hl
	sty hl+1

sqtab	equ $1000
sq_lp
	lda hl+1
	sta sqtab+256,y
	sta sqtab+256,x

	lda hl
	sta sqtab,y
	sta sqtab,x

	clc
	adc de
	sta hl
	lda hl+1
	adc de+1
	sta hl+1
	
	lda de
	clc
	adc #2
	sta de
	bcc no_inc_de
	inc de+1
no_inc_de
	dex
	iny
	cpy #129
	bne sq_lp
;http://www.cpcwiki.eu/index.php/Programming:Precalculated_square
;INITSQ		LD DE, 1	;1st odd number
;		LD HL, 0	;HL = 1st square number
;		LD B, H		;counter = 256
;		LD IX, SQTAB	;startaddress of the square table
;SQLOOP		LD (IX), L	;Lowbyte to table
;		INC IX
;		LD (IX), H	;Highbyte to table
;		INC IX
;		ADD HL, DE	;add odd number
;		INC DE		;next odd number
;		INC DE
;		DJNZ SQLOOP	;256 times
;		RET
	jmp *
hl
 dta 0,0
de
 dta 0,0

    run start

[dosikus]

; my first prog


.in syseq.mae
.ou fp.xex
.or $0600

lda #149    ;color4,149
sta color4  ;poke 712
lda #149    ;color2,149
sta color2  ;poke 710
lda #15     ;color1,14
sta color1  ;poke 709

То же самое в WUDSN на MADS с отладкой в альттире ...

     org $3000

color1=709
color2=710
color4=712 

START

	lda #149    ;color4,149
	sta color4  ;poke 712
	lda #149    ;color2,149
	sta color2  ;poke 710
	lda #15     ;color1,14
	sta color1  ;poke 709


LOOP    JMP LOOP

      RUN START

[dosikus]

MADS у меня работает и с WDSN и с Notepad++.
Здесь сам MADS http://mads.atari8.info/
В дистрибутиве подробная справка, правда на инглише для версии 1.95 а свежая на польском. Но переводится вменяемо.
В комплекте есть куча примеров и либ, а так же в дистрибутиве есть мануал как прикрутить к Notepad++.

[Shiny]

примеры MADS хороши, меня макросы убивают

[dosikus]

Шынни, угу меня так же.
У JAC! в туторах есть наводки, попробую въехать...

ЗЫ. Я ошибаюсь или нет? Авторы MADS похоже фанаты паскаля, отсюда и закидоны с макросами...

[Shiny]

закидоны с макросами...

с одной стороны это удобнее.
mwa #$1000 $EB записывает слово $1000 по адресам $EB,EC

но я внятного описания не нашел, я вечно путаюсь(

Есть один выход - ассемблировать макросы и посмотреть на код.

[dosikus]

Это макро команды MACRO COMMANDS

The purpose of macro commands is to save time when writing programs and to shorten listings. Macro commands replace commonly used groups of instructions.


MVA, MVX, MVY

The macro commands MVA, MVX, MVY transfer bytes using the A, X, or Y registers, respectively. OPT R+ can potentially reduce the code size from these macros by removing redundant instructions.

lda src -> mva src dst
sta dst ->

ldy $10,x -> mvy $10,x $a0,x
sty $a0,x ->

ldx #$10 -> mvx #$10 dst
stx dst ->


MWA, MWX, MWY

The macro commands MWA, MWX, MWY transfer words using the A, X, or Y registers, respectively. OPT R+ can potentially reduce the code size from these macros by removing redundant instructions.

ldx <adr -> mwx #adr dst
stx dst ->
ldx >adr ->
stx dst+1 ->

mwa #0 $80 -> lda #0 mwy #$3040 $80 -> ldy <$3040
-> sta $80 -> sty $80
-> sta $81 -> ldy >$3040
-> sty $81

mwa ($80),y $a000,x -> lda ($80),y
-> sta $a000,x
-> iny
-> lda ($80),y
-> sta $a001,x

- - - Добавлено - - -

с одной стороны это удобнее.

Естественно, но я о другом - о форме записи макросов -


.macro SetColor val,reg
lda :val
sta :reg
.endm


И еще - в хелпе есть ошибки , так что читать , сверять английскую версию с польской и проверять по сырцам...

[Shiny]

Если быстро набирать текст, то удобно, да. По мне xasm удобнее - понимает MADS, капризен к синтаксису и немало хороших фич.
Когда я начал писать 16К на Silly Venture, пришлось пересесть на xasm.

[dosikus]

Насчет XASM vs MADS .
Кстати в поставке WUDSN есть и XASM и другие асмы .

DIFFERENCES AND SIMILARITIES BETWEEN MADS AND XASM

Similarities

the same syntax
the same exit codes
the same macro commands

Differences and new behaviors

small additions to ORG, e.g.. 'ORG [[expression]]adres[,adres2]'
XASM does not like whitespace, MADS tolerates and accepts it in logical/arithmetic expressions and static/variable definitions
MADS allows expressions to be grouped with (), [], XASM only within []
MADS provides static and variable definitions of local, global, and temporary scope, XASM only global
MADS does not accept ORG a:adres or ORG f:adres
MADS encodes real numbers using the directive .FL .FL real, XASM by pseudo-command DTA R DTA R(real)
MADS has expanded support in the pseudo-command INS
MADS does not accept the addressing form 'lda (203),0'
MADS allows writing programs for SpartaDOS X
MADS permits writing relocatable code in a custom format
when encoding the value of a character, i.e.
lda #' '
lda #" "
MADS distinguishes between single quotes (ATASCII coding) and double quotes (INTERNAL coding), whereas XASM treats both forms the same (ATASCII coding). Of course, the quote types are treated the same in DTA by MADS.

in indexed modes, a '+' or '-' sign increments or decrements the index register, e.g.
lda $2000,x+ -> lda $2000,x
inx
but if the '+' or '-' sign is used with a value, it change the value of the main operand instead (this only works with absolute indexed addressing):
lda $2000,x+2 -> lda $2002,x