谁要.ASM源代码？

FlierMate_

这是Pong游戏，两个人同时用键盘玩。
为了参加比赛，所以指令占用的BYTES越少越好。

1. ;
   
2. ;  PONG.ASM
   
3. ;
   
4. ;  Coded by Boo Khan Ming (Wu), from Malaysia
   
5. ;  for Hugi Size Coding Compo 3 (August 1998)
   
6. ;
   
7. ;
   
8. ;  Size Distribution                    178
   
9. ;  哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪
   
10. ;  Ball (clear+draw)                      8
    
11. ;  Ball (move+reflect+check for end)     41
    
12. ;  Bars (clear+draw)                     27
    
13. ;  Bars (move+kb handler)                38
    
14. ;  Misc (init+exit+delay)                46
    
15. ;  Text                                  18
    
16. ;
    
17. ;
    
18. ;  This is my first game written in Assembly language.
    
19. ;  Please do not expect much from me.
    
20. ;  Anyway, I've put great effort in finding the most suitable algorithm,
    
21. ;  and this is being my third algorithm.
    
22. ;
    
23. ;  哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪
    
24. ;
    
25. ;  There are mainly two unique technique or algorithm employed here and
    
26. ;  should be outlined to make you easier to follow the code.
    
27. ;
    
28. ;  For keystroke checking, the most essential part is the conversion
    
29. ;  performed by AAA (or DAA) instruction.
    
30. ;  The player side and the left or right keys are then determined from
    
31. ;  bit 0 and bit 1 in accumulator (AL) respectively.
    
32. ;
    
33. ;  For ball movement, the horizontal and vertical edge detection are
    
34. ;  determined from two counters respectively.
    
35. ;  This is concluded from that the number of movement from left edge to
    
36. ;  right edge and vice versa are equal. Similarly, the number of movement
    
37. ;  from top edge to bottom edge and vice versa are equal too.
    
38. ;  Therefore, when the counter are decremented to zero, an edge collision
    
39. ;  should be encountered logically.
    
40. ;
    
41. ;
    
42. ;  Contact e-mail: bookm@tm.net.my
    
43. ;  Homepage URL  : http://www.geocities.com/SiliconValley/Horizon/3409/
    
44.   
    
45. 
    
46.         .MODEL tiny
    
47.         .286
    
48. 
    
49.         .DATA
    
50.         Table           DW      0,0
    
51.         Message         DB      "Player 2 has won.$"
    
52. 
    
53.         .CODE
    
54.         .STARTUP
    
55. 
    
56.         mov     al, 03h                 ; set text mode        
    
57.         int     10h
    
58.         push    0b800h                  ; startup initialization
    
59.         pop     es
    
60.         cli
    
61.         lea     si, Table               ; data table starting offset
    
62.         mov     di, 324                 ; ball parameters
    
63.         mov     bp, 320
    
64.         mov     bl, 162
    
65.         mov     cl, 77
    
66.         mov     al, 22
    
67.         
    
68. Start:
    
69.         pusha
    
70. 
    
71.         mov     ax, 09dch               ; draw new ball
    
72.         stosw
    
73. 
    
74.         mov     cl, 75                  ; perform vertical retrace
    
75.         mov     dx, 03dah               
    
76. Delay:
    
77.         in      al, dx
    
78.         xor     al, cl
    
79.         and     al, 8
    
80.         jnz     Delay
    
81.         loop    Delay
    
82. 
    
83.         call    Draw                    ; clear old paddles
    
84. 
    
85.         in      al, 60h                 ; check keystroke
    
86.         test    al, 80h
    
87.         jnz     Key2
    
88.         cmp     al, 1                   ; (required) to set AF?
    
89.         aaa
    
90.         mov     cl, 10
    
91.         mov     bl, al
    
92.         and     bx, 0001h               ; determine player side
    
93.         shl     bl, 1
    
94.         test    al, 02h                 ; determine left or right keys
    
95.         jnz     Key1
    
96.         neg     cl
    
97. Key1:
    
98.         mov     ax, [si+bx]             ; move paddle
    
99.         add     al, cl
    
100.         cmp     al, 90h                 ; left and right edge check
     
101.         jae     Key2
     
102.         mov     [si+bx], ax
     
103. Key2:
     
104.         mov     ax, 0adbh               ; draw new paddles
     
105.         call    Draw
     
106. 
     
107.         popa
     
108. 
     
109.         stosw                           ; clear old ball
     
110. 
     
111.         dec     di                      ; move ball
     
112.         dec     di
     
113.         add     di, bx
     
114.         dec     cx                      ; horizontal edges check
     
115.         jnz     Move1
     
116.         neg     bx                      ; horizontal reflection
     
117.         add     bx, bp
     
118.         mov     cl, 79
     
119. Move1:
     
120.         dec     ax                      ; vertical edges check
     
121.         jnz     Move3
     
122. Move2:
     
123.         neg     bp                      ; vertical reflection
     
124.         add     bx, bp
     
125.         mov     al, 0dbh                ; vertical collision check
     
126.         scasb
     
127.         jnz     Stop
     
128.         mov     al, 22
     
129.         dec     di
     
130.         add     di, bp                  ; vertical reflection correction
     
131. Move3:
     
132.         jmp     SHORT Start
     
133. 
     
134. Stop:
     
135.         shr     di, 11                  ; update player ID
     
136.         sub     [si+11], di
     
137.         mov     al, 03h                 ; reset text mode
     
138.         int     10h
     
139.         mov     ah, 09h                 ; display message
     
140.         lea     dx, Message
     
