fetch.sfl | 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
// 連続key onのために一旦初期状態に戻す
    stage src_read {
        reg_wr bk_count<3>;
        state_name st_getsl, st_getsh, st_head, st_data;
        first_state st_getsl;
        state st_getsl if((^ready) & f_key & ^read_wait.do){
            // 開始アドレス下位取得
            read(READ_AL, (DIR||0x00) + (0b000000||r_SRCN||f_loop||0b0));
            goto st_getsh;
        }
        state st_getsh any{
            key_on | ^f_key : goto st_getsl;
            else : if(^read_wait.do){
                // 開始アドレス上位取得
                read(READ_AH, (DIR||0x00) + (0b000000||r_SRCN||f_loop||0b1));
                goto st_head;
            }
        }
        state st_head any{
            key_on | ^f_key : goto st_getsl;
            else : if(src_empty & ^read_wait.do){
                // ヘッダ取得
                read(READ_HD, src_AH || src_AL);
                adinc();
                bk_count := 0b000;
                goto st_data;
            }
        }
        state st_data any{
            key_on | ^f_key : goto st_getsl;
            else : if(src_empty & ^read_wait.do){
                // ブロックデータ取得×8
                read(READ_BD, src_AH || src_AL);
                adinc();
                bk_count++;
                if(/&bk_count) any{
                    f_end : par{
                        goto st_getsl;
                        if(^f_loop) finish;
                    }
                    else : goto st_head;
                }
            }
        }
    }
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX