0N,܋Zi:Df&+D%Dh8lPuz跖…i""""""""""""""""""""""""""""""""33333333333333333333333333333333DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUffffffffffffffffffffffffffffffffwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww""""""""""""""""""""""""""""""""33333333333333333333333333333333DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUffffffffffffffffffffffffffffffffwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww03330333030033333033303303333903333 0333033 39 3 903333393  330339     000300 wppppppw03303303303303330330330333000309039 90 3 903303303303303330330330333 0993093 90 3 9033333999 0000000000333333 33333903333                                                                                                                                                                                                                    ????3?3?33?33???3??3?TITU9IDTU333IDTU?933IDDTUU?3DDDTUUDDD?9IDDDTUUDDDD"""DDDDTUUUDDDDD"""IDDDDDUUUDDDDDD"""?3DDDDDDUUUIDDDDDT"""?3DDDDDDDUUUDDIDDDDDDTU"""33DDDDDDDDUUUUIDDIDDDDDDDTU"""99/""iDDDDDDDUUUUDDDUDDDDDDDDDU"""??/"""iffffIDDDDDUU"IDDDTIDDDDDDDDDUU??/"""""fffffifffIDDDww"""DDDDTU"""""""""""DDDDDDDDDDUU333/"""""ifffff""""""""iffffffywww"""IDDDDDUU)""""""""""""""""IDDDDDDDDDDTUU!""3:/""""fffffff)"""""iffffffwwww)""IDDDDDUU"""""""""""""""""""IDDDDDDDDDTUU)""""""3/""""fffffff)"""iffffffffffffwwww"DDDDDDTU"""""""""""""""""""""ffDDDDDDDDDTUU""""""3/""""ifffwwfff"""ifffffffffffffvwww"IDDDDDTUU)""""""""""""""""""""""""!"ifffDDDDDDDDTUUU)"""""3/""""iffvwwwgff""ifffffffffffffvwwwiDDDDDUU"""""""""""""""""""""""""""""ffffIDDDDDDDTUUU)"""""3:?333/""""iffwwwwwfffifffwwffffifffffwwwwffIDDDUU"""""""""""""""""""""""""""""ifffffIDDDDDDTUUU"""""333?/""""iffwwwwwwfffffffwwwgfffifffffwwwwffffIDDTy"""""""""""""""""""""""""""fffffffDDDDDTUy)""""?/""""ifvwwwwwwgfffffvwwwwfffifffffwwwwfffffww)"""""/""""""""""""""""""ifffffffffDDDDyww""""DDD?333/""""ifvwwwwwwwgffvwwwwwwfffifffffvwwwwiffffffffvww"""""/""/""""""""""""ffffffffffffwwwww)"""DDD/"""ffvwwwwwwwwwwwwwwwwwgfffffffvwwwwffffffffvwww)""""/""""""""fffffffffffffffvwwwww)"""DDD/"""ffvwwwwwwwwwwwwwwwwwgffffffffwwwwifffffffvwww"""""""""""fffffffffffffffffvwwww"""DDD/"""ffvwwwwwwwwwwwwwwwwwwfifffffffvwwwwifffffffvwwww)""""""""""ifffffffffffffffffvwwwww)""DDD/"""iffwwwwwwwwwwwwwwwwwwwffffffffvwwwwffffffffwwww""/"""""fffffffffffffffffffwwwww""DDD/""fffwwwwwwwwwwwwwwwwwwwwwiffffffwwwwifffffffvwwww""""ifffffffffffffffffffwwwwww)"DDD/"ifffwwwwwwwwwwwwwwwwwwwwwwiffffwwwwwifffffffvwwww"iffffffffffffffffffffvwwwww"fffvwwwwwwwwwwwwwwwwwwwwwwwwfffvwwwwffffffffwwwww/ifffffffffffffffffffffvwwwwwwﻻUUUofffffwwwwwwwwwwwwwwwwwwwwwwwwwwwfffwwwwffffffffwwwwwfffffffffffffffffffffffvwwwwwﻻUUUoffffwwwwwwwwwwwwwwwwwwwwwwwwwwwwwfffwwwfffffffffvwwwwwffffffffffffffffffffffffvwwwwwwﻻUUUoffvwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffwwwwwffffffffffffffffffffffffffwwwwwwﻻUUUovwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwfffffffffffffffvwwwwfffffffffffffffffffffffffffvwwwwwﻻUUUowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwfffffffffffffffvwwwwwfffffffffffffffffffffffffffffwwwwwﻻUUUowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffvwwwwffffffffffffffffffffffffffffffwwwwwﻻUUUowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwiffffffffffffffffwwwwwifffffffffffffffffffffffffffffffvwwwwowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffwwwwiffffffffffffffffffffffffffffffffffvwwwfffowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwiffffffffffffffffffwwwwiffffffffffffffffffffffffffffffffffffvwwfffowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffwwfffowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffwfffowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffvfffwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffoywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffoywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffowwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwofwwwwwwwwwwwwwwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwoffywwwwwwwwwwwwwwwwwwiffifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwoffwwwwwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwofffwwwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwoffffywwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwoffffywwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffﻻwwwofffffffffffwwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffofffffffffffwwwwwwiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈofffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈofffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈofffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈofffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈoffffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff着ꈈoffffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffifffffff着offffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffifffoffffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffݚofffffffffffffffffffffffffffffffffffffffffffffffffffffffffݚofffffffffffifffffffffffffffffffffffffffffffffffffffffݚoffffffffffiffffffffffffffffffffffffffffffffffffffݚoffffffffiffffffffffffffffffffffffffffffffffݚoffffffifffffffffffffffffffffffffffffݚoffffffffffffffffffffffffffffffffݚofffffffffffffffffffffffffwwwwwwwwwwwwwwwwoffffffffffffffffffffywwwwywwwwwwwwwwwiffffffffffywwywwwwwwwwwww着wwwwwwwwwwwwww着ywywwwwwwwwwww着xywwwwwwwwwww着wwwwywwwwwwwwww着ywwwwwwwwwwwwwwywwwwwwwwww着xywwwwwwwwwwwxwwwwwywwwwwwwwwwxwwwwywwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwxwwwwwwwwwywwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwxwwwwwwwwwwwwwwwwwwwwwwwxwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwxwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwߙywwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwߝwwwwwwwwwwwwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݝywwwwwwwwwfff?3wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݝywwwwwwwwwfffwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݝywwwwwwwwwfff?9wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݙywwwwwwwwwfff??3?wwwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݝywwwwwwwwwfff??wwwwwwwwwwwywwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwݝywwwwwwwwwfffwwwwwwwwwwwwwwwwfffffffffffffffffffffffffffffvwwwwwwwwwywwwwwwwwwfff939wwwwwwwwwwwwwfffffffffffffffffffffffffffffffffffffffffvifffffffwwwwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffiffffffffvwww?3wwwwwwwwwwwifffffffffffffffffffffffffffffffffffffffffffffffffffffwwwwwwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffiffffffffffwww?9wwwwwwwwwwiffffffffffffffffffffffffffffffffffffffffffifffffffffffwww??3?wwwwwwwwwwfffffffffffffffffffffffffffffffffffffffffffiiffffffffffffwww??wwwwwwwwwwfffffffffffffffffffffffffffffffffffffffffffiffffffffffffffffwwwwwwwwwfffifffffffffffffffffffffffffffffffffffffffffffififffffffffffwww939wwwwwffffffffffffffffffffffffffffffffffffffffffffffffffffiwwwwffffffffwffffffffififffffffffffffffffffffffffffffffffffffffffffffffffywwwwwwffffffffwwwoffffffffffiffiffffffffffffffffffffffffffffffffffffffffffffffffwwwwwwwwiffffffwwwoffffffffiffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffwwwwwwwwwwwffffffwww33offffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywywwwwwwwwwffffffwww?333offffffffffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffywwywwwwwwwwwffffffwwwofffffffifffffffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffwwywwwwwwwwiffffffwwwoffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffwwywwwwwwwifffffffwwwofffffffiffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffwwywwwwwwwiffffffffofffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywywwwwwwfffffffff33offffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywwwwwffffffffffofffffffffffffffffffifffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywwwwifffffffffffofffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywifffffffffff???offfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywffffffffffffffff???offfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywffffffffffffffff??offfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywffffffffffffffff?333offfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffywffffffffffffffff?offfffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffiffffffffffffffff?offffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff?333offffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffoffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffoffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff-- title: Paint 31 -- author: Fachi177 -- desc: A 31 color paint in TIC! -- script: lua -- input: gamepad mouse local W=240 local H=136 local ADDR=0x3FC0 color=16 t=0 forward=25 backward=19 size=0 gui=35 guitoolx=25 guitooly=4 boton=118 brush=1 zoom=1 zomx=0 zomy=0 pres=0 oldx,oldy=mouse() local PALETTES = { "be4a2fd77643ead4aae4a672b86f50733e393e2731a22633e43b44f77622feae34fee76163c74d3e8948265c42193c3e", "124e890099db2ce8f5ffffffc0cbdc8b9bb45a69883a4466262b44181425ff004468386cb55088f6757ae8b796c28569" } -- update palette function updpal(p) local pal=PALETTES[p] for i=1,#pal,2 do poke(ADDR+i//6*3+i//2%3,tonumber(pal:sub(i,i+1),16)) end end function menu(pal) canvas(pal,gui) if pal==0 then rect(0,0,gui,136,1) rect(3,3,17,129,2) tri(guitoolx+1,guitooly+#tools*9+4, guitoolx+6,guitooly+#tools*9+44, guitoolx+1,guitooly+#tools*9+44, 2) else end for i=0,15 do rect(4+pal//2,4+i*8,7,7,i) end if forward>=pal and forward=pal and c=pal and c=W or y<0 or y>=H then return end if mget(x,y)==prevc then mset(x,y,newc) flood(x+1,y,prevc,newc) flood(x-1,y,prevc,newc) flood(x,y+1,prevc,newc) flood(x,y-1,prevc,newc) end end function pick(x0,y0,x1,y1,col,l) if l then forward=mget(x1,y1) else backward=mget(x1,y1) end end function fill(x0,y0,x1,y1,col) local prevc=mget(x1,y1) if prevc~=col then flood(x1,y1,prevc,col) end end function linea(x0,y0,x1,y1,col) local dx=x1-x0 local dy=y1-y0 local step=math.abs(dx)>math.abs(dy) and math.abs(dx) or math.abs(dy) local xinc=dx/step local yinc=dy/step local x=x0 local y=y0 for i=0,step do pixel(x,y,col) x=x+xinc y=y+yinc end end tools={linea,fill,pick} function select() local x,y,l,m,r=mouse() if x>gui then dibujar() else if l or r then if x>3 and x<19 and y>3 and y<131 then local sel=(y-4)//8+((x-4)//8)*16 -----new if sel<31 then --- if l then forward=sel else backward=sel end end----- end if x>guitoolx and xguitooly and yguitoolx and xboton and yguitoolx and xboton+9 and yguitoolx and xguitooly+#tools*9+4 and yguitoolx and xboton-17 and yboton-9 then zoom=zoom>1 and zoom-1 or 1 else zoom=zoom+1 end pres=10 zomx=math.min(zomx,W-W//zoom) zomy=math.min(zomy,H-H//zoom) end end end end function dibujar() local x,y,l,m,r=mouse() if x>=W then x=oldx=H then y=oldy0 and zomy-1 or 0 end if btn(2) then zomx=zomx>0 and zomx-1 or 0 end if btn(1) then zomy=zomy0 and pres-1 or 0 end