141.         int     21h
     
142.         ret
     
143. Draw:
     
144.         mov     cl, 10                  ; draw paddles (procedure)
     
145.         push    cx
     
146.         mov     di, [si+2]
     
147.         rep     stosw
     
148.         pop     cx
     
149.         mov     di, [si]
     
150.         add     di, 0f00h
     
151.         rep     stosw
     
152.         ret
     
153. 
     
154.         END
     

复制代码

A-B-C.

厉害下 , 一直想学asm 不过总是感觉很难

FlierMate..

厉害下 , 一直想学asm 不过总是感觉很难
A-B-C. 发表于 7-3-2011 02:17 AM

    樓主我現在忘記的七七八八了。

據説Visual Studio .NET也有Assembly Language呢，A-B-C.您不妨一試？

A-B-C.

樓主我現在忘記的七七八八了。

據説Visual Studio .NET也有Assembly Language呢，A-B-C.您不妨 ...
FlierMate.. 发表于 7-3-2011 01:07 PM

    哈哈 , 我也想啊 不过还是专注与C++比较好

FlierMate..

哈哈 , 我也想啊 不过还是专注与C++比较好
A-B-C. 发表于 8-3-2011 12:27 AM

    C++已經很不錯了。

A-B-C.

C++已經很不錯了。
FlierMate.. 发表于 8-3-2011 01:18 AM

    恩 , 不过我还是比较喜欢ASM , 看了王爽的汇编教程 , 不过一直都好像懂一点又不懂一点酱

FlierMate..

恩 , 不过我还是比较喜欢ASM , 看了王爽的汇编教程 , 不过一直都好像懂一点又不懂一点酱
A-B-C. 发表于 8-3-2011 01:21 AM

    很容易的啦，過你幾招：先認識Register:AX,BX,CX....

AX=16bit,EAX=32bit(?) AX=AH(8bit)+AL(8bit)

SET A=1                   MOV AX,1
A+=1                       ADD AX,1  或 INC AX
SET A=0                   XOR AX,AX 或 SUB AX,AX (MOV AX,0好像比較慢，沒有人這樣用)

IF A=3 THEN GOTO R:       CMP AX,3
                                      JNZ/JZ R: (我忘了AX=3是ZERO FLAG還是AX=3等於NOT ZERO FLAG)

大概這樣，接下來就是MEMORY部分，有CS，DS。。。都是一pair一pair的，也就是segment, offset。
比如CS是Code Segment，IP(Offset)是Intruction Pointer等等，然後就可以refer去其他Memory區域

記得。COM程序大小不能大過64KB,（現在還是這樣嗎？）  還有可以cast, 比如 MOVE AX，WORD PTR[BL]（不太肯定，大概這樣）

還是你看那個筆者的帖比較好。

Microsoft好像用C++開發Windows的哦！C++程序員都很吃香。

A-B-C.

很容易的啦，過你幾招：先認識Register:AX,BX,CX....

AX=16bit,EAX=32bit(?) AX=AH(8bit)+AL( ...
FlierMate.. 发表于 8-3-2011 02:02 AM

    你这样写比较容易明白了 , 因为有时候我理解了add , mov 但是实际运用的时候我就忘了应该用什么命令了

FlierMate..

你这样写比较容易明白了 , 因为有时候我理解了add , mov 但是实际运用的时候我就忘了应该用什么命 ...
A-B-C. 发表于 8-3-2011 02:50 AM

    誇獎了，我比你差，ASM只是咖喱菲，我真正的職業（前幾年）是Visual Basic 6，離C++的地位有天淵之別。

還有那些SHR, SHL, AND, OR, XOR都是High-Level Language都有用到的，所以別怕ASM!

aquamax

我只会.....AX,3 INT 10H....

FlierMate..

我只会.....AX,3 INT 10H....
aquamax 发表于 8-3-2011 07:29 PM

    哦，查了查，是80x25 Text Mode吧，我很多程序都在Vista跑不到，因爲這個需要Full Screen!!!而被Vista中止了。

aquamax

是的....我还跑XP呢....

chrizyuen2

我只会.....AX,3 INT 10H....
aquamax 发表于 8-3-2011 07:29 PM

弱弱的说．你忘记　MOV AX ,3
INT 10H.

astral

基本上这里头包含了最基本的读key,在垂直扫描返回周期更新画面的部分。。。
是个不错的查考样本，感谢分享。。。

AdventChildren

忽然想起大学时的assembly programming lab test，
几乎每个星期班上的学生都全军覆没...

FlierMate__

基本上这里头包含了最基本的读key,在垂直扫描返回周期更新画面的部分。。。
是个不错的查考样本，感谢分享 ...
astral 发表于 18-3-2011 07:00 AM

    谢谢你。说不定你比我更懂汇编/组合语言呢！

FlierMate__

忽然想起大学时的assembly programming lab test，
几乎每个星期班上的学生都全军覆没...
AdventChildren 发表于 19-3-2011 11:02 AM

    是电脑工程科系吗？我记得Assembly Language是唯一教到的‘软件’部分。

AdventChildren

是电脑工程科系吗？我记得Assembly Language是唯一教到的‘软件’部分。
FlierMate__ 发表于 19-3-2011 10:12 PM

电脑科学的其中一个硬件课，lecturer也是借机会让大家见识见识，没有很认真教...

金旦面

忽然想起大学时的assembly programming lab test，
几乎每个星期班上的学生都全军覆没...
AdventChildren 发表于 2011-3-19 11:02

我是覆没到最后的，幸好retake过关。