⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 green1.asm

📁 电压控制程序,符合各种设备需要,核心程序,IBm专属
💻 ASM
📖 第 1 页 / 共 5 页
字号:
	DB					$C3		;ch4 play Re 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BC			;Ch3 play Si 
	DB					$C8		;Ch4 play So 
	DB						$D8	;Ch5 play So 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 80

	DB						$25,$01	;Ch5 Octave= 1
	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB						$D5	;Ch5 play Mi 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$B8			;Ch3 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$BC			;Ch3 play Si 
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AC				;Ch2 play Si 
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BC			;Ch3 play Si 
	DB					$C8		;Ch4 play So 
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 81

	DB			$22,$03				;Ch2 Octave= 3
	DB	$81						;Ch0 play Do 
	DB			$A1				;Ch2 play Do 
	DB						$D6	;Ch5 play Fa 
	DB						$4	;Beat=  4
	DB					$C6		;ch4 play Fa 
	DB						$2	;Beat=  2
	DB				$BA			;Ch3 play La 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB			$22,$02				;Ch2 Octave= 2
	DB	$81						;Ch0 play Do 
	DB			$AC				;Ch2 play Si 
	DB				$BA			;Ch3 play La 
	DB						$D6	;Ch5 play Fa 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C6		;ch4 play Fa 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB						$2	;Beat=  2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B6			;Ch3 play Fa 
	DB					$CA		;Ch4 play La 
	DB						$D6	;Ch5 play Fa 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 82

	DB	$81						;Ch0 play Do 
	DB			$A9				;Ch2 play So#
	DB						$D5	;Ch5 play Mi 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$B9			;Ch3 play So#
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$CC		;ch4 play Si 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A7				;Ch2 play Fa#
	DB				$B9			;Ch3 play So#
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A9				;Ch2 play So#
	DB						$2	;Beat=  2
	DB					$24,$00		;Ch4 Octave= 0
	DB					$CC		;ch4 play Si 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB	$81						;Ch0 play Do 
	DB				$B5			;Ch3 play Mi 
	DB					$C9		;Ch4 play So#
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$2	;Beat=  2

;Section= 83

	DB						$25,$00	;Ch5 Octave= 0
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$B0			;Ch3 rest
	DB					$C0		;Ch4 rest
	DB						$DA	;Ch5 play La 
	DB						$4	;Beat=  4
	DB					$CA		;ch4 play La 
	DB						$2	;Beat=  2
	DB				$23,$02			;Ch3 Octave= 2
	DB				$B1			;Ch3 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B1			;Ch3 play Do 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$CA		;ch4 play La 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B1			;Ch3 play Do 
	DB					$CA		;Ch4 play La 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 84

	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$B0			;Ch3 rest
	DB					$C0		;Ch4 rest
	DB						$DA	;Ch5 play La 
	DB						$4	;Beat=  4
	DB					$CA		;ch4 play La 
	DB						$2	;Beat=  2
	DB				$B1			;Ch3 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B1			;Ch3 play Do 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$CA		;ch4 play La 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B1			;Ch3 play Do 
	DB					$CA		;Ch4 play La 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B0			;Ch3 rest
	DB					$C0		;Ch4 rest
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2

;Section= 85

	DB		$32,$A					;CH2 Volume Level= 10
	DB		$2A,$6					;CH2 Instrument/Speech= 06
	DB					$35,$7		;CH5 Volume Level= 07
	DB					$2D,$18		;CH5 Instrument/Speech= 24
	DB			$22,$04				;Ch2 Octave= 4
	DB						$25,$01	;Ch5 Octave= 1
	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB						$D1	;Ch5 play Do 
	DB						$4	;Beat=  4
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB				$B5			;Ch3 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B5			;Ch3 play Mi 
	DB						$D1	;Ch5 play Do 
	DB						$2	;Beat=  2
	DB			$A0				;Ch2 rest
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB	$81						;Ch0 play Do 
	DB				$B5			;Ch3 play Mi 
	DB					$C1		;Ch4 play Do 
	DB						$D1	;Ch5 play Do 
	DB						$2	;Beat=  2
	DB			$A0				;Ch2 rest
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 86

	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB						$D1	;Ch5 play Do 
	DB						$4	;Beat=  4
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB				$B5			;Ch3 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A7				;Ch2 play Fa#
	DB				$B5			;Ch3 play Mi 
	DB						$D1	;Ch5 play Do 
	DB						$2	;Beat=  2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A5				;Ch2 play Mi 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB	$81						;Ch0 play Do 
	DB				$B5			;Ch3 play Mi 
	DB					$C1		;Ch4 play Do 
	DB						$D1	;Ch5 play Do 
	DB						$2	;Beat=  2
	DB			$A0				;Ch2 rest
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$2	;Beat=  2

