[分享]一个有趣的打字游戏

cnangel

1. ;--------------------------------------------------------------------------------
2. ;此模板是纯DOS程序代码,需要MASM5.0,编译时请使用"编译 -> DOS"方式。
3. ;--------------------------------------------------------------------------------
4. Init_game macro op1,op2,op3,op4,op5,op6
6. mov cx,00h
7. mov dh,op1
8. mov dl,op2
9. op6:
10. mov ah,02h
11. mov bh,00h
12. int 10h
14. push cx
15. mov ah,0ah
16. mov al,op3
17. mov bh,00h
18. mov cx,01h
19. int 10h
20. pop cx
22. inc cx
23. inc op4
24. cmp cx,op5
25. jne op6
27. endm
29. clear_screen macro op1,op2,op3,op4
30. mov ah,06h
31. mov al,00h
32. mov bh,07h
33. mov ch,op1
34. mov cl,op2
35. mov dh,op3
36. mov dl,op4
37. int 10h
39. mov ah,02h
40. mov bh,00h
41. mov dh,00h
42. mov dl,00h
43. int 10h
44. endm
47. menu macro op1,op2,op3
48. mov ah,02h
49. mov bh,00h
50. mov dh,op1
51. mov dl,op2
52. int 10h
54. mov ah,09h
55. lea dx,op3
56. int 21h
57. endm
60. data segment
62. linjiang db "Made by lin jiang$"
63. no db "NO.:021411$"
64. meg db "Let us have a game!!Come on!!$"
65. meg1 db "**Select Menu**$"
66. meg2 db "Please select the game speed,ESC to quit.$"
67. meg3 db "1.Very slow Too easy,speed up!$"
68. meg4 db "2.Slow Everybody can deal.$"
69. meg5 db "3.Nomal I think you can deal!$"
70. meg6 db "4.Fast A challenge.Pay attention!$"
71. meg7 db "5.Very Fast Too hard,Have a try?$"
72. meg8 db "6.Fastest Are you crazy??$"
73. meg9 db "*Select the number among 1-6 and press ENTER to start!*$"
74. meg10 db "Game Speed Select:$"
76. hotkey db "When you are playing games:$"
77. hotkey1 db "ESC to return to menu$"
78. hotkey2 db "SPACE to pause the game$"
79. hotkey3 db "Press any key to play games......$"
80. hotkey4 db "Are you ready??$"
82. failmeg db "The letter is arrive the bottom, You are lost ! :($"
83. failmeg0 db "Press ENTER to go on......$"
84. failmeg1 db "Game is over!$"
85. failmeg2 db "Press ENTER to return menu and press ESC to exit!$"
86. failmeg3 db "Bye-Bye!Thank for your playing!!$"
87. failmeg4 db "Press any key to quit......$"
89. speed dw 00d,1200d,800d,600d,400d,200d,100d
92. letters db "jwmilzoeucgpravskntxhdyqfb"
93. db "iytpkwnxlsvxrmofzhgaebudjq"
94. db "nwimzoexrphysfqtvdcgljukda"
96. letters_bak db "jwmilzoeucgpravskntxhdyqfb"
97. db "iytpkwnxlsvxrmofzhgaebudjq"
98. db "nwimzoexrphysfqtvdcgljukda"
100. letter_counter db 0
101. life_flag db 78 dup(0)
103. position_flag db 78 dup(0)
104. present_position db 1
108. data ends
110. stack segment para stack 'stack'
111. db 64 dup(0)
112. stack ends
116. code segment
117. main proc far
118. assume cs:code,ds:data,ss:stack
119. start:
121. mov ax,data
122. mov ds,ax
124. mov letter_counter,00h
125. mov present_position,1
127. lea si,position_flag
129. mov ah,00h
130. mov cx,00h
132. init_postion_flag:
133. mov [si],ah
134. inc si
135. inc cx
136. cmp cx,78d
137. jne init_postion_flag
139. lea di,letters
140. lea si,letters_bak
141. mov cx,00h
142. init_letters:
143. mov ah,[si]
144. mov [di],ah
145. inc si
146. inc di
147. inc cx
148. cmp cx,78d
149. jne init_letters
152. mov ah,00h
153. lea si,life_flag
154. mov cx,00h
155. init_life_flag:
156. mov [si],ah
157. inc si
158. inc cx
159. cmp cx,78d
160. jne init_life_flag
165. mov cx,00h
166. mov ah,01h
167. or ch,00010000b
168. int 10h
170. clear_screen 00d,00d,24d,79d
174. Init_game 00d,00d,0ah,dl,80d,nextsign1
176. Init_game 24d,00d,0ah,dl,80d,nextsign2
178. Init_game 00d,00d,0ah,dh,25d,nextsign3
180. Init_game 00d,79d,0ah,dh,25d,nextsign4
185. menu 01d,15d,meg ;菜单信息的宏展开
186. menu 01h,61d,linjiang
187. menu 03d,20d,meg1
188. menu 03d,68d,no
189. menu 05d,15d,meg2
190. menu 07d,15d,meg3
191. menu 09d,15d,meg4
192. menu 11d,15d,meg5
193. menu 13d,15d,meg6
194. menu 15d,15d,meg7
195. menu 17d,15d,meg8
196. menu 19d,15d,meg9
197. menu 22d,15d,meg10
203. input: mov ah,02h
204. mov bh,00h
205. mov dh,22d
206. mov dl,33d
207. int 10h
209. mov ah,0ah
210. mov al," "
211. mov bh,00h
212. mov cx,01h
213. int 10h
215. mov ah,01h
216. int 21h
217. retry: cmp al,"1"
218. je speed1
219. cmp al,"2"
220. je speed2
221. cmp al,"3"
222. je speed3
223. cmp al,"4"
224. je speed4
225. cmp al,"5"
226. je speed5
227. cmp al,"6"
228. je speed6
229. cmp al,1bh
230. je to_over0
231. jmp input
233. to_over0:jmp over
236. speed1: mov ah,01h
237. int 21h
238. cmp al,0dh
239. jne otherkey
240. mov ax,speed+2
241. mov speed,ax
242. jmp begin
244. speed2: mov ah,01h
245. int 21h
246. cmp al,0dh
247. jne otherkey
248. mov ax,speed+4
249. mov speed,ax
250. jmp begin
252. speed3: mov ah,01h
253. int 21h
254. cmp al,0dh
255. jne otherkey
256. mov ax,speed+6
257. mov speed,ax
258. jmp begin
260. speed4: mov ah,01h
261. int 21h
262. cmp al,0dh
263. jne otherkey
264. mov ax,speed+8
265. mov speed,ax
266. jmp begin
268. speed5: mov ah,01h
269. int 21h
270. cmp al,0dh
271. jne otherkey
272. mov ax,speed+10
273. mov speed,ax
274. jmp begin
276. speed6: mov ah,01h
277. int 21h
278. cmp al,0dh
279. jne otherkey
280. mov ax,speed+12
281. mov speed,ax
282. jmp begin
284. otherkey: ; 处理重复输入的代码段
286. push ax
287. mov ah,02h
288. mov bh,00h
289. mov dh,22d
290. mov dl,34d
291. int 10h
293. mov ah,0ah
294. mov al," "
295. mov bh,00h
296. mov cx,01h
297. int 10h
299. mov ah,02h
300. mov bh,00h
301. mov dh,22d
302. mov dl,33d
303. int 10h
304. pop ax
306. mov dx,ax
307. mov ah,02h
308. int 21h
310. jmp retry
312. begin:
314. clear_screen 01d,01d,23d,78d
316. menu 08d,20d,hotkey
317. menu 10d,20d,hotkey1
318. menu 12d,20d,hotkey2
319. menu 14d,20d,hotkey4
320. menu 16d,20d,hotkey3
322. mov ah,07h
323. int 21h
325. clear_screen 01d,01d,23d,78d
326. Init_game 23d,01d,01h,dl,78d,nextsign5
328. mov ah,02h ;光标初始化
329. mov bh,00h
330. mov dh,01h
331. mov dl,01h
332. int 10h
334. mov cx,00h
335. lea si,letters
336. nextletter: ; 初始化屏幕上方的字母
337. mov ah,02h
338. mov dl,[si]
339. int 21h
341. inc si
342. inc cx
343. cmp cx,78d
344. je nextcycle
345. jmp nextletter
348. from_front: ; 相关循环的算法
349. sub present_position,78d
350. jmp gobackto_si
352. find_zero:cmp letter_counter,78d
353. je recycle
355. cmp present_position,78d
356. je from_one
358. mov ah,00h
359. nextsi: add present_position,01h
360. inc si
361. cmp [si],ah
362. je gobackto_di
364. cmp present_position,78d
365. je from_one
367. jmp nextsi
371. from_one:mov present_position,01h
373. jmp gobackto_si
375. recycle:mov letter_counter,00h
376. mov present_position,01d
377. lea si,position_flag
378. mov cx,00h
380. mov ah,00h
381. clearsi: mov [si],ah
382. inc cx
383. cmp cx,78d
384. je nextcycle
385. inc si
386. jmp clearsi
390. nextcycle:
391. lea di,letters
392. lea si,position_flag
393. add present_position,31d
394. cmp present_position,78
395. ja from_front
398. gobackto_si:
399. add si,word ptr present_position
400. dec si
401. mov ah,[si]
402. cmp ah,01h
403. je find_zero
406. gobackto_di:
407. mov ah,01h
408. mov [si],ah
409. add di,word ptr present_position
410. dec di
411. mov dl,present_position
415. mov ah,02h ; 字母下落的代码段部分
416. mov bh,00h
417. mov dh,01h
418. int 10h
420. mov cx,00h
421. nextrow:push cx ; 新的一行
424. mov cx,00h
425. out_cycle: ; 延迟
426. push cx
427. mov cx,00h
428. in_cycle:
429. add cx,01h
430. cmp cx,50000d
431. jne in_cycle
433. push dx
434. mov ah,06h
435. mov dl,0ffh
436. int 21h
437. pop dx
439. jz pass ; 如果键盘缓冲区部分为空,则跳转
442. cmp al,1bh ; 如果键入ESC，则返回主菜单
443. je to_start1
445. cmp al," " ;如果键入SPACE，则游戏暂停
446. je pause
448. cmp al,[di] ;输入字母正确！跳转!
449. je disappear
453. pass:
454. pop cx
455. inc cx
456. cmp cx,speed
457. je print
458. jmp out_cycle
461. pause: push dx ;暂停处理
462. mov ah,06h
463. mov dl,0ffh
464. int 21h
465. pop dx
466. cmp al," "
467. jne pause
469. jmp pass
472. to_start1: ;返回主菜单
473. jmp start
475. print:
478. mov ah,0ah
479. mov al," "
480. mov bh,00h
481. mov cx,01h
482. int 10h
484. inc dh
485. mov ah,02h
486. mov bh,00h
487. int 10h
489. mov ah,0ah
490. mov al,[di]
491. mov bh,00h
492. mov cx,01h
493. int 10h
495. pop cx
496. inc cx
497. cmp cx,21d
498. je print_next_letter
499. jmp nextrow ; 下一行
501. disappear: ; 击中字母后的相关处理
502. pop cx
503. pop cx
505. mov ah,0ah
506. mov al," "
507. mov bh,00h
508. mov cx,01h
509. int 10h
512. jmp hit
515. print_next_letter: ; 处理原位置的空缺
516. lea si,life_flag
517. add si,word ptr present_position
518. dec si
520. mov ah,[si]
521. cmp ah,1
522. je fail
524. mov ah,0ah
525. mov al," "
526. mov bh,00h
527. mov cx,01h
528. int 10h
531. inc dh
532. mov ah,02h
533. mov bh,00h
534. int 10h
536. mov ah,0ah
537. mov al," "
538. mov bh,00h
539. mov cx,01h
540. int 10h
543. mov ah,1
544. mov [si],ah
547. hit: mov ah,02h
548. mov bh,00h
549. mov dh,01h
550. mov dl,present_position
551. int 10h
553. mov al,[di] ; 出现下一个新字母的数法
554. add al,7
555. cmp al,7ah
556. ja convey_letter
557. mov ah,0ah
558. mov bh,00h
559. mov cx,01h
560. int 10h
562. mov [di],al
563. add letter_counter,01h
564. jmp nextcycle
566. convey_letter:
567. sub al,7ah
568. add al,61h
569. mov ah,0ah
570. mov bh,00h
571. mov cx,01h
572. int 10h
574. mov [di],al
575. add letter_counter,01h
576. jmp nextcycle
578. fail: mov ah,0ah ;游戏失败后的相关处理
579. mov al," "
580. mov cx,01h
581. int 10h
583. inc dh
584. mov ah,02h
585. mov bh,00h
586. int 10h
588. mov ah,0ah
589. mov al,[di]
590. mov bh,00h
591. mov cx,01h
592. int 10h
594. mov ah,02h
595. mov bh,00h
596. mov dh,12d
597. mov dl,17d
598. int 10h
600. push dx
601. mov ah,09h
602. lea dx,failmeg
603. int 21h
604. pop dx
606. add dh,2
607. mov ah,02h
608. mov bh,00h
609. int 10h
611. mov ah,09h
612. lea dx,failmeg0
613. int 21h
615. re: mov ah,07h
616. int 21h
617. cmp al,0dh
618. jne re
621. clear_screen 01,01,23,78
622. mov ah,02h
623. mov bh,00h
624. mov dh,11d
625. mov dl,20d
626. int 10h
628. push dx
629. mov ah,09h
630. lea dx,failmeg1
631. int 21h
632. pop dx
634. inc dh
635. inc dh
636. mov ah,02h
637. mov bh,00h
638. int 10h
640. mov ah,09h
641. lea dx,failmeg2
642. int 21h
644. notkey:
645. mov ah,07h
646. int 21h
647. cmp al,0dh
648. je to_start
649. cmp al,1bh
650. je over
651. jmp notkey
652. to_start:
653. clear_screen 00,00,24,79
654. jmp start
656. over: clear_screen 01,01,23,78
657. mov ah,02h
658. mov bh,00h
659. mov dh,11d
660. mov dl,15h
661. int 10h
663. mov ah,09h
664. lea dx,failmeg3
665. int 21h
667. mov ah,02h
668. mov bh,00h
669. mov dh,13d
670. mov dl,15h
671. int 10h
673. mov ah,09h
674. lea dx,failmeg4
675. int 21h
677. mov ah,07h
678. int 21h
680. mov ah,07h
681. int 21h
683. clear_screen 00,00,24,79
685. mov ax,4c00h
686. int 21h
689. main endp
690. code ends
691. end start　

复制代码