VGAコントローラ | Codetter（こーどったー）

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
circuit vga_ctrl
{
    instrin htimming; // 25MHz
    output h_sync, v_sync;
    output h_en, v_en;
    output h_count<10>, v_count<10>;
    input iR<4>, iG<4>, iB<4>;
    output oR<4>, oG<4>, oB<4>;
    reg_wr h_tim<10>, v_tim<10>;
    reg_ws h_sync_reg, v_sync_reg;
    reg_wr h_en_reg, v_en_reg;
    instrself vtimming;
    par{
        h_sync = h_sync_reg;
        v_sync = v_sync_reg;
        h_en = h_en_reg;
        v_en = v_en_reg;
        h_count = h_tim - (96+48+1);
        v_count = v_tim - (2+33+1);
        if(h_en & v_en){
            oR = iR; oG = iG; oB = iB;
        }
        else{
            oR = 0; oG = 0; oB = 0;
        }
    }
    instruct htimming par{
        any{
            h_tim==0  : h_sync_reg := 0;
            h_tim==96 : par{
                h_sync_reg := 1;
                vtimming();
            }
            h_tim==(96+48)     : h_en_reg := 1;
            h_tim==(96+48+640) : h_en_reg := 0;
        }
        if(h_tim==(800-1)) h_tim := 0;
        else h_tim++;
    }
    instruct vtimming par{
        any{
            v_tim==0 : v_sync_reg := 0;
            v_tim==2 : v_sync_reg := 1;
            v_tim==(2+33)     : v_en_reg := 1;
            v_tim==(2+33+480) : v_en_reg := 0;
        }
        if(v_tim==(525-1)) v_tim := 0;
        else v_tim++;
    }
}
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX