DisAsm-11

[Hunta]

Вожусь с внутренней перетряской DisAsm11 (более правильный вариант работы с WPF - шаблон MVVM). Да, надо было с самого начала делать "по правильному", но.. Некоторые вещи не понятно было как сделать в WPF - и сделал, как получилось Постепенно набрался опыта - и много из непонятного стало понятным Но... Снаружи это не как не видно, это больше вариант - как сделать проще написание, в том числе - DisAsm11

Так вот.. Возился я, возился, и вдруг пришло в голову странное Попробовал.. хм.. Работает Итак, вниманию всех представляется...

Метка на .TITLE

Test	MACRO V05.06R Thursday 31-Jul-25 00:04  Page 1


      1	000000				TEST:	.TITLE Test
      2						.IDENT	/KXX.01/
      3
      4						.MCALL	.EXIT, .PRINT
      5
      6		000044 			$JSW	=: <^o44>
      7		000400 				CHAIN$	=: <^o400>
      8
      9		000054 			$SYPTR	=: <^o54>
     10
     11		000300 			CONFIG	=: <^o300>
     12		000040 				CLK50$	=: <^o40>
     13		100000 				CLOCK$	=: <^o100000>
     14
     15	000000					.ASECT
     16
     17		000044 			        .=$JSW
     18	000044	000400 				.WORD	CHAIN$
     19
     20		000500 				.=^O<500>
     21
     22	000500				START:
     23	000500	012737 	000100 	000004 		MOV	#100, @#4
     24	000506	012737 	000340 	000006 		MOV	#340, @#6
     25
     26	000514	013705 	000054 			MOV	@#$SYPTR, R5	  		;Get the pointer to the base of the RMON
     27	000520	052765 	100040 	000300 		BIS	#CLOCK$!CLK50$, CONFIG(R5)
     28	000526	010701 				MOV	PC, R1
     29	000530	062701 	000020 			ADD	#MESS-., R1
     30	000534					.PRINT	R1
     31	000540					.PRINT	#MESS-.
     32
     33	000546					.EXIT
     34	000550				MESS:
     35	000550	   124 	   105 	   123 		.ASCIZ	/TEST/
	000553	   124 	   000
     36						.EVEN
     37
     38		000500 				.END	START
Test	MACRO V05.06R Thursday 31-Jul-25 00:04  Page 1-1
Symbol table

CHAIN$  000400   	CLOCK$  100000   	MESS    000550   	TEST    000000R  	$SYPTR  000054
CLK50$  000040   	CONFIG  000300   	START   000500   	$JSW    000044   	...V1 = 000003


. ABS.	000556    000	(RW,I,GBL,ABS,OVR)
      	000000    001	(RW,I,LCL,REL,CON)
Errors detected:  0

*** Assembler statistics


Work  file  reads: 0
Work  file writes: 0
Size of work file: 10565 Words  ( 42 Pages)
Size of core pool: 16128 Words  ( 63 Pages)
Operating  system: RT-11

Elapsed time: 00:00:00.01
DK:TEST,DK:TEST=DK:TEST

Если посмотреть таблицу символов, видно, что метка TEST - относительная и - раз ни какой секции ещё на было заявлено - она в секции .PSECT

НА вопрос - нафига такое нужно - у меня ответа (возможно пока) - нет