📄 molec1.hasm

📁 操作系统SunOS 4.1.3版本的源码
💻 HASM
📖 第 1 页 / 共 4 页
字号:
	.dword		22.627, 31.087, 10.164, 0.0	jmpl		Nitrogen, r6	.dword		21.843, 31.381, 11.361, 0.0	jmpl		Carbon, r6	.dword		20.969, 30.421, 11.883, 0.0	jmpl		Oxygen, r6	.dword		20.915, 29.307, 11.356, 0.0	jmpl		Nitrogen, r6	.dword		20.204, 30.72, 12.966, 0.0	jmpl		Carbon, r6	.dword		20.272, 31.934, 13.51, 0.0	jmpl		Nitrogen, r6	.dword		19.515, 32.228, 14.563, 0.0	jmpl		Carbon, r6	.dword		21.159, 32.953, 12.971, 0.0	jmpl		Carbon, r6	.dword		21.902, 32.613, 11.94, 0.0	jmpl		Phosphorous, r6	.dword		19.701, 31.916, 6.314, 0.0	jmpl		Oxygen, r6	.dword		18.895, 32.12, 7.56, 0.0	jmpl		Oxygen, r6	.dword		19.457, 33.007, 5.29, 0.0	jmpl		Oxygen, r6	.dword		19.47, 30.503, 5.611, 0.0	jmpl		Carbon, r6	.dword		19.262, 29.131, 5.91, 0.0	jmpl		Carbon, r6	.dword		17.853, 28.727, 6.294, 0.0	jmpl		Oxygen, r6	.dword		17.776, 28.832, 7.755, 0.0	jmpl		Carbon, r6	.dword		16.694, 29.552, 5.745, 0.0	jmpl		Oxygen, r6	.dword		15.553, 28.863, 5.221, 0.0	jmpl		Carbon, r6	.dword		16.318, 30.426, 6.929, 0.0	jmpl		Carbon, r6	.dword		16.54, 29.47, 8.121, 0.0	jmpl		Nitrogen, r6	.dword		16.418, 30.276, 9.338, 0.0	jmpl		Carbon, r6	.dword		15.213, 30.154, 10.092, 0.0	jmpl		Oxygen, r6	.dword		14.343, 29.343, 9.756, 0.0	jmpl		Nitrogen, r6	.dword		15.045, 30.906, 11.208, 0.0	jmpl		Carbon, r6	.dword		15.996, 31.771, 11.586, 0.0	jmpl		Nitrogen, r6	.dword		15.738, 32.477, 12.696, 0.0	jmpl		Carbon, r6	.dword		17.215, 31.916, 10.837, 0.0	jmpl		Carbon, r6	.dword		17.382, 31.164, 9.751, 0.0	jmpl		Phosphorous, r6	.dword		14.126, 29.525, 4.897, 0.0	jmpl		Oxygen, r6	.dword		13.655, 30.272, 6.093, 0.0	jmpl		Oxygen, r6	.dword		14.23, 30.494, 3.764, 0.0	jmpl		Oxygen, r6	.dword		13.098, 28.329, 4.625, 0.0	jmpl		Carbon, r6	.dword		12.677, 27.45, 5.646, 0.0	jmpl		Carbon, r6	.dword		11.794, 27.921, 6.712, 0.0	jmpl		Oxygen, r6	.dword		12.296, 28.193, 8.057, 0.0	jmpl		Carbon, r6	.dword		11.001, 29.217, 6.477, 0.0	jmpl		Oxygen, r6	.dword		10.376, 29.275, 5.211, 0.0	jmpl		Carbon, r6	.dword		10.149, 29.094, 7.765, 0.0	jmpl		Carbon, r6	.dword		11.336, 28.99, 8.792, 0.0	jmpl		Nitrogen, r6	.dword		11.694, 30.367, 9.153, 0.0	jmpl		Carbon, r6	.dword		10.901, 31.073, 10.092, 0.0	jmpl		Oxygen, r6	.dword		9.95, 30.476, 10.607, 0.0	jmpl		Nitrogen, r6	.dword		11.191, 32.369, 10.392, 0.0	jmpl		Carbon, r6	.dword		12.233, 32.989, 9.793, 0.0	jmpl		Nitrogen, r6	.dword		12.509, 34.28, 10.082, 0.0	jmpl		Carbon, r6	.dword		13.03, 32.296, 8.819, 0.0	jmpl		Carbon, r6	.dword		12.695, 31.055, 8.532, 0.0	jmpl		Phosphorous, r6	.dword		10.1, 30.589, 4.318, 0.0	jmpl		Oxygen, r6	.dword		11.323, 31.472, 4.362, 0.0	jmpl		Oxygen, r6	.dword		9.733, 30.14, 2.911, 0.0	jmpl		Oxygen, r6	.dword		8.8, 31.309, 4.941, 0.0	jmpl		Carbon, r6	.dword		7.563, 30.548, 4.892, 0.0	jmpl		Carbon, r6	.dword		6.857, 31.01, 6.118, 0.0	jmpl		Oxygen, r6	.dword		7.717, 31.006, 7.278, 0.0	jmpl		Carbon, r6	.dword		6.363, 32.473, 6.029, 0.0	jmpl		Oxygen, r6	.dword		5.358, 32.591, 5.013, 0.0	jmpl		Carbon, r6	.dword		5.992, 32.618, 7.491, 0.0	jmpl		Carbon, r6	.dword		7.111, 31.875, 8.26, 0.0	jmpl		Nitrogen, r6	.dword		8.066, 32.89, 8.737, 0.0	jmpl		Carbon, r6	.dword		9.239, 33.288, 8.129, 0.0	jmpl		Nitrogen, r6	.dword		9.869, 34.253, 8.769, 0.0	jmpl		Carbon, r6	.dword		9.067, 34.493, 9.867, 0.0	jmpl		Carbon, r6	.dword		9.18, 35.412, 10.926, 0.0	jmpl		Nitrogen, r6	.dword		10.245, 36.227, 10.997, 0.0	jmpl		Nitrogen, r6	.dword		8.216, 35.421, 11.888, 0.0	jmpl		Carbon, r6	.dword		7.197, 34.552, 11.742, 0.0	jmpl		Nitrogen, r6	.dword		6.961, 33.646, 10.777, 0.0	jmpl		Carbon, r6	.dword		7.939, 33.673, 9.865, 0.0	jmpl		Phosphorous, r6	.dword		4.411, 33.845, 4.565, 0.0	jmpl		Oxygen, r6	.dword		5.281, 34.765, 3.781, 0.0	jmpl		Oxygen, r6	.dword		3.139, 33.564, 3.846, 0.0	jmpl		Oxygen, r6	.dword		4.081, 34.244, 6.061, 0.0	jmpl		Carbon, r6	.dword		3.08, 33.315, 6.697, 0.0	jmpl		Carbon, r6	.dword		2.622, 34.167, 7.899, 0.0	jmpl		Oxygen, r6	.dword		3.909, 34.321, 8.599, 0.0	jmpl		Carbon, r6	.dword		2.151, 35.516, 7.379, 0.0	jmpl		Oxygen, r6	.dword		.806, 35.843, 7.078, 0.0	jmpl		Carbon, r6	.dword		3.12, 36.49, 7.993, 0.0	jmpl		Carbon, r6	.dword		4.244, 35.698, 8.66, 0.0	jmpl		Nitrogen, r6	.dword		5.598, 36.178, 8.379, 0.0	jmpl		Carbon, r6	.dword		6.128, 37.124, 9.269, 0.0	jmpl		Oxygen, r6	.dword		5.589, 37.591, 10.253, 0.0	jmpl		Nitrogen, r6	.dword		7.382, 37.582, 8.987, 0.0	jmpl		Carbon, r6	.dword		8.175, 37.206, 7.914, 0.0	jmpl		Oxygen, r6	.dword		9.307, 37.699, 7.797, 0.0	jmpl		Carbon, r6	.dword		7.563, 36.241, 7.038, 0.0	jmpl		Carbon, r6	.dword		8.392, 35.756, 5.849, 0.0	jmpl		Carbon, r6	.dword		6.332, 35.779, 7.295, 0.0	jmpl		Phosphorous, r6	.dword		.376, 37.283, 6.462, 0.0	jmpl		Oxygen, r6	.dword		.919, 37.636, 5.119, 0.0	jmpl		Oxygen, r6	.dword		-1.123, 37.278, 6.529, 0.0	jmpl		Oxygen, r6	.dword		.965, 38.379, 7.481, 0.0	jmpl		Carbon, r6	.dword		.199, 38.528, 8.707, 0.0	jmpl		Carbon, r6	.dword		.118, 39.996, 9.101, 0.0	jmpl		Oxygen, r6	.dword		1.499, 40.308, 9.41, 0.0	jmpl		Carbon, r6	.dword		-.299, 40.883, 7.978, 0.0	jmpl		Oxygen, r6	.dword		-1.042, 42.079, 8.247, 0.0	jmpl		Carbon, r6	.dword		1.01, 41.268, 7.29, 0.0	jmpl		Carbon, r6	.dword		1.943, 41.327, 8.475, 0.0	jmpl		Nitrogen, r6	.dword		3.333, 41.033, 8.129, 0.0	jmpl		Carbon, r6	.dword		4.298, 42.074, 8.285, 0.0	jmpl		Oxygen, r6	.dword		3.922, 43.198, 8.668, 0.0	jmpl		Nitrogen, r6	.dword		5.58, 41.78, 7.931, 0.0	jmpl		Carbon, r6	.dword		5.91, 40.553, 7.53, 0.0	jmpl		Nitrogen, r6	.dword		7.151, 40.254, 7.216, 0.0	jmpl		Carbon, r6	.dword		4.946, 39.506, 7.387, 0.0	jmpl		Carbon, r6	.dword		3.678, 39.774, 7.703, 0.0	jmpl		Phosphorous, r6	.dword		-1.916, 42.577, 7.016, 0.0	jmpl		Oxygen, r6	.dword		-1.807, 41.626, 5.851, 0.0	jmpl		Oxygen, r6	.dword		-3.342, 42.509, 7.52, 0.0	jmpl		Oxygen, r6	.dword		-1.563, 44.076, 6.647, 0.0	jmpl		Carbon, r6	.dword		-2.142, 45.285, 7.172, 0.0	jmpl		Carbon, r6	.dword		-1.11, 46.246, 7.736, 0.0	jmpl		Oxygen, r6	.dword		0.068, 45.48, 8.173, 0.0	jmpl		Carbon, r6	.dword		-.598, 47.314, 6.793, 0.0	jmpl		Oxygen, r6	.dword		-.34, 48.66, 7.216, 0.0	jmpl		Carbon, r6	.dword		.693, 46.708, 6.257, 0.0	jmpl		Carbon, r6	.dword		1.245, 45.874, 7.473, 0.0	jmpl		Nitrogen, r6	.dword		2.323, 45.036, 6.939, 0.0	jmpl		Carbon, r6	.dword		3.641, 45.503, 7.206, 0.0	jmpl		Oxygen, r6	.dword		3.854, 46.495, 7.928, 0.0	jmpl		Nitrogen, r6	.dword		4.733, 44.81, 6.709, 0.0	jmpl		Carbon, r6	.dword		4.529, 43.768, 5.896, 0.0	jmpl		Nitrogen, r6	.dword		5.652, 43.175, 5.48, 0.0	jmpl		Carbon, r6	.dword		3.197, 43.32, 5.619, 0.0	jmpl		Carbon, r6	.dword		2.165, 43.977, 6.121, 0.0;#endif;	pop		r6	trap		0light0:	.word		0			; Light number 0	.word		HK_AMBIENT_LIGHT_SOURCE ; Light type	.rgb		< 0.3, 0.3, 0.3 >	; Light color	.xyz		< 0.0, 1.0, 1.0 >	; Light position	.norm		< 0.0, 0.0, 1.0 >	; Light direction	.word		1.0			; spotlight power	.word		1.0			; Attenuation 1	.word		1.0			; Attenuation 2	.word		0.0			; Spotlight anglelight1:	.word		1			; Light number 1	.word		HK_DIRECTIONAL_LIGHT_SOURCE ; Light type	.rgb		< 1.0, 0.8, 1.0 >	; Light color	.xyz		< 1.0, 0.0, 0.0 >	; Light position	.norm		< -0.25, 0.3, 0.15 >	; Light direction	.word		1.0			; spotlight power	.word		1.0			; Attenuation 1	.word		1.0			; Attenuation 2	.word		0.0			; Spotlight anglelight2:	.word		2			; Light number 2	.word		HK_DIRECTIONAL_LIGHT_SOURCE ; Light type	.rgb		< 1.0, 1.0, 0.8 >	; Light color	.xyz		< 1.0, 0.0, 1.0 >	; Light position	.norm		< 0.5, 0.1, 0.10 >	; Light direction	.word		1.0			; spotlight power	.word		1.0			; Attenuation 1	.word		1.0			; Attenuation 2	.word		0.0			; Spotlight anglehydrogen:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 0.0, 1.0, 1.0 >	; Cyan	set_attribute	hk_pre_concat_lmt	; 1.24	.scale		1.24	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; ReturnOxygen:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 1.0, 0.0, 0.0 >	; Red	set_attribute	hk_pre_concat_lmt	; 1.27	.scale		1.27	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Returnnitrogen:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 0.1, 0.1, 1.0 >	; Blue	set_attribute	hk_pre_concat_lmt	; 1.50	.scale		1.50	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Returncarbon:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 1.0, 1.0, 1.0 >	; White	set_attribute	hk_pre_concat_lmt	; 1.52	.scale		1.52	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Returnsulfer:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 1.0, 1.0, 0.0 >	; Yellow	set_attribute	hk_pre_concat_lmt	; 1.75	.scale		1.75	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Returnphosphorous:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 1.0, 0.4, 0.0 >	; Orange	set_attribute	hk_pre_concat_lmt	; 1.87	.scale		1.87	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Returnunknown:flourine:	move		r6, r1		; Where to move from	ld		#pos, r2	; Where to move to	ld		#32, r3	add		r6, r3		; Return address	push		r3	push_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	block_move	6, (r1), (r2)	; Position the sphere;	set_attribute	hk_view, @persp	set_attribute	hk_pre_concat_lmt, @position	set_attribute	hk_front_surface_color	.rgb		< 0.0, 1.0, 0.0 >	; Green	set_attribute	hk_pre_concat_lmt	; 1.18	.scale		1.18	jmpl		sphere, r6	; Draw a sphere	pop_state	.word		HKST0_CMT|HKST0_LMT|HKST0_GMT,0,0,0,0,0,0,0	pop		r6	jmpl		(r6 + 0), r6	; Return;; The new view stuff;;persp:;	.coord	< 0.0, 0.0, 1.0, 1.0 >;perspective:		; Put in some perspective and squish Z;	.dcoord	< 1.0, 0.0, 0.0, 0.0 >;	.dcoord	< 0.0, 1.0, 0.0, 0.0 >;	.dcoord	< 0.0, 0.0, 0.2,-0.2 >;	.dcoord	< 0.0, 0.0, 0.0, 1.0 >;iperspective:		; Inverse perspective matrix;	.dcoord	< 1.0, 0.0, 0.0, 0.0 >;	.dcoord	< 0.0, 1.0, 0.0, 0.0 >;	.dcoord	< 0.0, 0.0, 5.0, 0.0 >;	.dcoord	< 0.0, 0.0, 0.0, 1.0 >position:		; Position each sphere (this gets modified)	.dword	1.0, 0.0, 0.0, 0.0	.dword	0.0, 1.0, 0.0, 0.0	.dword	0.0, 0.0, 1.0, 0.0pos:	.dword	0.0, 0.0, 0.0, 1.0;; draw a sphere with 10 vertices per 90 degrees;sphere:	triangle_list 13	.tri_start_ccw	.xyz	< 0, 0, 1 >	.norm	< 0, 0, 1 >	.tri_r1	.xyz	< 0.258819, 0, 0.965926 >	.norm	< 0.258819, 0, 0.965926 >	.tri_r1	.xyz	< 0, 0.258819, 0.965926 >	.norm	< 0, 0.258819, 0.965926 >	.tri_r1	.xyz	< 0.298487, 0.258819, 0.91865 >	.norm	< 0.298487, 0.258819, 0.91865 >	.tri_r1	.xyz	< 0, 0.5, 0.866025 >	.norm	< 0, 0.5, 0.866025 >	.tri_r1	.xyz	< 0.331414, 0.5, 0.800103 >	.norm	< 0.331414, 0.5, 0.800103 >	.tri_r1	.xyz	< 0, 0.707107, 0.707107 >	.norm	< 0, 0.707107, 0.707107 >	.tri_r1	.xyz	< 0.353553, 0.707107, 0.612372 >	.norm	< 0.353553, 0.707107, 0.612372 >	.tri_r1	.xyz	< 0, 0.866025, 0.5 >	.norm	< 0, 0.866025, 0.5 >	.tri_r1	.xyz	< 0.353553, 0.866025, 0.353553 >	.norm	< 0.353553, 0.866025, 0.353553 >	.tri_r1	.xyz	< 0, 0.965926, 0.258819 >	.norm	< 0, 0.965926, 0.258819 >	.tri_r1	.xyz	< 0.258819, 0.965926, 0.0 >	.norm	< 0.258819, 0.965926, 0.0 >	.tri_r1	.xyz	< 0, 1, 0.0 >	.norm	< 0, 1, 0.0 >	triangle_list 11	.tri_start_ccw	.xyz	< 0.258819, 0, 0.965926 >	.norm	< 0.258819, 0, 0.965926 >	.tri_r1	.xyz	< 0.5, 0, 0.866025 >	.norm	< 0.5, 0, 0.866025 >	.tri_r1	.xyz	< 0.298487, 0.258819, 0.91865 >	.norm	< 0.298487, 0.258819, 0.91865 >	.tri_r1	.xyz	< 0.567757, 0.258819, 0.78145 >	.norm	< 0.567757, 0.258819, 0.78145 >	.tri_r1	.xyz	< 0.331414, 0.5, 0.800103 >	.norm	< 0.331414, 0.5, 0.800103 >	.tri_r1	.xyz	< 0.612372, 0.5, 0.612372 >	.norm	< 0.612372, 0.5, 0.612372 >	.tri_r1	.xyz	< 0.353553, 0.707107, 0.612372 >	.norm	< 0.353553, 0.707107, 0.612372 >	.tri_r1	.xyz	< 0.612372, 0.707107, 0.353553 >	.norm	< 0.612372, 0.707107, 0.353553 >	.tri_r1	.xyz	< 0.353553, 0.866025, 0.353553 >	.norm	< 0.353553, 0.866025, 0.353553 >	.tri_r1	.xyz	< 0.5, 0.866025, 0.0 >	.norm	< 0.5, 0.866025, 0.0 >	.tri_r1	.xyz	< 0.258819, 0.965926, 0.0 >	.norm	< 0.258819, 0.965926, 0.0 >	triangle_list 9	.tri_start_ccw	.xyz	< 0.5, 0, 0.866025 >	.norm	< 0.5, 0, 0.866025 >	.tri_r1	.xyz	< 0.707107, 0, 0.707107 >	.norm	< 0.707107, 0, 0.707107 >	.tri_r1	.xyz	< 0.567757, 0.258819, 0.78145 >	.norm	< 0.567757, 0.258819, 0.78145 >	.tri_r1	.xyz	< 0.78145, 0.258819, 0.567757 >	.norm	< 0.78145, 0.258819, 0.567757 >	.tri_r1	.xyz	< 0.612372, 0.5, 0.612372 >
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -