(转)支付宝免签二维收款码生成

感谢 AAR群 AMF3大佬 ,抄代码小学生(507446) 提供代码

import win.ui;
import inet.http
/*DSG{{*/
var winform = win.form(text="支付宝免签收钱码生成";right=614;bottom=469)
winform.add(
button={cls="button";text="生成收钱码";left=438;top=415;right=567;bottom=456;z=8};
edit={cls="edit";text="0.1";left=67;top=420;right=150;bottom=452;edge=1;z=1};
edit2={cls="edit";text="beizhushouqian";left=266;top=421;right=382;bottom=453;edge=1;multiline=1;z=2};
edit3={cls="edit";text="2088102672512284";left=266;top=364;right=587;bottom=394;edge=1;z=7};
plus={cls="plus";left=65;top=27;right=529;bottom=347;repeat="center";z=3};
static={cls="static";text="金额";left=20;top=424;right=70;bottom=457;transparent=1;z=4};
static2={cls="static";text="转账备注";left=194;top=424;right=253;bottom=458;transparent=1;z=5};
static3={cls="static";text="收款人ID（登录支付宝网页源码有userid）：";left=23;top=367;right=268;bottom=392;transparent=1;z=6}
)
/*}}*/

/*

感谢AMF3大佬提供的E，然后得到许可后我转成AAR分享给大家，
不得不说AMF3大佬手里的私货藏得特别多！

*/
http = inet.http()


getQr = function(){
var url = "alipays%3a%2f%2fplatformapi%2fstartapp%3fappId%3d09999988%26actionType%3dtoAccount%26goBack%3dNO%26amount%3d"
var url2 = "%26userId%3d2088102672512284%26memo%3d"
var url3 = url++winform.edit.text ++ url2 ++ winform.edit2.text
var url4  = "http://qr.liantu.com/api.php?text=" ++ url3

var t = http.get(url4)
if(t){
	winform.plus.setBackground(t)
}	
}

winform.button.oncommand = function(id,event){
	getQr();
}

winform.show() 
win.loopMessage();