SjASMPlus от z00m

[Biland]

	struct	MedikitVTab			/*виртуальная таблица для класса TMedikit*/
Metod		dw	#abcd		
Metod1		dw	fPick
	ends

	struct	TMedikit			/*класс*/
		dw	MyMedikitVTab		/инкапсуляция!!!/
Coord		dw	#1f00					;	X
		dw	#1f00					;	Y
Count		dw	55					;	Здоровье
	ends

			ORG	#9e00

MyMedikit		TMedikit	/*экземпляр класса TMedikit (объект MyMedikit) объект класса */
MyMedikitVTab		MedikitVTab

StartProg
			ld	bc,MyMedikit.+Coord
			nop
			ret

fPick			ret

Есть магия, как получить смещение адрес по метке в инкапсуляции MyMedikitVTab из объекта MyMedikit?:

ld	bc,MyMedikit.+Metod1