Subject | Hash | Author | Date (UTC) |
---|---|---|---|
implement group adding | d347e25e93e94f711c4098fecc9775af22eb7309 | Alex | 2022-07-12 20:12:00 |
make parser to work somehow | bb968a00680246434eb1f9795ebde4babea3fb05 | Alex | 2022-07-12 05:19:43 |
some preparations for parsing | 0259ef32db69fdb45bc9e67d88c74aca4ae69ce6 | Alex | 2022-07-12 03:59:45 |
prepare png icon | b7dc494acb640d92c5b7b49bc2ee93fd5a0d521c | Alex | 2022-07-11 07:17:47 |
fetching is ready | 0d01c38238a2ea7e39bc671de1997294231d8549 | Alex | 2022-07-11 06:37:06 |
read feeds from feeds.json U¾ivatel asi bude chtit mít své fidy u sebe | de14a1e9f5a99f79e44985073df04e89bae2c116 | Alex | 2022-07-11 01:26:52 |
prepare default feeds | d2b45f0007c30da84662b8b2a1f2118d03e30e1f | Alex | 2022-07-11 01:25:58 |
prepare Lock&Unlock | f76041ef4fa2b6d5301afb34bda5de13f8ff2701 | Alex | 2022-07-10 00:37:38 |
prepare downloading routines | f12d337da75c3cefe4ef0ccb3f08472e7701b058 | Alex | 2022-07-09 23:52:36 |
move default feeds to feeds.hws | 6efc0f7c1767a2feba618938c8f83eab43f93b0e | Alex | 2022-07-09 14:16:44 |
set up EmptyNodes attribute | 41e19a0974fbf63f959fe7e3135d2efb9cb48ce6 | Alex | 2022-07-09 11:44:03 |
disable icon menu | 540099f84a9d1a567dd079ca8ba5ac667ec8945f | Alex | 2022-07-08 23:37:47 |
implement tree manipulation commands | dfa3a877079a75d7c5a724bb9c6e84a6db1d4677 | Alex | 2022-07-08 21:07:10 |
implement coping to clipboard | 380b60dad4bd182a92199db5cde4339baaa84521 | Alex | 2022-07-08 20:35:05 |
prepare context menus | eb75fc61825de235f63b47176ca9ec88f8966d2b | Alex | 2022-07-08 15:01:46 |
add cycle chains | b0d80feff1cfb953d50a79e7773077a846cc72c2 | Alex | 2022-07-08 12:25:15 |
prepare layout | 46613958a1e87944104f74aa77ebb106dc22a2ad | Alex | 2022-07-07 23:36:19 |
implement Load/Save feeds' tree | ce6ded536ef07a49e96f181c07c84c1239ef607d | Alex | 2022-07-05 23:10:44 |
implement feed tree filling | dad148576a106072f87be33803e7a916cb044d35 | Alex | 2022-07-05 17:09:20 |
implement item selection | b42586a38c98a4087937b8f85f7dd2570cb61bf7 | Alex | 2022-06-19 02:42:29 |
File | Lines added | Lines deleted |
---|---|---|
IvoRSS.hws | 9 | 0 |
feedtree.hws | 53 | 0 |
File IvoRSS.hws changed (mode: 100755) (index 01430ee..0ea6e9a) | |||
... | ... | Function p_MUIEvent(msg) | |
106 | 106 | FallThrough | FallThrough |
107 | 107 | Case "fdtm_save": | Case "fdtm_save": |
108 | 108 | p_SaveFeeds() | p_SaveFeeds() |
109 | |||
110 | Case "menu_addgroup": | ||
111 | FallThrough | ||
112 | Case "fdtm_addgroup": | ||
113 | p_CreateGroup() | ||
109 | 114 | ||
110 | 115 | Case "menu_hide": | Case "menu_hide": |
111 | 116 | FallThrough | FallThrough |
... | ... | Function p_MUIEvent(msg) | |
124 | 129 | ||
125 | 130 | Case "fdtm_fetch": | Case "fdtm_fetch": |
126 | 131 | p_FetchCurrent() | p_FetchCurrent() |
132 | |||
133 | Case "fdtm_remove": | ||
134 | p_RemoveCurrent() | ||
127 | 135 | ||
128 | 136 | ||
129 | 137 | ||
... | ... | InstallEventHandler({MUIRoyale = p_MUIEvent}) | |
301 | 309 | p_StartUpLoading() | p_StartUpLoading() |
302 | 310 | ||
303 | 311 | ||
312 | |||
304 | 313 | Repeat | Repeat |
305 | 314 | WaitEvent | WaitEvent |
306 | 315 | Forever | Forever |
File feedtree.hws changed (mode: 100755) (index 08e4a77..73109d1) | |||
... | ... | Function p_FetchFeed(feedid$) | |
107 | 107 | EndFunction | EndFunction |
108 | 108 | ||
109 | 109 | ||
110 | Function p_RemoveCurrent() | ||
111 | Local isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", "Active", "Active", "") | ||
112 | If isFound And mui.Request("Delete ".. IIf(t.Node, "group", "RSS feed"), | ||
113 | "Do you realy want to delete ".. t.Name .. | ||
114 | IIf(t.Node, "group and all its content?", "?"), | ||
115 | "Yes|*Cancel", "Warning") | ||
116 | mui.DoMethod(#LIST_TREE, "Remove", "Active", t.id) | ||
117 | ;č vyhodit i přidružená data. | ||
118 | ;č Hollywood se pak doopravdy se tváří, že tu položku nikdy neznal, | ||
119 | ;č HaveItem je vrací lež no a přístup pak způsobí chybu | ||
120 | feedsdata[t.id] = nil | ||
121 | ;č Na soubory ve složce Feeds sereme? | ||
122 | EndIf | ||
123 | EndFunction | ||
124 | |||
125 | |||
126 | Function p_CreateGroup() | ||
127 | Local s$, ok = StringRequest("Create Group", "Enter new group name") | ||
128 | If s$ = "" Then Return() | ||
129 | Local found, t = mui.DoMethod(#LIST_TREE, "FindName", "Root", "\27b"..s$, "") | ||
130 | If p_HasItem(s$, "Root") | ||
131 | mui.Set("status", "Contents", "\27bGroup "..s$ .. " already exists") | ||
132 | Else | ||
133 | mui.DoMethod(#LIST_TREE, "Insert", "\27b"..s$, s$, "Root", | ||
134 | IIf(mui.Get(#LIST_TREE, "Active")="Off", "Tail","Active"), | ||
135 | "List; Active") | ||
136 | ;p_Replay(err_code, "Group ".."\27b"..s$ .. " has been created") | ||
137 | EndIf | ||
138 | EndFunction | ||
139 | |||
140 | |||
141 | |||
142 | |||
143 | ;č Kurňadrát, RapaGUI takové starosti nemá... | ||
144 | ;č jen pro zábavu | ||
145 | Function p_CanHas(nodeid$) | ||
146 | Return(Not p_HasItem(nodeid$, "Root")) | ||
147 | EndFunction | ||
148 | |||
149 | ;č tohle musí být rekurzivní | ||
150 | Function p_HasItem(nodeid$, muiid) | ||
151 | Local isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", muiid, "Head", "") | ||
152 | While isFound | ||
153 | ;InsertItem(tabletree, {id=t.id, name=t.name, isNode=t.node, parent=nodeid}) | ||
154 | If t.id = nodeid$ Then Return(True) | ||
155 | If t.Node And p_HasItem(nodeid$, t.muiid) Then Return(True) | ||
156 | isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", t.muiid, "Next", "") | ||
157 | Wend | ||
158 | Return(False) | ||
159 | EndFunction | ||
160 | |||
161 | |||
162 | |||
110 | 163 | ;bool = IsOnline() | ;bool = IsOnline() |
111 | 164 | ;r$ = StripStr(s$) | ;r$ = StripStr(s$) |
112 | 165 |