%FFP // Заголовок фильтра Category :"Mikes plugins" Title :"Mikes Button" Copyright :"Copyright c 2000 Mikhail Krivyy" Author :"Mikhail Krivyy\n" "http://mikhail.krivyy.com/" Filename :"mikes.8bf" Description:"A Rectangular Button" Version :"1.0" About :"Rectangular Button Plug-in !V\n!D\n" "!c\n!A" // Далее идут настройкм интерфейса Dialog:color=SkyBlue,image="back.bmp",Exact Title:"Frame me!" ctl(0):"Верхняя внешняя граница",val=160,range=(0,200) ctl(1):"Верхняя внутр. граница",val=110,range=(0,200) ctl(2):"Нижняя внешняя граница",val=40,range=(0,200) ctl(3):"Нижняя внутр. граница",val=80,range=(0,200) ctl[CTL_LOGO]:PUSHBUTTON,"&About",size=(34,14),pos=(343,126) // А теперь сама программа ForEveryTile: { for (x=x_start; x < x_end; x++) { for (z= 0; z < Z; z++) { pset(x,0,z,src(x,0,z)*ctl(0)/100); pset(x,1,z,src(x,1,z)*ctl(1)/100); pset(x,Y-1,z,src(x,Y-1,z)*ctl(2)/100); pset(x,Y-2,z,src(x,Y-2,z)*ctl(3)/100); } } for (y=y_start;y { for (z= 0; z < Z; z++) { pset(0,y,z,src(0,y,z)*ctl(0)/100); pset(1,y,z,src(1,y,z)*ctl(1)/100); pset(X-1,y,z,src(X-1,y,z)*ctl(2)/100); pset(X-2,y,z,src(X-2,y,z)*ctl(3)/100); } } true; }