六合必中3马
2015-12-31 12:38:54 -0500
【自适屏代码】
swh("w",w)
swh("h",h)
s pmw=320
//你自己手机的宽
s pmh=564
//你自己手机的高
s idsj="1;2;3;4"
//所有控件id，中间用;分隔
s fg =";"
sl(idsj,fg,cs)
for(id;cs)
{
ug(id,"x",kjx)
ug(id,"y",kjy)
ug(id,"w",kjw)
ug(id,"h",kjh)
s(w*(kjx/pmw),szx)
s(h*(kjy/pmh),szy)
s(w*(kjw/pmw),szw)
s(h*(kjh/pmh),szh)
us(id,"x",szx)
us(id,"y",szy)
us(id,"w",szw)
us(id,"h",szh)
}
《by 嘻嘻哈哈走过去》
【文字逐个倾斜】
us(文本ID, "gravity",17)
t()
{
s txti="4xiong.cn "
s txtn=0
s txtw=0
w(txtw==0)
{
stop(200)
ssg(txti,0,txtn,txt1)
ssg(txti,txtn,11,txt2)
f(txt2==""||txt2==null)
{
s txtn=0
stop(100)
}
s html="(html)"
s red= "<i>"
s font="</I>"
ss(html+red+txt1+font+txt2,txt3)
syso(txt3)
us(文本ID,"text",txt3)
s(txtn+1,txtn)
}
}
《by 大师兄》
【图片旋转】
t()
{
s dyf=1
w(dyf==1)
{
tot(图片控件ID,ahui)
stop(100)
tzz(ahui,90,cdnm)
us(图片控件ID,"bf",cdnm)
}
【调用其他浏览器打开网址】
s url="www.Baidu.com"
s biaoti="正在跳转到百度搜索"
//网址及标题
f(url ? "http://")
{
}
else
{
ss("http:/"+"/"+url,url)
}
sr(url," ","",url)
ss(url,ssn1)
s oq1=" <html><meta http-equiv="Content-Language" content="zh-CN"><meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8"> <meta http-equiv="refresh" content="0.1;url="
s oq2=""><title>"
s oq4="</title></html>"
ss(oq1+ssn1+oq2+biaoti+oq4,oq3)
fw("a.html",oq3)
fo("a.html")
tw("请用浏览器打开\n建议将常用浏览器设为默认")
《by 大师兄》
【控件由暗到亮缓缓出现】
.控件由暗到亮缓缓出现：
s id=这里是需要控制的控件id
s a=0
t()
{
us(id,"show",0)
for(1;50)
{
stop(1)
s(a+3,a)
us(id,"backgroundalpha",a)
}
}
_____________________
.控件由亮到弱慢慢消失
s id1=这里是需要控制的控件id
s a=0
t()
{
for(1;50)
{
stop(1)
s(a-3,a)
us(id1,"backgroundalpha",a)
}
}
us(id1,"show",8)
《by 大师兄》
【点击两次退出】
.按两次返回键退出那个原来需要在载入事件中将变量赋值,不好管理代码,所以改了以下,只需要把代码写入重写返回键就可以了,也可以写在按钮中做双击事件
f(a==1)
{
end()
}
else
{
s a=1
tw("再按一次退出")
t()
{
stop(2000)
s a=0
}
}
《by 星辰》
【判断文本是否包含中文】
ug(id,"text",a)
stobm(a,"utf-8",b)
f(a==b)
{
tw("输入中文不包含")
}
else
{
tw("输入含有中文及中文标点")
}
//判断id控件文本是否包含中文（简）
《by 安河桥下 QQ1430437380》
【手机号归属地查询】
s id=这里填写手机号输入框id
s id1=这里是显示文本id
ug(id,"text",sjh)
us(id1,"text","")
f(sjh!="")
{
s gsd="http://www.096.me/api.php?mode=txt&phone="
t()
{
ss(gsd+sjh,uuu)
syso(uuu)
hs(uuu,null,null,gsd2)
syso(gsd2)
f(gsd2?"不是合法的手机号码")
{
tw("查询失败，请检查手机号是否正确！")
}
else
{
f(gsd2!="null")
{
sj(gsd2,"||","||",gsd3)
sr(gsd3," ","",gsd3)
syso(gsd3)
us(id1,"text",gsd3)
}
else
{
tw("网络不给力啊！")
}
}
}
}
else
{
tw("请填写手机号！")
}
《by 信疯哥得永生》
【向QQ发起临时会话】
t()
{
s id=这里填写你的输入框id
ug(id,"text",qq)
s ss="&"
s v="http://wpa.qq.com/msgrd?v=3"
ss(v+ss+"site=qq"+ss+"menu=yes"+ss+"uin="+qq,uu)
s r="base.html"
s rr="<META HTTP-EQUIV="Refresh" CONTENT="0;URL="
ss(rr+uu+"">",rt)
fw(r,rt)
fo(r)
}
《by 丶萌萌小夏夏 qq：1075625244》
【身份证信息查询】
s id=这里是身份证号输入框id
s id1=这里是显示文本id
t()
{
ug(id,"text",hao)
ss("http://wap.ip138.com/id_search.asp?userid="+hao,h)
hs(h,null,null,hh)
sj(hh,"<div class="a">","</div>",hs)
sr(hs,"<br/>","n",hs)
sutf8to(hs,hs)
us(id1,"text",hs)
}
《by 丶萌萌小夏夏 qq：1075625244》
【汉字转拼音】
t()
{
s url="http://zhongwenzhuanpinyin.51240.com/"
s fuck="&"
s wz="这里输入需要转拼音的文字！我了个插"
ss("zhongwen="+wz+fuck+"select_sd=有声调"+fuck+"select_dz=无文字"+fuck+"select_dy=隐藏"+fuck+"submit=查拼音",cha)
hs(url,cha,"utf-8",py)
sj(py,"readonly">","</textarea>",py)
tw(py)
}
《by 丶萌萌小夏夏 qq：1075625244》
【判断文件是否存在】
.abc是文件名
fe("abc.txt",bbb)
s a="true"
f(bbb == a)
{
tw("存在")
}
else
{
tw("不存在")
《by 大师兄》
【文字从右向左移动】
s id=这里是文本控件id
s txt="我是文本框我在演示文字移动"
t()
{
s tingdun=40
s wenbenhhh=18
s wenbenwww=250
us(id,"w",wenbenwww)
us(id,"txtsize",16)
us(id,"text",txt)
swh("w",www)
ss(www,wenbenxxx)
ss("-"+wenbenwww,jiedian)
s a=1
w(a==1)
{
f(wenbenxxx<0)
{
sr(wenbenxxx,"-","",wenbenxxx)
s(wenbenxxx+3,wenbenxxx)
ss("-"+wenbenxxx,wenbenxxx)
}
else
{
s(wenbenxxx-3,wenbenxxx)
}
us(id,"x",wenbenxxx)
f(wenbenxxx<jiedian)
{
ss(www,wenbenxxx)
}
stop(tingdun)
}
}
《by 星辰》
【控件由暗到亮缓缓出现】
s id=这里是需要控制的控件id
s a=0
t()
{
us(id,"show",0)
for(1;50)
{
stop(1)
s(a+3,a)
us(id,"backgroundalpha",a)
}
}
_____________________
.控件由亮到弱慢慢消失
s id1=这里是需要控制的控件id
s a=0
t()
{
for(1;50)
{
stop(1)
s(a-3,a)
us(id1,"backgroundalpha",a)
}
}
us(id1,"show",8)
《by 大师兄》
【十进制转换十六进制】
s id=十进制输入框id
s id1=输出框或文本id
ug(id,"text",t)
supper(t,t)
s csl=1
s jie=0
slg(t,lt)
s(lt-1,ltt)
s xun=lt
for(1;xun)
{
ssg(t,ltt,lt,ti)
f(ti=="A")
{
s ti=10
}
f(ti=="B")
{
s ti=11
}
f(ti=="C")
{
s ti=12
}
f(ti=="D")
{
s ti=13
}
f(ti=="E")
{
s ti=14
}
f(ti=="F")
{
s ti=15
}
f(ti<=15)
{
s(ti*csl,ti)
s(jie+ti,jie)
s(csl*16,csl)
s(lt-1,lt)
s(lt-1,ltt)
}
}
us(id1,"text",jie)
《by 信疯哥得永生》
【清空文件夹】
s wj="这里是要清空的文件夹路径"
fl(wj,ewa)
for(ewc;ewa)
{
ss(wj+"/"+ewc,ewd)
fd(ewd,ewq)
}
f(ewq?"true")
{
tw("清除成功")
}
else
{
tw("清除失败")
}
《by 星辰》
【获取QQ昵称】
t()
{
s id=QQ号输入框id
ug(id,"text",a)
ss("http://m.qzone.com/profile?hostuin="+a+"&no_topbar=1&srctype=10&stat=&g_f=2000000209#mine?res_uin="+a+"&ticket=",b)
hs(b,null,null,c)
ss("<a class="fn" data-hook="global-link" data-params=""+a+"">",d)
s e= "</a> "
sj(c, d, e, f)
tw(f)
}
《by 陌念思情 qq：1430437380》
【判断手机是否安装应用】
uapplist(true, b)
s c=0
t()
{
for(a;b)
{
f(a?"com.iapp")
.这里的com.iapp为iapp的包名
{
s(c+1,c)
}
}
f(c==0)
{
tw("不存在")
}
else
{
tw("存在")
}
}
注：除了用包名判断外还可以用类名、应用名、版本号来判断是否存在，要查看包名类名可以用半夏的“包名类名”查看器，在交流群群文件下载或百度搜索，群号：239547050
《by 貓ㄨià 豞》
【控件从下往上升】
t()
{
swh("h",h)
s aa=5
s nn=6
w(nn>aa)
{
s(h-1,h)
us(1,"y",h)
//1是控件id
f(h==0)
{
swh("h",h)
}
stop(10)
//数字越大就越慢
}
}
《by 钅™《［企©ぺ®鹅］》™》
【限制输入框仅输入数字和长度】
t()
{
s pd=1234567890
s id=这里是输入框控件ID
s long=10
.这里是最大长度
w(1==1)
{
ug(id,"text",content)
stop(10)
slg(content,long1)
f(long1<=long)
{
s ks=0
s js=1
for(1;long1)
{
ssg(content,ks,js,n)
s(ks+1,ks)
s(js+1,js)
f(pd?n)
{
}
else
{
sr(content,n,"",content1)
us(id,"text",content1)
tw("只能输入数字！")
}
}
}
else
{
ssg(content,0,long,content2)
us(id,"text",content2)
tw("已达到最大长度！")
}
}
}
《by 小乐》
【获取WiFi列表】
s id=这里是列表id
uwifilist(gb)
us(id,"h",50)
s a=0
for(ddd;gb)
{
s(a+1,a)
ula("t",ddd;ddd,fff)
}
s(a*50,a)
us(id,"h",a)
uls(id,"t",fff,ggo)
//上面这段代码写在载入事件里，当然界面得保证有一个列表控件，id改为列表id
sgsz(ggo,0,yt)
//上面这个代码加在列表控件的事件里边，测试就可以了
匿名
【启动图画面】
s id=这里填写图片控件id
s go="这里是启动后进入的第一个界面文件名"
uycl("true")
.这个是隐藏状态栏
swh("w", w)
.获取屏幕宽度
swh("h", h)
.获获取屏幕高度
us(id,"w",w)
.设置添加的图片控件的宽度为屏幕的宽度
us(id,"h",h)
.设置添加的图片控件的高度为屏幕的高度
us(id,"x",0)
.设置控件x坐标
us(id,"y",0)
.设置控件y坐标
us(id, "scaletype", "FIT_XY")
.这个是设置图片控件为拉伸
t()
{
stop(3000)
uigo(go)
end()
}
.设置3秒后跳转
注：一般启动画面在mian.iyu初始文件设置，跳转后的界面任意定义。
《by 貓ㄨià 豞》
【倒计时】
s id=这里填写文本id
t()
{
ss("正在倒计时60秒",b)
us(id,"text",b)
s a=60
for(1;60)
{
f(a==1)
{
.这里还可以加其代码
us(id,"text","倒计时完成")
endcode
}
s(a-1,a)
ss("正在倒计时"+a+"秒",c)
us(id,"text",c)
stop(1000)
}
}
《by 貓ㄨià 豞》
【获取编辑框长度】
s id=1
ug(id,"text",a)
slg(a,b)
tw(b)
//提示长度
【本地帐号密码登录】
s zh=帐号输入框
s mm=密码输入框
fr("帐号数据.txt",a)
fr("密码数据.txt",b)
f(zh==a&mm==b)
{
tw("登录成功")
}
else
{
tw("帐号或者密码错误")
}
【获取手机信息】
s lb=列表id
s b=0
sjxx(a)
sgszl(a,al)
for(1;al)
{
sgsz(a,b,c)
ula("t",c;c,m)
uls(lb,"t",m,n)
s(b+1,b)
}
【获取网页源码】
s a="网址"
s b=编辑框id
t()
{
hs(a,null,null,ym)
stop(1500)
us(b,"text",ym)
}
//网页源码获取
【获取全部app点击列表启动/卸载】
//放入启动事件
s id=3
t()
{
uapplist("true",a)
sgszl(a,n)
s b=0
for(1;n)
{
sgsz(a,b,nr)
ula("t",nr;nr,xs)
uls(id,"t",xs,sz)
s(b+1,b)
}
}
//显示手机全部app
//以下代码放入列表
sgsz(sz,0,sz)
sj(sz,null,"\n",app)
//启动代码
uapp(app,"","")
//卸载代码
uninapp(app)
【高智能搜索框】
ug(搜索框ID,pnr)
s pyq=搜索引擎url
s pwin=浏览器ID
t()
{
f(pnr=="")
.防止空白输入
{
f(pnr?* "http://" || pnr?*"https://")
{
us(pwin,"url",pnr)
}
f(pnr?*"www." || pnr?*"wap." || pnr?".net" || pnr?".com" || pnr?*"m."|| pnr?".cn "|| pnr?*"192.168.")
{
ss("http://"+pnr,pncr)
.得到完整的地址
us(pwin,"url",pncr)
.访问
}
else
{
stobm(pnr,"utf-8",pnr)
.转换为字符串
ss(pyq+pnr,pncr)
.得到完整的地址
us(pwin,"url",pncr)
.访问
}
}
}
《by 三点六》
【浏览器的返回】
iapp自带有浏览控件，可用来浏览网页，有时我们需要从当前网页返回上一级，下例教你如何做返回。
首先我们需要用一个文件做为浏览记录，保存浏览过的地址，返回时读出该记录并赋值给浏览控件。
1.建立一个地址输入框，一个点击进入按钮，一个浏览控件，把布局定位好，我们假设各控件id如下：
输入框id：1
按钮id：2
浏览器id：3
2.在载入事件中放以下代码
__________________
s ti=""
s bw=""
s qiu=1
s wj="abc.txt"
.其中abc.txt是浏览记录文件
t()
{
s t="c"
w(t!="a")
{
f(t=="b")
{
ug(3,"title",nt)
ug(3,"url",nw)
.循环获取当前浏览器标题与地址
f(nt!=ti)
{
s ti=nt
us(1,"text",nw)
.将地址赋值给输入框
fe(wj,xia)
f(xia=="true")
{
fr(wj,gou)
f(gou=="")
{
s gou=""
}
ss(gou+"n"+nw,lai)
fw(wj,lai)
.保存当前地址为记录
}
else
{
fw(wj,nw)
}
}
f(bw!=nw)
{
ss(nw,bw)
}
}
}
}
_________________
3.以下代码放到控钮中
ug(1,"text",uu)
f(uu?*"http://" )
{
}
else
{
ss("http://"+uu ,uu)
}
us(3,"url",uu)
s t="b"
s qiu=1
.获取输入框地址，判断是否包括地址头，否将自动补上，赋值给浏览控件并激活载入事件中的循环。
________________
4.以下代码放到返回事件中，事件》重写返回事件
fe(wj,mm)
.判断是否存在历史文件
f(mm=="true")
{
fr(wj,mao)
f(mao=="")
{
tw("没有记录哦")
}
else
{
sl(mao,"n",kk)
sgszl(kk,hh)
.以数组分隔并访问数组行数
f(hh==1)
{
sgsz(kk,0,mao)
us(3,"url",mao)
.如果只有一条记录真接访问
}
else
{
s(qiu+1,gg)
sgsz(kk,gg,mao)
us(3,"url",mao)
.如果有一条以上记录每点击一次就加一次访问行数，以达到后退效果
}
}
}
else
{
s t="a"
end()
.文件不存在退出界面并停止循环
}
.读出历史并赋值给浏览控件，如果不存在会退出本界面
__________________
swh("w",w)
swh("h",h)
s pmw=320
//你自己手机的宽
s pmh=564
//你自己手机的高
s idsj="1;2;3;4"
//所有控件id，中间用;分隔
s fg =";"
sl(idsj,fg,cs)
for(id;cs)
{
ug(id,"x",kjx)
ug(id,"y",kjy)
ug(id,"w",kjw)
ug(id,"h",kjh)
s(w*(kjx/pmw),szx)
s(h*(kjy/pmh),szy)
s(w*(kjw/pmw),szw)
s(h*(kjh/pmh),szh)
us(id,"x",szx)
us(id,"y",szy)
us(id,"w",szw)
us(id,"h",szh)
}
《by 嘻嘻哈哈走过去》
【文字逐个倾斜】
us(文本ID, "gravity",17)
t()
{
s txti="4xiong.cn "
s txtn=0
s txtw=0
w(txtw==0)
{
stop(200)
ssg(txti,0,txtn,txt1)
ssg(txti,txtn,11,txt2)
f(txt2==""||txt2==null)
{
s txtn=0
stop(100)
}
s html="(html)"
s red= "<i>"
s font="</I>"
ss(html+red+txt1+font+txt2,txt3)
syso(txt3)
us(文本ID,"text",txt3)
s(txtn+1,txtn)
}
}
《by 大师兄》
【图片旋转】
t()
{
s dyf=1
w(dyf==1)
{
tot(图片控件ID,ahui)
stop(100)
tzz(ahui,90,cdnm)
us(图片控件ID,"bf",cdnm)
}
【调用其他浏览器打开网址】
s url="www.Baidu.com"
s biaoti="正在跳转到百度搜索"
//网址及标题
f(url ? "http://")
{
}
else
{
ss("http:/"+"/"+url,url)
}
sr(url," ","",url)
ss(url,ssn1)
s oq1=" <html><meta http-equiv="Content-Language" content="zh-CN"><meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8"> <meta http-equiv="refresh" content="0.1;url="
s oq2=""><title>"
s oq4="</title></html>"
ss(oq1+ssn1+oq2+biaoti+oq4,oq3)
fw("a.html",oq3)
fo("a.html")
tw("请用浏览器打开\n建议将常用浏览器设为默认")
《by 大师兄》
【控件由暗到亮缓缓出现】
.控件由暗到亮缓缓出现：
s id=这里是需要控制的控件id
s a=0
t()
{
us(id,"show",0)
for(1;50)
{
stop(1)
s(a+3,a)
us(id,"backgroundalpha",a)
}
}
_____________________
.控件由亮到弱慢慢消失
s id1=这里是需要控制的控件id
s a=0
t()
{
for(1;50)
{
stop(1)
s(a-3,a)
us(id1,"backgroundalpha",a)
}
}
us(id1,"show",8)
《by 大师兄》
【点击两次退出】
.按两次返回键退出那个原来需要在载入事件中将变量赋值,不好管理代码,所以改了以下,只需要把代码写入重写返回键就可以了,也可以写在按钮中做双击事件
f(a==1)
{
end()
}
else
{
s a=1
tw("再按一次退出")
t()
{
stop(2000)
s a=0
}
}
《by 星辰》
【判断文本是否包含中文】
ug(id,"text",a)
stobm(a,"utf-8",b)
f(a==b)
{
tw("输入中文不包含")
}
else
{
tw("输入含有中文及中文标点")
}
//判断id控件文本是否包含中文（简）
《by 安河桥下 QQ1430437380》
【手机号归属地查询】
s id=这里填写手机号输入框id
s id1=这里是显示文本id
ug(id,"text",sjh)
us(id1,"text","")
f(sjh!="")
{
s gsd="http://www.096.me/api.php?mode=txt&phone="
t()
{
ss(gsd+sjh,uuu)
syso(uuu)
hs(uuu,null,null,gsd2)
syso(gsd2)
f(gsd2?"不是合法的手机号码")
{
tw("查询失败，请检查手机号是否正确！")
}
else
{
f(gsd2!="null")
{
sj(gsd2,"||","||",gsd3)
sr(gsd3," ","",gsd3)
syso(gsd3)
us(id1,"text",gsd3)
}
else
{
tw("网络不给力啊！")
}
}
}
}
else
{
tw("请填写手机号！")
}
《by 信疯哥得永生》
【向QQ发起临时会话】
t()
{
s id=这里填写你的输入框id
ug(id,"text",qq)
s ss="&"
s v="http://wpa.qq.com/msgrd?v=3"
ss(v+ss+"site=qq"+ss+"menu=yes"+ss+"uin="+qq,uu)
s r="base.html"
s rr="<META HTTP-EQUIV="Refresh" CONTENT="0;URL="
ss(rr+uu+"">",rt)
fw(r,rt)
fo(r)
}
《by 丶萌萌小夏夏 qq：1075625244》
【身份证信息查询】
s id=这里是身份证号输入框id
s id1=这里是显示文本id
t()
{
ug(id,"text",hao)
ss("http://wap.ip138.com/id_search.asp?userid="+hao,h)
hs(h,null,null,hh)
sj(hh,"<div class="a">","</div>",hs)
sr(hs,"<br/>","n",hs)
sutf8to(hs,hs)
us(id1,"text",hs)
}
《by 丶萌萌小夏夏 qq：1075625244》
【汉字转拼音】
t()
{
s url="http://zhongwenzhuanpinyin.51240.com/"
s fuck="&"
s wz="这里输入需要转拼音的文字！我了个插"
ss("zhongwen="+wz+fuck+"select_sd=有声调"+fuck+"select_dz=无文字"+fuck+"select_dy=隐藏"+fuck+"submit=查拼音",cha)
hs(url,cha,"utf-8",py)
sj(py,"readonly">","</textarea>",py)
tw(py)
}
《by 丶萌萌小夏夏 qq：1075625244》
【判断文件是否存在】
.abc是文件名
fe("abc.txt",bbb)
s a="true"
f(bbb == a)
{
tw("存在")
}
else
{
tw("不存在")
《by 大师兄》
【文字从右向左移动】
s id=这里是文本控件id
s txt="我是文本框我在演示文字移动"
t()
{
s tingdun=40
s wenbenhhh=18
s wenbenwww=250
us(id,"w",wenbenwww)
us(id,"txtsize",16)
us(id,"text",txt)
swh("w",www)
ss(www,wenbenxxx)
ss("-"+wenbenwww,jiedian)
s a=1
w(a==1)
{
f(wenbenxxx<0)
{
sr(wenbenxxx,"-","",wenbenxxx)
s(wenbenxxx+3,wenbenxxx)
ss("-"+wenbenxxx,wenbenxxx)
}
else
{
s(wenbenxxx-3,wenbenxxx)
}
us(id,"x",wenbenxxx)
f(wenbenxxx<jiedian)
{
ss(www,wenbenxxx)
}
stop(tingdun)
}
}
《by 星辰》
【控件由暗到亮缓缓出现】
s id=这里是需要控制的控件id
s a=0
t()
{
us(id,"show",0)
for(1;50)
{
stop(1)
s(a+3,a)
us(id,"backgroundalpha",a)
}
}
_____________________
.控件由亮到弱慢慢消失
s id1=这里是需要控制的控件id
s a=0
t()
{
for(1;50)
{
stop(1)
s(a-3,a)
us(id1,"backgroundalpha",a)
}
}
us(id1,"show",8)
《by 大师兄》
【十进制转换十六进制】
s id=十进制输入框id
s id1=输出框或文本id
ug(id,"text",t)
supper(t,t)
s csl=1
s jie=0
slg(t,lt)
s(lt-1,ltt)
s xun=lt
for(1;xun)
{
ssg(t,ltt,lt,ti)
f(ti=="A")
{
s ti=10
}
f(ti=="B")
{
s ti=11
}
f(ti=="C")
{
s ti=12
}
f(ti=="D")
{
s ti=13
}
f(ti=="E")
{
s ti=14
}
f(ti=="F")
{
s ti=15
}
f(ti<=15)
{
s(ti*csl,ti)
s(jie+ti,jie)
s(csl*16,csl)
s(lt-1,lt)
s(lt-1,ltt)
}
}
us(id1,"text",jie)
《by 信疯哥得永生》
【清空文件夹】
s wj="这里是要清空的文件夹路径"
fl(wj,ewa)
for(ewc;ewa)
{
ss(wj+"/"+ewc,ewd)
fd(ewd,ewq)
}
f(ewq?"true")
{
tw("清除成功")
}
else
{
tw("清除失败")
}
《by 星辰》
【获取QQ昵称】
t()
{
s id=QQ号输入框id
ug(id,"text",a)
ss("http://m.qzone.com/profile?hostuin="+a+"&no_topbar=1&srctype=10&stat=&g_f=2000000209#mine?res_uin="+a+"&ticket=",b)
hs(b,null,null,c)
ss("<a class="fn" data-hook="global-link" data-params=""+a+"">",d)
s e= "</a> "
sj(c, d, e, f)
tw(f)
}
《by 陌念思情 qq：1430437380》
【判断手机是否安装应用】
uapplist(true, b)
s c=0
t()
{
for(a;b)
{
f(a?"com.iapp")
.这里的com.iapp为iapp的包名
{
s(c+1,c)
}
}
f(c==0)
{
tw("不存在")
}
else
{
tw("存在")
}
}
注：除了用包名判断外还可以用类名、应用名、版本号来判断是否存在，要查看包名类名可以用半夏的“包名类名”查看器，在交流群群文件下载或百度搜索，群号：239547050
《by 貓ㄨià 豞》
【控件从下往上升】
t()
{
swh("h",h)
s aa=5
s nn=6
w(nn>aa)
{
s(h-1,h)
us(1,"y",h)
//1是控件id
f(h==0)
{
swh("h",h)
}
stop(10)
//数字越大就越慢
}
}
《by 钅™《［企©ぺ®鹅］》™》
【限制输入框仅输入数字和长度】
t()
{
s pd=1234567890
s id=这里是输入框控件ID
s long=10
.这里是最大长度
w(1==1)
{
ug(id,"text",content)
stop(10)
slg(content,long1)
f(long1<=long)
{
s ks=0
s js=1
for(1;long1)
{
ssg(content,ks,js,n)
s(ks+1,ks)
s(js+1,js)
f(pd?n)
{
}
else
{
sr(content,n,"",content1)
us(id,"text",content1)
tw("只能输入数字！")
}
}
}
else
{
ssg(content,0,long,content2)
us(id,"text",content2)
tw("已达到最大长度！")
}
}
}
《by 小乐》
【获取WiFi列表】
s id=这里是列表id
uwifilist(gb)
us(id,"h",50)
s a=0
for(ddd;gb)
{
s(a+1,a)
ula("t",ddd;ddd,fff)
}
s(a*50,a)
us(id,"h",a)
uls(id,"t",fff,ggo)
//上面这段代码写在载入事件里，当然界面得保证有一个列表控件，id改为列表id
sgsz(ggo,0,yt)
//上面这个代码加在列表控件的事件里边，测试就可以了
匿名
【启动图画面】
s id=这里填写图片控件id
s go="这里是启动后进入的第一个界面文件名"
uycl("true")
.这个是隐藏状态栏
swh("w", w)
.获取屏幕宽度
swh("h", h)
.获获取屏幕高度
us(id,"w",w)
.设置添加的图片控件的宽度为屏幕的宽度
us(id,"h",h)
.设置添加的图片控件的高度为屏幕的高度
us(id,"x",0)
.设置控件x坐标
us(id,"y",0)
.设置控件y坐标
us(id, "scaletype", "FIT_XY")
.这个是设置图片控件为拉伸
t()
{
stop(3000)
uigo(go)
end()
}
.设置3秒后跳转
注：一般启动画面在mian.iyu初始文件设置，跳转后的界面任意定义。
《by 貓ㄨià 豞》
【倒计时】
s id=这里填写文本id
t()
{
ss("正在倒计时60秒",b)
us(id,"text",b)
s a=60
for(1;60)
{
f(a==1)
{
.这里还可以加其代码
us(id,"text","倒计时完成")
endcode
}
s(a-1,a)
ss("正在倒计时"+a+"秒",c)
us(id,"text",c)
stop(1000)
}
}
《by 貓ㄨià 豞》
【获取编辑框长度】
s id=1
ug(id,"text",a)
slg(a,b)
tw(b)
//提示长度
【本地帐号密码登录】
s zh=帐号输入框
s mm=密码输入框
fr("帐号数据.txt",a)
fr("密码数据.txt",b)
f(zh==a&mm==b)
{
tw("登录成功")
}
else
{
tw("帐号或者密码错误")
}
【获取手机信息】
s lb=列表id
s b=0
sjxx(a)
sgszl(a,al)
for(1;al)
{
sgsz(a,b,c)
ula("t",c;c,m)
uls(lb,"t",m,n)
s(b+1,b)
}
【获取网页源码】
s a="网址"
s b=编辑框id
t()
{
hs(a,null,null,ym)
stop(1500)
us(b,"text",ym)
}
//网页源码获取
【获取全部app点击列表启动/卸载】
//放入启动事件
s id=3
t()
{
uapplist("true",a)
sgszl(a,n)
s b=0
for(1;n)
{
sgsz(a,b,nr)
ula("t",nr;nr,xs)
uls(id,"t",xs,sz)
s(b+1,b)
}
}
//显示手机全部app
//以下代码放入列表
sgsz(sz,0,sz)
sj(sz,null,"\n",app)
//启动代码
uapp(app,"","")
//卸载代码
uninapp(app)
【高智能搜索框】
ug(搜索框ID,pnr)
s pyq=搜索引擎url
s pwin=浏览器ID
t()
{
f(pnr=="")
.防止空白输入
{
f(pnr?* "http://" || pnr?*"https://")
{
us(pwin,"url",pnr)
}
f(pnr?*"www." || pnr?*"wap." || pnr?".net" || pnr?".com" || pnr?*"m."|| pnr?".cn "|| pnr?*"192.168.")
{
ss("http://"+pnr,pncr)
.得到完整的地址
us(pwin,"url",pncr)
.访问
}
else
{
stobm(pnr,"utf-8",pnr)
.转换为字符串
ss(pyq+pnr,pncr)
.得到完整的地址
us(pwin,"url",pncr)
.访问
}
}
}
《by 三点六》
【浏览器的返回】
iapp自带有浏览控件，可用来浏览网页，有时我们需要从当前网页返回上一级，下例教你如何做返回。
首先我们需要用一个文件做为浏览记录，保存浏览过的地址，返回时读出该记录并赋值给浏览控件。
1.建立一个地址输入框，一个点击进入按钮，一个浏览控件，把布局定位好，我们假设各控件id如下：
输入框id：1
按钮id：2
浏览器id：3
2.在载入事件中放以下代码
__________________
s ti=""
s bw=""
s qiu=1
s wj="abc.txt"
.其中abc.txt是浏览记录文件
t()
{
s t="c"
w(t!="a")
{
f(t=="b")
{
ug(3,"title",nt)
ug(3,"url",nw)
.循环获取当前浏览器标题与地址
f(nt!=ti)
{
s ti=nt
us(1,"text",nw)
.将地址赋值给输入框
fe(wj,xia)
f(xia=="true")
{
fr(wj,gou)
f(gou=="")
{
s gou=""
}
ss(gou+"n"+nw,lai)
fw(wj,lai)
.保存当前地址为记录
}
else
{
fw(wj,nw)
}
}
f(bw!=nw)
{
ss(nw,bw)
}
}
}
}
_________________
3.以下代码放到控钮中
ug(1,"text",uu)
f(uu?*"http://" )
{
}
else
{
ss("http://"+uu ,uu)
}
us(3,"url",uu)
s t="b"
s qiu=1
.获取输入框地址，判断是否包括地址头，否将自动补上，赋值给浏览控件并激活载入事件中的循环。
________________
4.以下代码放到返回事件中，事件》重写返回事件
fe(wj,mm)
.判断是否存在历史文件
f(mm=="true")
{
fr(wj,mao)
f(mao=="")
{
tw("没有记录哦")
}
else
{
sl(mao,"n",kk)
sgszl(kk,hh)
.以数组分隔并访问数组行数
f(hh==1)
{
sgsz(kk,0,mao)
us(3,"url",mao)
.如果只有一条记录真接访问
}
else
{
s(qiu+1,gg)
sgsz(kk,gg,mao)
us(3,"url",mao)
.如果有一条以上记录每点击一次就加一次访问行数，以达到后退效果
}
}
}
else
{
s t="a"
end()
.文件不存在退出界面并停止循环
}
.读出历史并赋值给浏览控件，如果不存在会退出本界面
__________________
Back to home
Subscribe | Register | Login | N