File: generateRandomize.uws

package info (click to toggle)
cadencii 3.3.9%2Bsvn20110818.r1732-7
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 35,940 kB
  • sloc: cs: 160,836; java: 42,449; javascript: 7,966; cpp: 7,605; ansic: 1,728; perl: 1,087; makefile: 234; php: 142; xml: 117; sh: 21
file content (83 lines) | stat: -rw-r--r-- 2,315 bytes parent folder | download | duplicates (6)
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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
dim quant[] = "1(small)", "2", "3(medium)", "4", "5(large)";
ret = slctbox( SLCT_BTN, 0, "̃Vtg", quant );
target = 1;
ifb ret = -1 then
    exit;
elseif ret = SLCT_1 then
    target = 1;
elseif ret = SLCT_2 then
    target = 2;
elseif ret = SLCT_3 then
    target = 3;
elseif ret = SLCT_4 then
    target = 4;
elseif ret = SLCT_5 then
    target = 5;
endif

start = 1;
end = 100;

strStart = input( "JnCfNX" );
start = val( strStart, 1 );
strEnd = input( "ICfNX" );
end = val( strEnd, 100 );

for n = start to end
    hwnd = getid( "VOCALOID Editor" );
    acw( hwnd );
    clkitem( hwnd, "t@C", CLK_MENU );
    clkitem( hwnd, "J", CLK_MENU );
    hwnd_open = getid( "t@CJ" );
    acw( hwnd_open );
    sleep( 0.5 );
    sckey( hwnd_open, VK_N, VK_ALT );
    sendstr( hwnd_open, "base.vsq", 0, TRUE );
    clkitem( hwnd_open, "J", CLK_BTN );
    sleep( 2 );
    while TRUE
        id = getid( "VOCALOID Editor - base.vsq" );
        ifb id = hwnd then
            break;
        endif
        sleep( 1 );
    wend
    acw( hwnd );
    clkitem( hwnd, "Wu", CLK_MENU );
    clkitem( hwnd, "_}CY", CLK_MENU );
    hdlg = getid( "_}CY" );
    acw( hdlg );
    clkitem( hdlg, "̃Vtg", CLK_BTN, TRUE );
    clkitem( hdlg, "sb`̗h炬", CLK_BTN, FALSE );
    sendstr( hdlg, "1", 1, TRUE );
    sendstr( hdlg, "1", 2, TRUE );
    sendstr( hdlg, "385", 3, TRUE );
    sendstr( hdlg, "1", 4, TRUE );
    clkitem( hdlg, "1(small)" );
    for i = 2 to target
        kbd( VK_DOWN, CLICK, 100 );
    next

    str = getstr( hdlg );
    while TRUE
        ifb str = " " + quant[target - 1] then
            break;
        endif
        str = getstr( hdlg );
        sleep( 1 );
    wend

    clkitem( hdlg, "OK", CLK_BTN );
    acw( hwnd );
    clkitem( hwnd, "t@C", CLK_MENU );
    clkitem( hwnd, "Otĕۑ", CLK_MENU );
    sleep( 1 );
    hwnd_save = getid( "Otĕۑ" );
    acw( hwnd_save );
    i2 = int( n / 100 );
    i1 = int( (n - i2 * 100) / 10 );
    i0 = int( n - i2 * 100 - i1 * 10 )
    sendstr( hwnd_save, "small" + target + "-" + i2 + "" + i1 + "" + i0 + ".vsq", 0, TRUE );
    clkitem( hwnd_save, "ۑ" );
    sleep( 3 );
next