Geri Dön   Forum Ti > Programlama Dilleri ve İnternet > Web Tasarım
Üye Ol Üye Listesi Takvim Forumları Okundu İşaretle

Web Tasarım İnternet sitesi ile ilgili kodlar, kaynaklar, ipuçları, uygulamalar ve diğer herşey.

Cevap
 
Konu Araçları
Eski 13.03.2008   #1 (permalink)
Teknik Ressam
 
<EFTELYA>  Görüntü Resmi
 
Katılma Tarihi: Tem 2006
Nereden: SAMSUN
Mesajlar: 917
Action script çalışmalarını sizlerde paylaşabilirsiniz.

Busch Çalı süpürgesi

Alttaki action script'i boş bir çalışma sayfasında ilk framenin action paneline yapıştırın ve test edin.

function Peek(prnt){
if(prnt==null){
this.px = 275;
this.py = 400;
this.vx = 3*(Math.random()-.5);
this.vy = -6;
this.s = 15;
this.color = 0x00000;
}else{
this.px = prnt.px;
this.py = prnt.py;
this.vx = prnt.vx;
this.vy = prnt.vy;
this.s = prnt.s;
this.color = prnt.color;
}
this.sv = Math.random()*0.1 + 0.2;
this.b = (Math.random()-.5)*0.7/(this.s);
this.bv = (Math.random()-.5)*0.01;
}

function step(r){
p = peeks[r];
p.px += p.vx;
p.py += p.vy;

sinb = Math.sin(p.b);
cosb = Math.cos(p.b);

vx = p.vx*cosb - p.vy*sinb;
vy = p.vx*sinb + p.vy*cosb;
p.vx = vx;
p.vy = vy;
p.b += p.bv;

p.s -= p.sv;

if(p.s<=0){
peeks.splice(r, 1);
}
}

peeks = [];

a = 5;
ct = new flash.geom.ColorTransform(1,1,1,1, a,a,a,a);

bmp = new flash.display.BitmapData(550, 400, false, 0xffffff);


this.attachBitmap(bmp, 1);
this.createEmptyMovieClip("vp", 2);
vp._visible = false;
t = false;
this.onEnterFrame = function(){
vp.clear();
for(r in peeks)if(peeks[r]!=null){
cp = peeks[r];
x1 = cp.px;
y1 = cp.py;
step(r);
x2 = cp.px;
y2 = cp.py;
vp.lineStyle(cp.s, 0x000000);
vp.moveTo(x1, y1);
vp.lineTo(x2, y2);
}
t=!t;
bmp.draw(vp);
}

function fade(){
bmp.colorTransform(bmp.rectangle, ct);
}

function fork(){
if(peeks.length && random(5)!=0){
np = new Peek(peeks[random(peeks.length)]);
}else{
np = new Peek(null);
}
peeks.push(np);
}
function mfork(){
for(m=0;m<5;m++)fork();
}
interval_fork = setInterval(fork, 50);
interval_fade = setInterval(fade, 500);


Halat

Yeni bir movie clip oluşturun küküphanedeki movie clip'in "linkage" seçeneğini aktif edin ve identifer kısmına "node" ismini verin. movie clip'i ana sahneye sürükleyin ve "instance name"sine "mouse" adını verin. Ana sahnedeki movie clip'in bulunduğu frame'nin action paneline alttaki kodu yapıştırın ve test edin.

function nabs(dx,dy,px,py){
var rx,ry;
if(dx==0){
rx = 0;
ry = py;
}else if(dy==0){
rx = px;
ry = 0;
}else{
rx = (py + dx/dy*px)/(dy/dx + dx/dy);
ry = dy/dx*rx;
}
return {
x: rx,
y: ry
};
}

dis = 6;
n = 70;
function ikmove(actor, reactor, vx, vy){
actor._x += vx;
actor._y += vy;
dx = mpx - actor._x;
dy = mpy - actor._y;

dm = nabs(dx,dy,vx,vy);
reactor._x += dm.x;
reactor._y += dm.y;

dx = reactor._x - actor._x;
dy = reactor._y - actor._y;
if(dx==0 && dy==0){
reactor._x += dis;
dx = dis;
}
d = Math.sqrt(dx*dx+dy*dy);
f = dis/d;
nx = dx*f - dx;
ny = dy*f - dy;

reactor._x += nx;
reactor._y += ny;
return {x:dm.x+nx,y:dm.y+ny}
}

for(i=0;i<n;i++){
this.attachMovie("node","n"+i,i+1);
o = this["n"+i];
o._x = 200 + i%2*dis;
o._y = 100;
}
sdis = 4;
this.onEnterFrame = function(){
for(i=0;i<n;i++){
o = this["n"+i];
if(i==0){
p = mouse;
vx = _xmouse - mouse._x;
vy = _ymouse - mouse._y;
}else{
p = this["n"+(i-1)];
vx = v.x;
vy = v.y;
}
v = ikmove(p, o, vx, vy);
}
this.clear();
this.moveTo(_xmouse+sdis, _ymouse+sdis)
for(i=0;i<n;i++){
this.lineStyle(5,0x909090,100);
o = this["n"+i];
this.lineTo(o._x+sdis, o._y+sdis);
}
this.moveTo(_xmouse+2, _ymouse+2)
for(i=0;i<n;i++){
this.lineStyle(5,(i%2)?0x5C461D:0x7C5F27);
o = this["n"+i];
this.lineTo(o._x+2, o._y+2);
}
}
__________________
Bana Gözlerinle Değil
Sözlerinle Anlat...
<EFTELYA> Şuanda Forumda Değil   Alıntı yaparak cevapla
Eski 12.10.2008   #2 (permalink)
 
Katılma Tarihi: Eki 2008
Nereden: 1
Mesajlar: 8
Lightbulb the secret of success

the secret of success is constancy of purpose.---------------------------------------------------wedding invitations, warhammer gold, warhammer gold, warhammer gold, wow power leveling,
__________________
60 wow power leveling
sfffeeo9 Şuanda Forumda Değil   Alıntı yaparak cevapla
Eski 12.10.2008   #3 (permalink)
 
at-mac  Görüntü Resmi
 
Katılma Tarihi: Haz 2007
Nereden: Win32
Yaş: 16
Mesajlar: 1,358
Varsayılan

Çok güzel olmuş emeğine sağlık.Bu arada bu kodlar action script 2.0 kodları 3.0 değil...
__________________
ALBUM DOWNLOAD DJ ATMAC
at-mac Şuanda Forumda Değil   Alıntı yaparak cevapla
Cevap


Şu Anda Konuyu İnceleyen Aktif Kullanıcılar: 1 (0 üye ve 1 misafir)
 
Konu Araçları



Şu anki forum saati: 18:56.


cnt hizmet sağlayan firma
ForumTi.com'un yapımı ve yayınlanması CNT'ye aittir.
Sitedeki içerikleri foruma ücretsiz şekilde üye olabilen ziyaretçiler oluşturur. Bu içeriklerin sorumluluğu yazana aittir.
Eğer yasak ve aykırı içerik tespit edilirse site yöneticilerine bu konular bildirilir ve kaldırılır. Site yönetimi haberdar edildiğinde sonuç alınamaz ise servis sağlayıcı CNT'ye bildiride bulunabilirsiniz.
vBulletin® v3.7.2, Copyright ©2000-2008, Jelsoft Enterprises Ltd. Search Engine Friendly URLs by vBSEO 3.2.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265