關於Verilog猜拳機設計求助

uncommon

猜拳機IC 設計( GAME1 )
• 1 輸入: A方設定剪刀/ 石頭/ 布( A_GENDAU /
# \- A5 C1 N+ N( t; mA_STONE / A_BOO ) , B方設定剪刀/ 石頭/ 布
: n( R0 a9 f1 s( |( B_GENDAU / B_STONE / B_BOO ) , 裁判
. f7 \: Y0 g: l8 j' {6 d; [+ q" t. h( CHECK )裁定A , B 方的猜拳輸贏設定.
) A0 I$ d) {  `+ e1 f• 2 輸出: A , B平手輸出線( ABEQU ) , A贏輸出線
7 g# ]* {7 L  b3 G& F( A_WIN ), B贏輸出線( B_WIN ) , 尚未裁定或A , B
; S5 P9 a% ]9 ]& {猜拳資料設定有誤輸出線( ERROR )
$ f" a, ]9 n' R0 U6 j• 3 功能: A , B 雙方都設定好剪刀/石頭/布之後,
2 l5 b% _. t. V使CHECK = 1 , A , B的猜拳輸贏結果將使
( ABEQU , A_WIN , B_WIN )之一為1 ; 若
CHECK= 0 或設定有誤, 則ERROR 輸出1
% o( ]) N% G: J- J: \+ g
看了很久我只打出了...
7 O& Y" E- ]6 f" T( D& n) M/ P+ |module Game1(check, A_GENDAU, A_STONE, A_BOO, B_GENDAU, B_STONE, B_BOO, ABEQU, A_WIN, B_WIN, ERROR, A_WIN, B_WIN,)
  D9 q* m% p% T2 @) n  q( Rinput               check, A_GENDAU, A_STONE, A_BOO, B_GENDAU, B_STONE, B_BOO;
* B2 z" S- V+ E0 |' H3 @output             ABEQU, A_WIN, B_WIN, ERROR;
- P7 J# Q& h$ Dreg                  ABEQU, A_WIN, B_WIN, ERROR;
1 n3 i% O% r* K6 Z; w
, f0 F" c1 E: f; L接下來就不知道該如何打了...
$ E* k9 g2 R& Q  j. r' q3 @(我想我打的應該也都錯吧...)

& X" p1 |' }  N2 Q3 _1 b如果有人給我ㄧ份程式可以麻煩跟我說語法的意思各是什麼意思嗎...
因為想了解才不會什麼都不會...
麻煩各位高手了!!

LAICYU

module game(chack,a_STONE, a_BOO, a_GENDAU, b_STONE, b_BOO, b_GENDAU, clk,aequb,awin,bwin,error);
6 S2 j4 ^( P# s0 h* O
' v( m/ S% Q5 ~+ w2 Linput     chack,a_STONE, a_BOO, a_GENDAU, b_STONE, b_BOO, b_GENDAU, clk;

) l% K* a/ u* H8 koutput    aequb,awin,bwin,error;

reg       aequb,awin,bwin,error;
# l/ P1 i6 e! G" Q
8 H/ }* W* g, I3 _9 Oalways@(posedge clk)
% B  \" [  v" A8 D& c8 `- `6 E8 O( a
" Z" g1 [) J; H- tbegin
/*aequb=0;
+ E9 \' ~- f5 w) Kbwin=0;
awin=0;
error=0;*/
! W2 y! C8 N: `7 Iif (chack==0)
1 |; `  g4 ?- W' v' H                error=1;
        else
( e/ m1 r$ x" P- d) N/ {$ {- f4 `                //a=STONE
: }' b: ^  k% @                if ({a_GENDAU,a_BOO,a_STONE}==3'b001)
4 c% w; A  E* g6 b) V               
( n7 x/ v/ w  x8 x" s! ^+ ^                        case({b_GENDAU,b_BOO,b_STONE})
                        3'b001:aequb=1;        //b=STONE
                        3'b010:bwin=1;        //b=BOO
                        3'b100:awin=1;        //b=GENDAU
                        default:error=1;
1 ^+ a3 N1 W2 ]3 f                        endcase
                       
# I  p) R, T0 c                else
! y' d; c+ V/ `                        //a=BOO
                        if ({a_GENDAU,a_BOO,a_STONE}==3'b010)       
                               
+ M/ E9 w2 ^7 }  N( H" c  p; V                                case({b_GENDAU,b_BOO,b_STONE})
1 d+ @# b9 X( Y                                        3'b001:awin=1;//b=STONE
% I" O1 f* N. I: h: o/ u7 Q                                        3'b010:aequb=1;//b=BOO
* L* S9 \/ K( \. _                                        3'b100:bwin=1;//b=GENDAU
                                        default:error=1;
/ W/ N0 E0 O. {) i                                endcase
6 u8 r; D, @& A2 d9 x                               
                        else                
( S3 _: K  x4 O  U' M                                //a=GENDAU
. Z1 i9 v# j4 P0 H9 J                                if ({a_GENDAU,a_BOO,a_STONE}==3'b100)
                                       
& B+ w) }' {# {/ X3 I- B                                        case({b_GENDAU,b_BOO,b_STONE})
                                                3'b001:bwin=1;//b=STONE
                                                3'b010:awin=1;//b=BOO
                                                3'b100:aequb=1;//b=GENDAU
$ c( ^* d" M" A. q0 u( x( s1 }                                                default:error=1;
                                        endcase
                                       
: B, K0 F% @' P) y/ r                                else        
0 y( r8 _% m8 U. X" w; E                                        error=1;
end
endmodule