Tạo Một Trận Sao Rơi Bằng MacroMedia Flash 5.0

 Ở đây tôi mạn phép dùng ánh sao vì bông tuyết tôi không có, nếu bạn có bông tuyết cho vào, tất nhiên bông tuyết thì màu trắng xám và thay nền đen thành nền trắng thì sẽ trở nên một trận Tuyết rơi rồi đó.

Ðầu tiên khởi động chương trình MacroMedia Flash 5.0, hiệu chỉnh kích thước bấm Ctrl + M chọn (200 X 200), đồng thời chọn màu đen.

Bấm Ctrl + Shift + O (dùng ánh sao của bài viết trước "Tạo một trận sao rơi bằng JavaScript"), sau đó gắp 1 ánh sao ra như hình bên dưới, vào Insert chọn Create Motion Tween, Instance --> Name : flake0 

Click double vào ánh sao, vào Menu Insert chọn Create Motion Tween ---> click vào dưới số 20 của thước bấm F6, di chuyển "sao" đến vị mới bên trái cách 1 cm, sau đó chỉ vào dưới số 40 của thước bấm F6 và di chuyển về lại vị trí ban đầu, click mouse phải vào Layer 1 chọn Add Motion Guide

Sau đó bạn bấm Ctrl+' (để hiện ra đường kẻ ô để dễ vẽ), click mouse trái vào số 1 dưới thước của Guide: Layer1, bấm Y để hiện ra Pencil Tool và vẽ từ ngôi sao đầu bên trái đến ngôi sao bên phải (mục đích để định hướng cho ngôi sao di chuyển theo nét vẽ của bạn).

sau đó click mouse trái vào Scene 1 để ra đi ra ngoài. Click mouse trái vào số 1 dưới của thước mở menu Frame chọn Tweening chọn none. Lúc này bạn click mouse phải vào Layer 1 chọn Insert Layer, click mouse trái vào dưới số 1 bấm Ctrl+Alt+A và bấm tiếp Ctrl+E và gõ như sau:

// c dùng để điều khiển lặp lại;

c = 1;

// maxFlakes là tổng số sao tại thời điểm chờ bên ngoài;

// nếu thêm vào nhiều có thể quá mức xử lý (load);

maxFlakes = 100;

Sau đó bấm F6 và click mouse trái vào sát bên số 1 nhập vào đoạn code sau trong Frame Action(nếu thấy không nhập được bấm Ctrl+E)

//Lưu ý nếu bạn sử dụng (Ctrl+M: 400 x 400) thì bên dưới random 200 bạn phải thay thành 400;

// Tạo sự di chuyển ngẫu nhiên;

set ("xpos" add c, random(200));
set ("speed" add c, Number(random(4))+2);
flake0.duplicateMovieClip ("flake" add c, c);

// lựa chọn tập hợp x và ngẫu nhiên về kích thước;
this["flake" add c]._x = eval("xpos" add c);
size = Number(random(50))+25;
this["flake" add c]._xscale = size;
this["flake" add c]._yscale = size;

// di chuyển sao xuống dưới bởi "speed";
for(i=1;i<=maxflakes;i++) {
this["flake" add i]._y = this["flake" add i]._y + eval("speed" add i);
i = i+1;
}

- Kế tiếp bấm F6 và click mouse trái vào nơi kế tiếp và nhập vào đoạn code sau trong Frame Action:

if (c == maxflakes) {
c = 1;
} else {
c = c+1;
}
gotoAndPlay (2);

 - Ngoài những gì đã minh họa, bạn có thể thiết kế cho 1 tấm thiệp điện tử có cảnh sao rơi và thêm vào vài lời chúc tốt đẹp bay lượn và sau những dòng chữ bay lượn đó là sao đang rơi.

Vui lòng góp ý về bài viết này xin liên hệ:

Lê Quang Anh Hu'ng 

135T3 Tran Van Dang Street, District 3, Ho Chi Minh City, Vietnam.

E-Mail: lehunghp@yahoo.com hoặc ahung@hcmpt.vnn.vn

Homepage: http://www.crosswinds.net/~lqahung/

Chúc Bạn & Gia Đình nhiều sức khỏe. 

PcLeHoan 1996 - 2002
Mirror : http://www.pclehoan.com
Mirror : http://www.lehoanpc.net
Mirror : http://www.ktlehoan.com