>ю?лллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллл ю ю ю ю ю лл ю л ллю ллллл юлллюл л л люллюллллю ллл ю лю л ю лл л лл л лю л ю лл ю л л ю лю л л л ллю лл л л юллюл л юл ллюлллю ю ю ю ю ю юллллл ю лю лю ллюлллю л лю ю юллл ллю ю ю юллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллаааааааллааллADалалалллDADADADаалааааADADаалаалллADAADDалаллаааDADDADааааааллалDDDDалааллалалалDAADAаалалалаалллADADADаалллалаллADDDDалалллаллалалDADDDDааааааллллллDDDDалаалалааDAADDааллллалалADDDDаалалааллADADAалаалллаллDAADDDаааааалаааллDDDалаалллалааалDAADDAааллаалалаADDADааллллалаааалADDDDAалаалаллааDAADаааааалллллDDAADалалллаалалааDADDDDаалллаллалаллADDDADаалалалллаалаADADAAалалллаалаалDADDDDADDааааааалллллADADDалалллалаDADDDADаалллалллаллADDDADDAаалллалааADDDDDDалааллалллDAADADAааааааллалллDDADADалааллалалааDAADDDааллаллллаллADDADADаалалаллаалаADADDалаллааллаалDADADADааааааалллллADADDDDDалалллаааDADDDAAаалалаллаллADADDDADDаалллалааADDDDDAалааллаллDAADADDDADааааааалалллADADDDDDалалллалалааDADDDADаалалалаллалалADADDDADDDааллаллааллADDDDAалааллааллаллDAADADDDDDааааааааааааааааааааалллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллллл, -- title: Every number using only 7 -- author: potato imaginator -- desc: Enter Any Number using 0-9 , delete using backspace or delete key . Press Up / Down to move Up / Down -- site: youtube.com/c/PotatoImaginator -- license: MIT License ( Public Use ) -- version: 1.0 -- script: lua cos=math.cos sin=math.sin pi=math.pi t=0 m='edit' num=0 opr={'+','-','*','/'} vy=0 -- y offset function init_b() if val[0] then b[#b+1]={x=nil,y=nil,opr=2} v[0]=#b end if val[1] then b[#b+1]={x=nil,y=nil,opr=4} v[1]=#b end if val[2] then b[#b+1]={x=v[1],y=v[1],opr=1} v[2]=#b end if val[3] then b[#b+1]={x=v[1],y=v[2],opr=1} v[3]=#b end if val[4] then b[#b+1]={x=v[2],y=v[2],opr=3} v[4]=#b end if val[5] then b[#b+1]={x=nil,y=v[2],opr=2} v[5]=#b end if val[6] then b[#b+1]={x=nil,y=v[1],opr=2} v[6]=#b end main=a[#a] end function upd_b() for i=#a,2,-1 do z2=v[a[i-1]] m1=main if main<=6 and v[main]~=-1 and a[i]==main then m1=v[main] end if i<#a then m1=#b end b[#b+1]={x=m1,y=nil,opr=3} main=#b m2=main if z2~=0 then b[#b+1]={x=m2,y=z2,opr=1} main=#b end end end function init() a={} b={} val= {[0]=false,false,false,false, false,false,false} v= {[0]=-1,-1,-1,-1,-1,-1,-1} local n=num repeat a[#a+1]=n%7 n=n//7 until n==0 for i=1,#a do val[a[i]]=true end if val[2] then val[1]=true end if val[3] or val[4] or val[5] then val[1]=true val[2]=true end if val[6] then val[1]=true end init_b() upd_b() xv={} for i=1,#b do xv[i]=0 z1,z2=0,0 if b[i].x~=nil then z1=xv[b[i].x] else z1=7 end if b[i].y~=nil then z2=xv[b[i].y] else z2=7 end if b[i].opr==1 then xv[i]=z1+z2 elseif b[i].opr==2 then xv[i]=z1-z2 elseif b[i].opr==3 then xv[i]=z1*z2 elseif b[i].opr==4 then xv[i]=z1/z2 end end end init() function draw() for i=1,#b do if b[i].x~=nil then x='x'..b[i].x else x='7' end if b[i].y~=nil then y='x'..b[i].y else y='7' end o=opr[b[i].opr] print ("x"..i.." = "..x.." "..o.." "..y, 10,20+10*i+vy,12) end end function TIC() cls() print('Enter a Number :',6,6,12) if keyp(27) then num=num*10+0 init() elseif keyp(28) then num=num*10+1 init() elseif keyp(29) then num=num*10+2 init() elseif keyp(30) then num=num*10+3 init() elseif keyp(31) then num=num*10+4 init() elseif keyp(32) then num=num*10+5 init() elseif keyp(33) then num=num*10+6 init() elseif keyp(34) then num=num*10+7 init() elseif keyp(35) then num=num*10+8 init() elseif keyp(36) then num=num*10+9 init() elseif keyp(51) or keyp(52) then num=num//10 init() vy=0 end print(num,6,16,12) rect(0,24,240,136,1) clip(0,24,240,136) draw() for i=1,#xv do print ("x"..i.." = "..math.floor(xv[i]), 120,20+10*i+vy,4) end clip() rectb(0,0,240,136,12) line(0,24,240,24,12) if btnp(0) then vy=math.min(0,vy+10) elseif btnp(1) and 10-vy//10~=#xv then vy=vy-10 end if #xv>=11 and 10-vy//10~=#xv then tri (200,126+2*sin(t), 200+8,126+2*sin(t), 200+4,126+4+2*sin(t),5) trib (200,126+2*sin(t), 200+8,126+2*sin(t), 200+4,126+4+2*sin(t),6) end if vy~=0 then tri (200,38-2*sin(t), 200+8,38-2*sin(t), 200+4,38-4-2*sin(t),5) trib (200,38-2*sin(t), 200+8,38-2*sin(t), 200+4,38-4-2*sin(t),6) end t=t+1/15 end