exp_l RegExpress(re_0,in0v,pick)サブルーチンの最後で exp[0] が save される。 left
exp_r RegExpress(re_0,in0v,pick)サブルーチンの最後で exp[cnt] が save される。right
^^^^ new method 2019/11/07
Blog page all url list, direct retrieve. Get last url by one search.
くまらマクロ00
=url_="view-source:https://english-tibetan-dictionary.tumblr.com/page/",=upos_="url:https:\/\/english-tibetan-dictionary.tumblr.com\/post\",=st_="{@type:ListItem{}position:"
くまらマクロ01
=pg_="{@type:ItemList{}url:https:\/\/english-tibetan-dictionary.tumblr.com\/",=it_="itemListElement:"
マクロ
@x1-701,wk-,x1+,^l,{del},c+(url_&x1&"",~,sl3000,^^f,+{d 12},sl500,^c1,sl300,exe(sv1=replace(sv1{}""""{}""):sv1=replace(sv1{}upos_{}""):sv1=replace(sv1{}st_{}""): sv1=replace(sv1{}pg_{}""):sv1=replace(sv1{}it_{}""),sl300,wk+,if(x1>800)-14
コレで4444 page 分を一括 get。^^f の事前キーは、「{"」である。
^l は、url 枠。
----
やり方変更。やるべきことは、url list の一覧の pick up に尽きる。その中の冗長文字削除は、後でゆっくりやれば良い。 URL source の html の「{"」と「}]」で挟まれた文字列を pick up すれば良い。
「{"」指定で
^^f,+{d 12}, ^c1,exe(pos_=InStr(sv1,"}]"):sv1=Left(sv1,pos_),wk+
zoom すると、「,」の不正用法が分かる。
マクロ
+3,al(wk,@,wk-,x1-401,x1+,^l,{del},c+(url_&x1&"",~,sl4000,^^f,+{d 12},^c1,sl300,exe(sv1=replace(sv1{}""""{}""):sv1=replace(sv1{}upos_{}""):pos_=InStr(sv1{}"}]"):sv1=Left(sv1{}pos_),wk+,if(x1>500)-12
---
p6 がスキップされたが、,sl3000,を,4000 にしたら、直った。なので、 4000 にした。
1001 から 1500 へ 500 p 指定したら、wk が al(, j0( できなかった。大きすぎてパンクした模様。
al(len(wk) は、下記だった。30万 バイトが限界なのかも。なので、100コずつやはりやる。
---------------------------
Kumara al(文字式
---------------------------
303184
---------------------------
OK キャンセル
---------------------------
100 回の時 6万
---------------------------
Kumara al(文字式
---------------------------
62656
---------------------------
OK キャンセル
---------------------------