-
Notifications
You must be signed in to change notification settings - Fork 0
/
newB
81 lines (59 loc) · 2 KB
/
newB
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
"test 1"
# global -> object -> module?
Main = { $call = { id = 0 } }
{ # _ is not allowed!?, _ used to support space in dir
"test 3" = { 1 2 x=3 x=8 y=4 5 a b c z = { 1 2 3 4 5} }
}
pass = { 1 2 3 4 5 8 } # mask?
Event = {
id = 0
#
## ~~, ~~~ chk -> condition : ToBool4? - for all function?
#
# cf) $for - ToDo?? : using idx? [start, last]
$register_object = { fileName = { "ex3.txt" } }
$for_each = { # option - not change!?
# eventID -> event -> $parameter?
eventID = { first_test }
dir = { $concat_all = { / _ / "test 3" / z } } # cf ) "test" for / / name that is empty!
condition = { # chk ~~~ and ~~ /
AND = {
EXISTITEMBYVALUE = { ~~~ $concat_all = { root / pass } } # ~~~ value, ~~ var_name
$event_result = { id = { bool_chk } x = { $get_item_value2 = { /// } } y = { //// } } # //// dir?
}
}
}
$print = { data = { $return_value = { } } }
$print = { val = { \n } }
$print2 = { dir = { /./ } }
$print = { val = { \n } }
$_getch = { }
}
Event = {
id = bool_chk
$parameter = { x y }
$print = { value = { "test " } }
$print2 = { value = { $concat_all = { $move_up = { $parameter.y } / z } } } # 여백 때문에 나누어 진다? - chk!! - ToDo
$print = { value = { \n } }
$return = { $AND = { $event_result = { id = c } $COMP> = { $parameter.x 2 } } }
}
Event = {
id = c
$print = { text = { "chk " } }
$print = { enter= { \n } }
$return = { TRUE }
}
Event = {
id = first_test
$parameter = { x }
$call_registered_object2 = { name = { "ex3.txt" } parameter = { id = 1 i = 3 j = 1 } }
# $module = { fileName = { "newE"} data = { } }
$if = {
condition = { $is_empty_string = { $get_item_name = { $parameter.x } } }
then = {
$return = { $multiple = { 10 $get_item_value = { $parameter.x 0 } } } # core = A core = B
}
}
$return = { $concat_all2 = { $get_item_name = { $parameter.x } = $multiple = { 10 $get_item_value = { $parameter.x 0 } } } }
}
"test 2"