;Section= 87

	DB						$25,$00	;Ch5 Octave= 0
	DB	$81						;Ch0 play Do 
	DB			$A3				;Ch2 play Re 
	DB						$D8	;Ch5 play So 
	DB						$4	;Beat=  4
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB				$23,$01			;Ch3 Octave= 1
	DB				$BC			;Ch3 play Si 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C3		;ch4 play Re 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BC			;Ch3 play Si 
	DB						$D8	;Ch5 play So 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB			$22,$03				;Ch2 Octave= 3
	DB	$81						;Ch0 play Do 
	DB			$AC				;Ch2 play Si 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$C3		;ch4 play Re 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BC			;Ch3 play Si 
	DB					$C8		;Ch4 play So 
	DB						$D8	;Ch5 play So 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 88

	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB						$D5	;Ch5 play Mi 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$B8			;Ch3 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$BC			;Ch3 play Si 
	DB						$D7	;Ch5 play Fa#
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C8		;ch4 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AC				;Ch2 play Si 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BC			;Ch3 play Si 
	DB					$C8		;Ch4 play So 
	DB						$D8	;Ch5 play So 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 89

	DB			$22,$04				;Ch2 Octave= 4
	DB	$81						;Ch0 play Do 
	DB			$A1				;Ch2 play Do 
	DB				$B0			;Ch3 rest
	DB						$DA	;Ch5 play La 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$BA			;Ch3 play La 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$BA			;Ch3 play La 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C5		;ch4 play Mi 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2
	DB			$22,$03				;Ch2 Octave= 3
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$B1			;Ch3 play Do 
	DB						$4	;Beat=  4
	DB	$81						;Ch0 play Do 
	DB					$C5		;Ch4 play Mi 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB				$BA			;Ch3 play La 
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 90

	DB						$25,$01	;Ch5 Octave= 1
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$B0			;Ch3 rest
	DB						$DA	;Ch5 play La 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$BA			;Ch3 play La 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$24,$02		;Ch4 Octave= 2
	DB					$C1		;ch4 play Do 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB				$BA			;Ch3 play La 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB					$24,$01		;Ch4 Octave= 1
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB			$AA				;Ch2 play La 
	DB				$B1			;Ch3 play Do 
	DB						$D0	;Ch5 rest
	DB						$4	;Beat=  4
	DB	$81						;Ch0 play Do 
	DB					$C5		;Ch4 play Mi 
	DB						$DA	;Ch5 play La 
	DB						$2	;Beat=  2
	DB				$BA			;Ch3 play La 
	DB					$C0		;ch4 rest
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 91

	DB	$81						;Ch0 play Do 
	DB			$AC				;Ch2 play Si 
	DB				$B0			;Ch3 rest
	DB						$D5	;Ch5 play Mi 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$B8			;Ch3 play So 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB						$D0	;Ch5 rest
	DB						$2	;Beat=  2
	DB					$CC		;ch4 play Si 
	DB						$2	;Beat=  2
	DB	$81						;Ch0 play Do 
	DB				$B8			;Ch3 play So 
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB					$C5		;ch4 play Mi 
	DB						$2	;Beat=  2
	DB				$23,$00			;Ch3 Octave= 0
	DB	$81						;Ch0 play Do 
	DB			$A8				;Ch2 play So 
	DB				$BC			;Ch3 play Si 
	DB						$D0	;Ch5 rest
	DB						$4	;Beat=  4
	DB				$23,$01			;Ch3 Octave= 1
	DB	$81						;Ch0 play Do 
	DB				$B5			;Ch3 play Mi 
	DB						$D5	;Ch5 play Mi 
	DB						$2	;Beat=  2
	DB				$B0			;Ch3 rest
	DB					$C8		;ch4 play So 
	DB						$D0	;ch5 rest
	DB						$2	;Beat=  2

;Section= 92

	DB	$81						;Ch0 play Do 
	DB			$A5				;Ch2 play Mi 
	DB					$C0		;Ch4 rest
	DB						$D5	;Ch5 play Mi 
	DB						$4	;Beat=  4
	DB					$C5		;ch4 play Mi 
	DB						$

⌨️ 快捷键说明

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