//D setting ver.1.000 [001]imagegarden_net_photos [002]http://www.imagegarden.net/photo/ [004].* [006]true [007]remove [015]nop [016]auto [019]nop [024]true [025]Accept-Language=zh-tw\n [031]true [032]imagegarden_net_photos_program2 [033]function imagegarden_net_photos_program2(){\n\tprintln('play_list処理');\n\tvar fpath2 = '';\n\t//play list を保存するフォルダ\n\tvar ini = new xorini('');\n\tvar fpath_f = ini.read('youtube_play_list' , 'global' , 0);\n\tif(fpath_f == 1){\n\t\tvar irvPath = new irvinePath();\n\t\tvar fpath = ini.read('youtube_play_list' , 'path' , extractFilePath(irvPath.application) + '\\yotube_play_list');\n\t}\n\telse{\n\t\tvar fpath = theFolderdata.Folder;\n\t}\n\t//フォルダが無かったら作る\n\tvar d = new Directory(fpath);\n\tif(! d.exists()){\n\t\td.make();\n\t}\n\tyoutube_play_list_srts = new Strings;\n\tyoutube_play_list_count = 0;\n\tvar uu = u.url;\n\tvar count = 5;\n\tvar ret_f;\n\tif(u.url.match(/fromnum=(\\d+)/)){\n\t\timagegarden_net_photos_fromnum = RegExp.$1;\n\t}\n\telse{\n\t\timagegarden_net_photos_fromnum = 0;\n\t}\n\tdo{\n\t\tret_f = true;\n\t\tdo{\n\t\t\tvar http = download(uu);\n\t\t\tif(http.responseHeader.code != 200){\n\t\t\t\ttheUrlinfo.url = '';\n\t\t\t\tu.url = '';\n\t\t\t\tu2.url = '';\n\t\t\t\treturn;\n\t\t\t}\n\t\t\tif(!imagegarden_net_photos_link(http)){\n\t\t\t\tif(0 == count--){\n\t\t\t\t\ttheUrlinfo.url = '';\n\t\t\t\t\tu.url = '';\n\t\t\t\t\tu2.url = '';\n\t\t\t\t\treturn;\n\t\t\t\t}\n\t\t\t\tsleep(1000);\n\t\t\t}\n\t\t\telse{\n\t\t\t\tret_f = false;\n\t\t\t}\n\t\t}\n\t\twhile(ret_f);\n\t}\n\twhile (uu = imagegarden_net_photos_next(http));\n\thttp.data.match(/[^\\n]*(\\([-a-z _]+\\))[^\\n]*<\\/title>/i);\n\tvar play_list_name = RegExp.$1;\n\tu.url.match(/albumid=(\\d+)/);\n\tplay_list_name = play_list_name + RegExp.$1;\n\tfpath2 = fpath + '\\' + play_list_name + '_play_list.txt';\n\tprintln('out> ' + fpath2);\n\tyoutube_play_list_srts.saveToFile(fpath2);\n}\nfunction imagegarden_net_photos_link(http){\n\tvar s = http.data;\n\tvar i;\n\tvar sss;\n\tvar s_form;\n\tvar s_cataid;\n\tvar s_albumid;\n\tvar s_imageid = new Number;\n\tvar ss = s.text.match(/<a href=\"#\" onClick=\"return viewimageWnd\\('[^']+','[^']+','[^']+','[^']+','[^']+'\\);\"/g);\n\tif(ss == null){\n\t\treturn false;\n\t}\n\tfor(i in ss){\n\t\tsss = ss[i];\n\t\tsss.match(/<a href=\"#\" onClick=\"return viewimageWnd\\('([^']+)','([^']+)','([^']+)','([^']+)','([^']+)'\\);\"/);\n\t\t//from,cataid,albumid,imageid,imagetype\n\t\ts_form = RegExp.$1;\n\t\ts_cataid = RegExp.$2;\n\t\ts_albumid = RegExp.$3;\n\t\ts_imageid = new Number(RegExp.$4);\n\t\ts_imagetype = RegExp.$5;\n\t\tvar s_image_exp = s_imagetype;\n\t\tif(s_image_exp == 'jpeg'){\n\t\t\ts_image_exp = 'jpg';\n\t\t}\n\t\ts_form = s_form.replace(/ /g , '+');\n\t\tprintln(youtube_play_list_count + ' ' + s_albumid + '-' + s_imageid);\n\t\timagegarden_net_photos_add(format('http://www.imagegarden.net/image.php?from=%s&cataid=%s&albumid=%s&imageid=%s&image=%s' , s_form , s_cataid , s_albumid , s_imageid , s_imagetype) , s_albumid + '-' + format('%.3d' , s_imageid.int) + '.' + s_image_exp);\n\t\tyoutube_play_list_count++;\n\t}\n\treturn true;\n}\nfunction imagegarden_net_photos_next(http){\n\tvar s = http.data;\n\tvar i;\n\tvar uu = '';\n\tvar ss = s.text.match(/<a href=viewalbum.php\\?cataid=\\d+&albumid=\\d+&fromnum=(\\d+)>/g);\n\tif(ss == null){\n\t\tuu = false;\n\t\treturn uu;\n\t}\n\tvar sss = ss[ss.length - 1];\n\tsss.match(/<a href=viewalbum.php\\?cataid=\\d+&albumid=\\d+&fromnum=(\\d+)>/);\n\tuu = RegExp.$1;\n\tif( uu == ''){\n\t\tuu = 1;\n\t}\n\tprintln('page- ' + imagegarden_net_photos_fromnum + ' / ' + uu);\n\tif(uu <= imagegarden_net_photos_fromnum){\n\t\tuu = false;\n\t}\n\telse{\n\t\tuu = u.url + '&fromnum=' + ++imagegarden_net_photos_fromnum;\n\t}\n\treturn uu;\n}\nfunction imagegarden_net_photos_add(url, name){\n\tyoutube_play_list_srts.add(url + \"\\t\\t\" + name);\n}\n [036]true //end 使い方は readme.txt の設定データの更新を読んで下さい。