dszj.asm

三字经显示 直接在DOS下运行 可以在屏幕上显示出文字

D_P     EQU DWORD PTR
CODE    SEGMENT
ASSUME  CS:CODE
	ORG 100H
STAR:
	JMP BEGIN
OLD8    DW 0,0
ADDR    DW BUFF
COUNT   DW 0
COUNT1  DW 0
ENDADR  DW ENDBF
INT8    PROC FAR
	PUSHF
	CALL D_P CS:OLD8
	STI
	PUSH AX
	PUSH BX
	PUSH CX
	PUSH DX
	PUSH SI
	PUSH DS
	PUSH CS
	POP DS
	DEC COUNT
	JZ I1
I0:
	POP DS
	POP SI
	POP DX
	POP CX
	POP BX
	POP AX
	IRET
INT8    ENDP

I1:
	MOV AX,COUNT1
	MOV COUNT,AX
	MOV SI,ADDR
	CLD
	CMP SI,ENDADR
	JB I2
	MOV SI,OFFSET BUFF
I2:
	MOV AH,03H
	MOV BX,0
	INT 10H
	PUSH DX
	MOV AH,02H
	MOV BX,0
	MOV DX,73
	INT 10H
	MOV CX,6
I3:
	LODSB
	MOV AH,0EH
	INT 10H
	LOOP I3
	MOV ADDR,SI
	MOV AH,2
	POP DX
	INT 10H
	JMP I0
	
BUFF    LABEL BYTE
	DB '人之初性本善性相近习相远苟不教性乃迁教之道贵以专'
	DB '昔孟母择邻处子不学断机杼窦燕山有义方教五子名俱扬养不教父之过教不严师之惰子不学非所宜幼不学老何为玉不琢不成器人不学不知义' 
	DB '为人子方少时亲师友习礼仪香九龄能温席孝于亲所当执融四岁能让梨弟于长宜先知首孝弟次见闻知某数识某文一而十十而百百而千千而万'
	DB '三才者天地人三光者日月星三纲者君臣义父子亲夫妇顺曰春夏曰秋冬此四时运不穷曰南北曰西东此四方应乎中曰水火木金土此五行本乎数'
	DB '曰仁义礼智信此五常不容紊稻粱菽麦黍稷此六谷人所食马牛羊鸡犬豕此六畜人所饲曰喜怒曰哀惧爱恶欲七情具匏土革木石金丝与竹乃八音'
	DB '高曾祖父而身身而子子而孙自子孙至元曾乃九族人之伦父子恩夫妇从兄则友弟则恭长幼序友与朋君则敬臣则忠此十义人所同凡训蒙须讲究'
	DB '详训诂明句读为学者必有初小学终至四书论语者二十篇群弟子记善言孟子者七篇止讲道德说仁义作中庸子思笔中不偏庸不易作大学乃曾子'
	DB '自修齐至平治孝经通四书熟如六经始可读诗书易礼春秋号六经当讲求有连山有归藏有周易三易详有典谟有训诰有誓命书之奥我周公作周礼'
	DB '著六官存治体大小戴注礼记述圣言礼乐备曰国风曰雅颂号四诗当讽咏诗既亡春秋作别善恶三传者有公羊有左氏有觳梁经既明方读子撮其要'
	DB '记其事五子者有荀扬文中子及老庄经子通读诸史考世系知终始自羲农至黄帝号三皇居上世唐有虞号二帝相揖逊称盛世夏有禹商有汤周文武'
	DB '称三王夏传子家天下四百载迁夏社汤伐夏国号商六百载至纣亡周武王始诛纣八百载最长久周辙东王纲坠逞干戈尚游说始春秋终战国五霸强'
	DB '七雄出蠃秦氏始兼并传二世楚汉争高祖兴汉业建至孝平王莽篡光武兴为东汉四百年终于献魏蜀吴争汉鼎号三国迄两晋宋齐继梁陈承为南朝'
	DB '都金陵北元魏分东西宇文周与高齐迨至隋一土宇不再传失统绪唐高祖起义师除隋乱创国基二十传三百载梁灭之国乃改梁唐晋及汉周称五代'
	DB '皆有由炎宋兴受周禅十八传南北混十七史钱在兹载治乱知兴衰读史者考实录通古今若亲目口而诵心而惟朝于斯夕于斯昔仲尼师项橐古圣贤'
	DB '尚勤学赵中令读鲁论彼既仕学且勤披蒲编削竹简彼无书且知勉头悬梁锥刺股彼不教自勤苦如囊萤如映雪家虽贫学不辍如负薪如挂角身虽劳'
	DB '犹苦卓苏老泉二十七始发愤读书籍彼既老犹悔迟尔小生宜早思若梁灏八十二对大廷魁多士彼既成众称异尔小生宜立志莹八岁能咏诗泌七岁'
	DB '能赋棋彼颖悟人称奇尔幼学当效之蔡文姬能辨琴谢道韫能咏吟彼女子且聪敏尔男子当自警唐刘晏方七岁举神童作正字彼虽幼身已仕尔幼学'
	DB '勉而致有为者亦若是犬守夜鸡司晨苟不学曷为人蚕吐丝蜂酿蜜人不学不如物幼而学壮而行上致君下泽民扬名声显父母光如前裕于后人遗子'
	DB '金满嬴我教子惟一经勤有功戏无益戒之哉且勉力'
ENDBF   LABEL BYTE
BEGIN:
	MOV AX,3508H
	INT 21H
	MOV OLD8,BX
	MOV OLD8+2,ES
	MOV AX,30
	MOV COUNT,AX
	MOV COUNT1,AX
	MOV ADDR,OFFSET BUFF
	MOV ENDADR,OFFSET ENDBF
	MOV AX,2508H
	MOV DX,OFFSET INT8
	INT 21H
	MOV DX,OFFSET BEGIN
	INT 27H
CODE    ENDS
	END STAR