Инициализация TR-DOS

[Raydac]

49182 1 byte TR-DOS rom paged (1) or not (0)

да, точно, в спеккивики не написали просто

[Biland]

Для Kay1024 получилось так, без оптимизации.

Скрытый текст

		ld	sp,#5fe8

	org		#5c00- 27
	;1c00
		
	db	#00,#20,#00,#04,#00,#04,#00,#5b,#00,#00,#27,#1f,#f7,#02,#e7,#3f
	db	#2b,#27,#e7,#3f,#7a,#26,#31,#0d,#67,#26,#c9,#ff,#00,#00,#00,#ff
	db	#00,#22,#0d,#0d,#23,#02,#00,#00,#00,#16,#07,#01,#00,#06,#00,#0b
	db	#00,#01,#00,#01,#00,#06,#00,#10,#00,#00,#00,#00,#00,#00,#00,#00
	db	#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00
	db	#00,#00,#3c,#40,#00,#ff,#dc,#01,#fc,#5f,#00,#00,#00,#0a,#00,#ff
	db	#1e,#00,#01,#38,#00,#00,#80,#5d,#00,#00,#26,#5d,#26,#5d,#3b,#5d
	db	#80,#5d,#3a,#5d,#81,#5d,#81,#5d,#7f,#5d,#00,#00,#83,#5d,#83,#5d
	db	#83,#5d,#2d,#92,#5c,#10,#02,#00,#00,#00,#00,#00,#00,#00,#00,#4a
	db	#17,#9a,#00,#9b,#00,#00,#58,#ff,#00,#00,#00,#00,#00,#21,#17,#00
	db	#40,#e0,#50,#21,#18,#21,#17,#01,#38,#00,#38,#00,#00,#af,#d3,#f7
	db	#db,#f7,#fe,#1e,#28,#03,#fe,#1f,#c0,#cf,#31,#3e,#01,#32,#ef,#5c	
	;1cc0
	db	#c9,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#00,#ff,#5f,#ff
	db	#ff,#f4,#09,#a8,#10,#4b,#f4,#09,#c4,#15,#53,#81,#0f,#c9,#15,#52
	db	#34,#5b,#2f,#ff,#ff,#03,#ff,#00,#00,#00,#22,#31,#35,#36,#31,#36
	db	#22,#03,#4f,#5e,#00,#80,#c1,#02,#6d,#61,#69,#6e,#20,#20,#20,#20
	db	#43,#00,#00,#c1,#02,#03,#01,#01,#00,#00,#00,#00,#00,#00,#00,#04
	db	#01,#00,#00,#00,#00,#08,#ff,#1b,#ff,#80,#03,#25,#5d,#6e,#5d,#8a
	db	#5d,#09,#00,#00,#00,#00,#00,#ff,#00,#00,#00,#ff,#60,#5d,#fc,#5f
	db	#ff,#2c,#aa,#00,#00,#01,#02,#e6,#5f,#01,#00,#f7,#22,#62,#00,#00
	db	#ff,#f4,#09,#a8,#10,#4b,#f4,#09,#c4,#15,#53,#81,#0f,#c4,#15,#52
	db	#34,#5b,#2f,#5b,#50,#80,#00,#0a,#0d,#00,#fd,#32,#34,#35,#37,#34
	db	#0e,#00,#00,#ff,#5f,#00,#0d,#00,#14,#1e,#00,#f9,#c0,#31,#35,#36
	db	#31,#39,#0e,#00,#00,#03,#3d,#00,#3a,#ea,#3a,#ef,#22,#6d,#61,#69
	db	#6e,#22,#af,#33,#32,#37,#36,#38,#0d,#00,#1e,#0e,#00,#f9,#c0,#33
	db	#32,#37,#36,#38,#0e,#00,#00,#00,#60,#00,#0d,#80,#0d,#80,#00,#00
	db	#00,#60,#00,#00,#00,#63,#5e,#04,#00,#00,#00,#00,#80,#00,#00,#00
	
	org		#5fe8		;стек
			    #2b,#2d,#65,#33,#58,#27,#ed,#10,#0d,#00,#1e,#00,#85
	db	#1c,#14,#5b,#fd,#17,#21,#18,#1d,#5b,#00,#3e

[свернуть]

[Dimon spb]

Я делаю так, по всем известной книжке. Выбор дисковода удобен тем, что можно в Unreal по умолчанию в дисковод, например, B: установить образ .trd, чтобы пр запуске .sna он мог с ним работать

LD C,0 : CALL #3D13; Инициализация ВГшки (на всякий случай, не уверен, что надо)
CALL 15649; Инициализация TR-DOS
XOR A : LD C,1 : CALL #3D13; Выбор дисковода (0, 1, 2, 3 в A)
LD C,#18 : CALL #3D13; Настройка на дискету