برنامج للتحويل فيديوهات اليوتيوب الى صيغ موسيقية مع امكانية التحميل

كود:

Input.SetText("Input5", "Loading info ...");
Application.Sleep(10);
local val={item=Input.GetText("Input1")};
id = HTTP.Submit("http://www.youtube-mp3.org/api/pushItem/", val, SUBMITWEB_GET, 5, 80, nil, nil);
Input.SetText("Input5", HTTP.GetHTTPErrorInfo().Message.." get link id ..");
local val ={video_id=id}
Application.Sleep(10);
list = HTTP.Submit("http://www.youtube-mp3.org/api/itemInfo/", val, SUBMITWEB_GET, 5, 80, nil, nil);
Input.SetText("Input3", list);
Application.Sleep(10);
Input.SetText("Input5", HTTP.GetHTTPErrorInfo().Message.."get info ...");
json = String.Mid(list, 8, String.Length(list)-8);
tab_all=JSON.Decode(json);
link="www.youtube-mp3.org/get?video_id="..id.."&h="..tab_all.h;
Input.SetText("Input4", link);
lists_string="Image : "..tab_all.image.."\r\n".."Title : "..tab_all.title.."\r\n".."Length : "..tab_all.length.." minutes".."\r\n";
--tab_all.h.."\r\n"..
Input.SetText("Input3", lists_string);


Input.SetText("Input5", "Loading Image ...");
Application.Sleep(10);

show_pic(tab_all.image,'jpg',"Image1");
Input.SetText("Input5", "Done .");
Application.ExitScript();

كود:
function show_pic(url,extension,obj)
HTTP.Download(url, _TempFolder.."\\tmp."..extension, MODE_BINARY, 20, 80, nil, nil, nil);
Image.Load(obj,_TempFolder.."\\tmp."..extension);
siz = Image.GetFileInfo(_TempFolder.."\\tmp."..extension);
Image.SetSize(obj, siz.Width,siz.Height); --

كود:
File.OpenURL(link, SW_MINIMIZE);