Bước 6 : Tiến hành chỉnh sửa cho phù hợp với ý đồ trình chiếu , nhấp nút “Đồng ý” là kết thúc xong. Sau đây là ví dụ minh họa :.. Trong bài giảng trên có 14 bài về lập trình mô phỏng [r]
(1)KINH NGHIỆM SỬ DỤNG VIOLET SCRIT TRONG BÀI GIẢNG VIOLET TRONG BÀI GIẢNG MƠN TỐN THCS
I) GIỚI THIỆU SƠ LƯỢC VỀ VIOLET SCRIPT 1) Giới thiệu sơ lược lập trình mơ Violet Script
a) Cấu trúc chương trình : Chương trình VS bao gồm hàm, hàm main gọi bắt đầu chạy chương trình
function main
appear Text, 8, 4, "Hello world" end
Một chương trình (một hàm, chức năng) khai báo sau:
function <tên hàm> <các tham số> <lệnh 1>
<lệnh 2> end
Trong tên chương trình khơng có dấu cách (có thể dùng dấu gạch chân "_" thay cho dấu cách) Các tham số phải khai báo cách dấu phẩy Có thể xem thêm ví dụ minh họa phần sau
Khi gọi chương trình con, thay đổi giá trị tham số gọi ta nên thêm dấu & vào phía trước tham số (giống cú pháp ngơn ngữ C) Ví dụ:
input_line &ax, &ay, &bx, &by
get_point &x, &y, x1, y1, angle, b) Các lệnh đơn giản
Ngôn ngữ VS cung cấp loại lệnh sau:
Các lệnh gán, ví dụ a = 2; a = 10*5 + 1; b = a^2 + a +
Các lệnh bản: ví dụ lệnh appear chương trình Các lệnh gọi chương trình con: có cú pháp giống lệnh
(2)Các biểu thức tốn học sử dụng vế phải lệnh gán, làm tham số lệnh khác Một biểu thức bao gồm thành phần:
Các toán hạng: giá trị số, biến số Các toán tử: + , - , * , / , ^
Các hàm số: sin, cos, tg, cotg, arcsin, arccos, arctg, arccotg, abs, sqrt, ln Các dấu ngoặc đơn"(" ")"
Ví dụ tính góc B tam giác ABC biết độ dài cạnh AB, AC BC, áp dụng định lý hàm số cos
AB = AC = BC =
angleB = arccos((AB^2 + BC^2 - AC^2)/(2*AB*BC)) d) Các lệnh có cấu trúc
Lệnh điều kiện
if <điều kiện> then <các lệnh> end_if
Lệnh lặp
for <tên biến> from <cận dưới> to <cận trên> step <bước nhảy> <các lệnh>
next e) Các nhãn
Có thể coi nhãn lệnh đặc biệt, ký hiệu dấu ":" tên nhãn Nhãn dùng vừa để đánh dấu, vừa để mô tả đoạn lệnh Nhãn thường dùng định danh để truy cập (goto) đến đoạn lệnh từ vị trí chương trình Ví dụ:
function main
goto ERASE :START
appear Text, 8, 4, "Hello world" wait_click
:ERASE
(3)wait_click
goto START end
2) CÁC LỆNH CƠ BẢN TRONG NGÔN NGỮ LẬP TRÌNH VIOLET SCRIPT 2.1Các đối tượng lệnh VS
a) Các đối tượng lệnh xử lý đối tượng
Trong thư viện trình thơng dịch VS mơn Hình học có loại đối tượng hình ảnh sau:
Tên đối tượng
Ứng dụng Hình ảnh Tên đối tượng Ứng dụng Hình ảnh
Point (điểm)
Ký hiệu điểm hình vẽ Protractor
(thước đo góc)
Dùng để xác định góc việc vẽ góc
Ruler (thước kẻ)
Sử dụng làm vật kê để vẽ đoạn thẳng
TSquare (ê-ke)
Dùng để vẽ đoạn thẳng vng góc với đoạn thẳng có sẵn
Compa (compa)
Dùng để vẽ hình trịn cung trịn
Measurer (thước đo)
Dùng để đo cạnh góc
Có hình dạng thước kẻ thước đo góc tùy ý người sử dụng
Pencil (bút chì)
Dùng để vẽ đoạn thẳng đường đồ thị
Burin (dao cắt)
(4)Để sử dụng loại đối tượng VS đối tượng nạp từ bên ngồi, ngơn ngữ VS cung cấp lệnh sau:
Tên lệnh Tham số Tác dụng
Ví dụ mơ việc vẽ điểm bút chì appear
xuất_hiện
Tên đối tượng
Tọa độ đối tượng
Tạo lập cho xuất đối tượng vị trí X, Y với tham số cụ thể tùy theo loại đối tượng
function main
appear Pencil // Xuất bút chì (0,0) move Pencil, 5, // Đưa bút chì vị trí (5,5) appear Point, 5, 5, A // Xuất điểm A (5,5) delay 12 // Tạm dừng giây
disappear Pencil // Làm biến bút chì end
disappear biến_mất
Tên (hoặc nhiều) đối tượng
Làm cho đối tượng biến (mờ dần hẳn)
move
dịch_chuyển
Tên đối tượng Tọa độ (x, y) Góc quay đối tượng
Vừa dịch chuyển vừa quay đối tượng tới vị trí góc quay Nếu khơng nhập góc quay góc quay mặc định 0 function main
b) Các lệnh xử lý đa giác
Tên lệnh Tham số Tác dụng Ví dụ : Cắt ghép góc tam giác để chứng minh định lí tổng ba góc tam giác
polygon đa_giác
Tên đa giác Vị trí đa giác
Tọa độ điểm đa giác
Tạo đa giác
Khi chạy, người dùng xác định đường cắt qua góc thứ đường cắt qua góc thứ hai, sau lần cắt mẩu cắt ghép vào vị trí cần thiết
function main
polygon Tamgiac, 8, 6, 0x7F7FFF, -1, -3, 3, 1, -3, input_line &px1, &py1, &px2, &py2
cut_polygon px1, py1, px2, py2
clip cắt
Tọa độ điểm nằm đường thẳng cắt
(5)move Tamgiac2, 4, 4, -180 input_line &px1, &py1, &px2, &py2 cut_polygon px1, py1, px2, py2 move Tamgiac12, 10, 4, 180 end
unify hợp
Tên đa giác
Tên đa giác hợp vào đa giác
Hợp nhiều đa giác thành đối tượng
flip lật
Tên đa giác Lật đa giác qua trục tung
c) Các lệnh đồ họa
Tên lệnh Tham số Tác dụng Ví dụ : Vẽ tam giác có đầy đủ kí hiệu cạnh góc
erase Tên đối tượng cần xóa Xóa nội dung đối
tượng Ví dụ vẽ tam giác qua điểm (x1, y1), (x2, y2), (x3, y3) với đầy đủ ký hiệu cạnhgóc
function ShowTriangle x1, y1, x2, y2, x3, y3 poly_line x1, y1, x2, y2, x3, y3, x1, y1 set_paper Paper, 2, 0x003FBF
note_edge 2, "value", x2, y2, x1, y1 note_edge 1, "value", x3, y3, x2, y2 note_edge 0, "value", x1, y1, x3, y3
note_angle 0, "value", x2, y2, x1, y1, x3, y3 note_angle 2, "value", x3, y3, x2, y2, x1, y1 note_angle 1, "value", x1, y1, x3, y3, x2, y2 end
function main
ShowTriangle 2, 7, 7, 7, 3.5, end
circle Tọa độ tâm Bán kính đường trịn
Vẽ đường trịn biết tâm bán kính
line Tọa độ điểm đầu mút
Vẽ đoạn thẳng qua điểm
note_angle ký_hiệu_góc
Kiểu đánh dấu Giá trị ký hiệu
Ba điểm tọa độ điểm
Đánh dấu góc ký hiệu giá trị góc
note_edge ký_hiệu_cạnh
Kiểu đánh dấu Giá trị ký hiệu Hai điểm tọa độ điểm
(6)attach_pen Đối tượng
Tọa độ điểm gắn bút
Gắn vào đối tượng điểm, mà thay đổi vị trí đối tượng điểm lưu lại vết
detach_pen Đối tượng Gỡ bỏ điểm gắn khỏi đối tượng
d) Các lệnh phục vụ tính tốn hình học phẳng e) Lệnh tương tác đối tượng
Tên lệnh Tham số Tác dụng Tên lệnh Tham số Tác dụng
get_point
lấy_điểm
Tọa độ kết Tọa độ điểm gốc Góc
Khoảng cách R
Chuyển từ tọa độ cực sang tọa độ Đề-các (tính tọa độ điểm biết R hệ tọa
độ cực)
set_drag
kéo_thả
Đối tượng cần thao tác
Thao tác (true) hay không (false)
Thiết lập đối tượng kéo thả hay khơng
get_angle
lấy_góc
Góc (kết quả)
Tọa độ điểm Tọa độ điểm gốc Kiểu vẽ đoạn thẳng
Lấy góc (trong hệ tọa độ
cực) từ tọa độ điểm so với điểm gốc
input_line
nhập_đoạn
Tọa độ điểm đầu mút đoạn thẳng
Nhập đoạn thẳng (2 điểm) cách nhấn vào kéo chuột
get_perpendicula r
Tọa độ điểm kết Tọa độ điểm
Tọa độ hai điểm nằm đường thẳng
Tính vị trí chân đường vng góc hạ từ điểm xuống đường thẳng
input_point Tọa độ điểm Nhập điểm cách nhấn chuột
get_intersection1 Tọa độ điểm kết Tọa độ điểm đường thẳng thứ Tọa độ điểm đường thẳng thứ hai
Tính giao điểm hai đường thẳng
input_data Tiêu đề hộp nhập Tiêu đề tham số thứ
Tiêu đề tham số thứ
(7)get_intersection2 Tọa độ điểm kết thứ
Tọa độ điểm kết thứ
Tọa độ điểm đường thẳng Tọa độ tâm đường trịn
Bán kính đường trịn
Tính hai giao điểm đường thẳng đường tròn
get_intersection 3
(Lấy giao điểm đường tròn)
&ax,&ay &bx,&by 4,4 8,4
Tọa độ điểm kết thứ Tọa độ điểm kết thứ Tọa độ tâm đường tròn Tọa độ tâm đường tròn Bán kính đường trịn Bán kính đường trịn
f) Các lệnh chờ đợi
Tên lệnh Tham số Tác dụng
delay
trễ
Thời gian trễ Dừng (trễ) khoảng thời gian
wait_click
đợi_nhấn
Tên nút đồ họa chờ nhấn
Đợi người dùng click vào nút đồ họa hình Nếu lệnh khơng có tham số nghĩa chờ đến nhấn nút Next nút Back
Các nút đồ họa nạp từ file lệnh load_movie
g) Các lệnh thư viện Hình học (MathTools.vs)
create_line x1, y1, x2, y2: Mô vẽ đoạn thẳng thước kẻ bút chì từ điểm (x1, y1) đến điểm (x2, y2)
create_corner x1, y1, angle, len: Mơ vẽ góc thước đo độ, thước kẻ, bút chì Đầu tiên đưa thước đo độ đến vị trí đường nằm
ngang, tâm thước (x1, y1), lấy điểm góc angle, kẻ từ tâm qua điểm đoạn có độ dài len
rotate_compa Compa, radius, angle: Quay đối tượng Compa góc angle từ vị trí tại, cịn radius độ mở Compa (phải giống
lệnh call Compa.Open,… trước đó)
create_arc x1, y1, radius, start, end: Mô vẽ cung trịn tâm (x1, y1), bán kính radius (được xác định compa thước kẻ), từ góc
start đến góc end
cut_polygon x1, y1, x2, y2: Mô cắt dao cắt tất hình đa giác tạo lệnh polygon 2.2) Cách đưa phần lập trình mơ vào giảng Violet
(8)Tiếp ta chép đoạn mã lệnh chương trình cần thực khung ( Thực lệnh Ctrl+C , Ctrl+V) Ví dụ đoạn mã lệnh vẽ đường trung trực đoạn thẳng AB
function main
appear Text, 8.25, 0.5, "Hãy vẽ đoạn thẳng", input_line &ax, &ay, &bx, &by
disappear Text
appear Point, ax, ay, "A", below appear Point, bx, by, "B", below create_line ax, ay, bx, by
radius = sqrt((ax-bx)^2 + (ay-by)^2) / * get_angle &angle, ax, ay, bx, by
set_paper Draft appear Compa
move Compa, ax, ay, angle-90 call Compa.OpenCompa, radius rotate_compa Compa, radius, angle+90 move Compa, bx, by, angle+90 rotate_compa Compa, radius, angle+270 disappear Compa
mx = (ax + bx) / my = (ay + by) / angle = angle + 90
get_point &cx, &cy, mx, my, angle, set_paper Paper
create_line cx, cy, * mx - cx, * my - cy appear Point, mx, my, "M", leftbelow note_angle 0, "", bx, by, mx, my, cx, cy note_edge 0, "", ax, ay, mx, my
note_edge 0, "", mx, my, bx, by end
(9)Chọn nút có dấu chấm mục “Các file thư viện nguồn”
Cách khai báo đường dẫn chi tiết tệp l à:
C:\Program Files\Platin ViOLET\Lecture\vpScript\Common\Mathtool.vs
(10)Chọn nút chấm mục “Các đối tượng”
Và lệnh khai báo đối tượng ( công cụ vẽ hình) , có đường dẫn :
C:\Program Files\Platin ViOLET\Lecture\vpScript\Template\
Trong mục ta chọn công cụ : thước kẻ (Rule) , Compa ( Compa) , bút chì (Pencil)
Mỗi lần thêm cơng cụ nhấn vào nút dấu “ +” Có sau :
Sau khai báo xong , nhấn nút “Đồng ý”
Lúc chương trình tự chạy bước để vẽ đường trung trực đoạn thẳng AB ( Kết xem hình bên )
(11)a)MÃ lệnh chơng trình vẽ đoạn thẳng MN đoạn thẳng AB
Mó lnh í ngha tng dòng
function main
set_paper Draft, 3, 0xFF0000 Line 3, 2, 8,
Appear Point, 3, 2, "A", below Appear Point, 8, 2, "B", below
radius =
get_angle &angle, 1, 1, 1,
set_paper Draft, 1, 0x0000FF appear Compa
move Compa, 3,
call Compa.OpenCompa, set_paper Draft, 3, 0xFF0000 Line 3, 7, 12,
Appear Point, 3, 7, "M", below set_paper Draft, 1, 0x0000FF
move Compa, 3, 7, angle-10 call Compa.OpenCompa, rotate_compa Compa, radius, angle+10
disappear Compa
Appear Point, 8, 7, "N", below end
Định dạng vẽ, độ dày nét vẽ 3, màu đỏ Vẽ đoạn thẳng từ toạ độ 3,2 đến toạ độ 8,2
Xuất hiện_điểm, toạ độ 3,2; tên điểm A, chữ điểm Xuất hiện_điểm, toạ độ 8,2; tên điểm B, chữ điểm Bán kính
Nhập liệu góc điều hướng com pa (bạn thay đổi số để cảm nhận)
Định dạng vẽ, độ dày nét vẽ 1, màu xanh thẫm
Xuất compa (2 dịng xanh phía cho xuống vẽ này)
Di chuyển compa tới toạ độ 3,2 (tức đinh compa đặt vào A) Mở compa, bán kính (ngầm định mở theo phương nằm ngang tức đầu chì trùng với B – ta hiểu compa đo AB) Định dạng vẽ, độ dày nét vẽ 3, màu đỏ
Vẽ đoạn thẳng từ toạ độ 3,7 tới toạ độ 12,7
Xuất điểm toạ độ 3,7; tên điểm M, chữ điểm (Do có điểm M đầu nên ta tưởng tia gốc M) Định dạng vẽ, độ dày nét vẽ 1, màu xanh
Di chuyển compa tới vị trí 3,7; xoay compa -10 độ)
Độ mở compa (tưởng đo đoạn AB di chuyển xuống M)
Quay compa, bán kính 5, +10 độ (so với phương nằm ngang) Biến compa
Xuất điểm N vị trí 8,7; chữ điểm Kết thúc
(12)Mã lệnh Ý nghĩa dịng Hình minh họa function main
appear Text, 8.25, 0.5, "Hãy vẽ
một tia OA",
input_line &ax, &ay, &bx, &by disappear Text
appear Point, ax, ay, "O", below appear Point, bx, by, "A", below
set_paper Paper, 2, 0x0003FF create_line ax, ay, (3*bx-ax)/2, (3*by-ay)/2
get_angle &angle, ax, ay, bx, by appear Protractor
move Protractor, ax, ay, angle appear Text, 8.25, 0.5, "Hãy
đánh dấu điểm thuộc cạnh thứ hai theo mép thước",
input_point &cx, &cy
appear Point, cx, cy, "B", below disappear Text
disappear Protractor
set_paper Paper, 2, 0x0003FF create_line ax, ay, (3*cx-ax)/2, (3*cy-ay)/2
set_paper Paper, 2, 0xF00000
note_angle 2, "value", bx, by, ax, ay, cx, cy
end
Vết đoạn thẳng từ toạ độ ax, ay bx, by click chuột
Vẽ đoạn từ O đến (3*bx-ax)/2, (3*by-ay)/2 ( vượt qua A )
Nhập liệu hướng điều khiển thước đo góc ( theo hướng OA )
Xuất hiên thước đo góc
Di chuyển thước đo góc tâm thước trùng vào O, hướng OA
…………
Nhập liệu toạ độ điểm click chuột ……
……
Biến thước đo góc ……
Vẽ đoạn thẳng từ O đến (3*cx-ax)/2, (3*cy-ay)/2 (tưởng vẽ tia vượt qua B ) ……
Đánh dấu góc, kiểu , “số đo”, tạo bx, by, ax, ay, cx, cy
…
c)
(13)Mã lệnh vài chương trình dùng lệnh lặp: For…from…to…step…
Tên Mã lệnh Ý nghĩa dòng
Nhảy số
function main
for t from to 60 step appear Text,8.3,5.5,t delay 12
next end
…
Cho t từ đến 60 bước nhảy
Xuất dòng chữ toạ độ 8.3, 5.5, tên chữ t Độ trễ 12
Tiếp tục …
Đường tròn
function main
set_paper Draft1,5,0x0000FF circle 8,6,2
appear Point, 8,6, "O",rightbelow set_paper Draft,5,0xFF0000 for t from to step 0.03 erase
appear Point, t+4,6, "O'",rightbelow circle t+4,6,1.5 delay next end … …
Vẽ đường trịn toạ độ 8, 6, bán kính …
…
Cho t từ đến bước nhảy 0.03 Xố đối tượng (phía sau lệnh này)
Xuất điểm O toạ độ t+4, 6, chữ bên phải phía Vẽ đường trịn toạ độ t+4, 6, bán kính 1.5
Độ trễ Tiếp tục …
Bán kính function main
set_paper Draft1,5,0x0000FF circle 8,6,2
appear Point, 8,6, "O",rightbelow set_paper Draft,5,0xFF0000 for v from to 360*v step get_point &ax, &ay, 8, 6, v, appear Point, ax,ay, "A", right erase
line ax, ay, 8,6 delay next … … … … …
Cho v từ đến 360*v (độ) bước nhảy
Tính toạ độ điểm so với gốc O, góc v, cách gốc sau đặt
tên điểm A Xoá đối tượng
Vẽ đoạn thẳng từ ax, ay đến 8, Độ trễ
(14)end … Hệ góc
nội tiếp
function main
set_paper Paper, 5,0x0000FF circle 1, 5,
appear Point, 1, 5, "O" get_point bx, by, 1, 5, 180, appear Point, bx, by, "B", leftbelow get_point cx, cy, 1, 5, 0,
appear Point, cx, cy, "C", rightbelow appear TSquare
move TSquare, ax, ay for v from to 180 step get_point &ax, &ay, 1, 5, v, appear Point, ax,ay, "M", right set_paper Draft,3,0x000000 erase
note_angle 0, "", bx, by, ax, ay, cx, cy get_angle &g, ax, ay, cx, cy
set_pos TSquare, ax, ay, g set_paper draft, 3, 0xFF00FF erase
line ax, ay, bx, by line ax, ay, cx, cy line bx, by, cx, cy delay
next
appear TSquare move TSquare, ax, ay for v from 180 to 360 step get_point &ax, &ay, 1, 5, v, appear Point, ax,ay, "M", right set_paper Draft,3,0x000000 erase
note_angle 0, "", cx, cy, ax, ay, bx, by get_angle &g, cx, cy,ax, ay
set_pos TSquare, ax, ay, g-90
set_paper draft, 3, 0xFF00FF
… … … …
Tính toạ độ điểm so với gốc 1,5, góc 180 độ, cách gốc sau
đặt tên B, chữ phía trái bên điểm …
…
Xuất thước đo góc
Di chuyển thước đo góc đến toạ độ ax, ay Cho v từ đến 180 (độ), bước nhảy
Tính toạ độ điểm so với gốc 1,5, góc v, cách gốc
Xuất điểm M vị trí vừa tính toạ độ …
…
Đánh dấu góc vng
Tính độ lớn góc g từ toạ độ ax, ay so với gốc cx, cy Thiết lập biến đổi thước đo góc theo toạ độ ax, ay g … … … … … … …
Từ trở xuống lặp lại lệnh (màu xanh) Chỉ khác chút xíu chỗ ta cho biến v thay đổi từ 180 độ đến 360 độ lệnh lặp xoay lại e-ke để di chuyển xuống góc vng e-ke phía (các chỗ màu đỏ)
(15)erase
line ax, ay, bx, by line ax, ay, cx, cy line bx, by, cx, cy delay
next end
Nét đứt
function main
set_paper Paper, 5, 0xFF00FF appear Ruler,5,4
for t from -4 to appear Pencil attach_pen Pencil
for x from t to t+0.4 step 0.4 set_pos Pencil,x+9,4 next
t= t-0.1 delay next
disappear Pencil disappear Ruler end
Chương trình bạn hồn tồn “phiên dịch” theo dịng lệnh, xin miễn cho tơi.thuyết minh phần
Đây chương trình dùng hai nhóm lệnh lặp lồng vào để mơ việc vẽ nét đứt (nét khuất) Vòng lặp thứ (chữ đỏ) chứa vòng lặp thứ hai (chữ xanh)
Vịng lặp xanh có tác dụng tạo nét vẽ Điều hướng nét vẽ (bạn tham khảo thêm chương trình vẽ hình hộp chữ nhật để xem cách điều chỉnh nét khuất theo hướng khác nhau)
Vịng lặp ngồi màu đỏ có tác dụng tạo khoảng trống nét vẽ, độ thưa nét vẽ, độ dài tổng thể đoạn
Đồ thị
function main
set_paper Paper, 5, 0x0000FF appear Pencil
attach_pen Pencil
for x from -4.2 to 4.25 step 0.1 y= x*x
set_pos Pencil, 8+x,12 - y delay
next
disappear Pencil end
Đây chương trình dùng vịng lặp để mơ cách vẽ đồ thị hàm số y = x*x Tuy nhiên file minh hoạ gửi kèm, tơi có dùng mơ dun vẽ đồ thị hàm số để vẽ thêm hệ trục toạ độ đường dóng toạ độ tương ứng hàm y = x*x , thực vẽ đồ thị y =x*x tô màu trắng nên bạn khơng nhìn thấy mà thấy hệ trục đường dóng
Đây chương trình kết hợp hiệu modun khác violet Sau bạn nên để ý đến kết hợp tác dụng nhiều modun giảng Đó tác dụng to lớn mà phần mềm VIOLET mang lại cho
2.5) Một số mã lệnh sử dụng cơng cụ vẽ hình
Cơng cụ Mã lệnh cần khai báo Ý nghĩa
Thước kẻ(Rule)
(16)A(x1;y1) , B(x2;y2)
(các tọa độ cho trước)
set_paper duongthang, 3,0x0000FF appear Point, x1,y1,A, below appear Point, x2,y2,B, below create_line (3*x1-x2)/2,(3*y1-y2)/2, (3*x2-x1)/2,(3*y2-y1)/2
End
function main Vẽ đoạn thẳng AB
set_paper doanthang, 3,0x0000FF
appear Point, x1,y1,A, below appear Point, x2,y2,B, below create_line x1,y1,x2,y2
End
function main
set_paper tia, 3,0x0000FF
appear Point, x1,y1,A, below appear Point, x2,y2,B, below
create_line x1,y1,(3*x2-x1)/2,(3*y2-y1)/2 End
- Xuất điểm A(x1;y1) điểm B(x2;y2)
- Dùng thước kẻ bút chì để vẽ đường thẳng qua tọa độ (3.x1-x2)/2,(3.y1-y2)/2,(3.x2-x1)/2,(3.y2-y1)/2
Vẽ đường tròn Compa
Vẽ đường trịn có tâm O(x1.y1) , bán kính r cho trước
function main
set_paper Draft,2,0xFF0000 appear Point,x1,y1,"O",left appear Compa
move Compa,x1,y1,0 call Compa.OpenCompa,r rotate_compa Compa,r,360 disappear Compa
end
Hoặc lệnh function main
set_paper Draft,2,0xFF0000 appear Point,x1,y1,"O",left
- Xuất điểm O(x1;y1)
- Xuất Compa tọa độ (0;0) , - Compa tọa độ (x1;y1) góc quay 00
- Độ mở Compa tương ứng với bán kính r
- Compa quay với bán kính r với góc quay từ 00 đến 3600
Hoặc lệnh sau
- Xuất điểm O(x1;y1)
(17)create_arc x1,y1,r,0,360 end
Sử dụng êke
Vẽ đường thẳng qua điểm (x1;y1) vng góc với đường thẳng a cho trước
appear TSquare,x1,y1
move TSquare,x1,y1,angle+90 delay
move TSquare,cx,cy,angle+90
- Xuất êke tọa độ (x1;y1)
- Ê ke trượt đường thẳng a , cạnh eke qua điểm (x1;y1) cịn đỉnh eke nằm đường thẳng a có tọa độ (cx;cy)
- Thước đo góc
(Protracto) appear link A, B MeasurerProt,12,4,Protractor
link B, C link C, A
Khai báo công cụ theo đường dẫn
C:\Program Files\Platin
ViOLET\Lecture\vpScript\Template\Measurer.swf Tại ô “Vị trí” ta nhập thêm “Mprot” để hiển thị eke
- Xuất thước đo góc vị trí có tọa độ (12;4)
- Bắt thước đo góc theo cạnh tam giác ABC , tâm thước đo góc trùng với đỉnh tam giác
- Thước đo độ dài
(Ruler) appear MeasurerRuler, 10, 6, Ruler
link A, B link B, C link C, A
Khai báo công cụ theo đường dẫn
C:\Program Files\Platin
ViOLET\Lecture\vpScript\Template\Measurer.swf Tại ô “Vị trí” ta nhập thêm “MRuler” để hiển thị thước có vạch
- Xuất thước kẻ vị trí có tọa độ (10;6)
- Bắt thước đo độ dài cạnh tam giác ABC , vạch thước trùng với đỉnh tam giác, thước nằm dọc theo cạnh tam giác
3) Cách chỉnh sửa hình mơ giảng Violet
Khi thiết kế phần mơ , dẫn đến phần mơ nằm vị trí không thuận lợi che phần văn xuất hình , ta cần chỉnh sửa để việc trình chiếu dễ quan sát thuận lợi cho việc theo dõi học sinh , ta cần tiến hành đôi chút để chỉnh sửa Phần mô xuất giảng có dạng file ảnh , nên việc di chuyển ta dùng tổ hợp phím Ctrl+ phím ←↑→↓ để di chuyển
Các bước làm : nhấp chuột vào nút chỉnh sửa , chọn tiếp tục , nhấp đúp vào hình mơ
(18)Để di chuyển dùng tổ hợp phím Ctrl + phím lên xuống
Hoặc nhấn giữ chuột vào cạnh tam giác ABC để di chuyển
II) CÁCH ĐƯA PHẦN LẬP TRÌNH MƠ PHỎNG SẴN CÓ VÀO TRONG BÀI GIẢNG 1) Sử dụng đoạn mã lệnh cho sẵn :
Bước : Copy đoạn mã lệnh dán vào khung soạn thảo lập trình mơ
Bước : Chọn nút “Tiếp tục” để khai báo lệnh liệu công cụ , rối chọn nút “Đồng ý” để kết thúc Bước : Chọn hiệu ứng xuất , điều chỉnh hình mơ cho hợp với nội dung khác
Ví dụ áp dụng : Vẽ ttia phân giác thước đo góc
Đoạn mã lệnh Hình minh họa
Nhấn chuột vào
- Kéo vào(xuống) thu nhỏ hình
- Kéo (lên) phóng to hình
(19)function main line 8,1, 8.5,1 delay 36
set_paper Draft,3,0x0000FF delay
create_line 6,8, 12,8 appear Point, 6,8, O, below delay 12
appear Point, 12,8,"x",below left appear Protractor,12,3
move Protractor,6,8 appear Pencil,12,3 move Pencil,7.32,5.3 appear Point, 7.32,5.3," " delay 24
disappear Protractor, Pencil create_line 6,8, 8.63,2.7 appear Point,8.63,2.7,"y", left appear Protractor,13,3
move Protractor, 6,8 appear Pencil, 15, move Pencil, 8.54,6.41 appear Point, 8.54,6.41, "" disappear Protractor, Pencil set_paper Draft,3,0xFF0000 create_line 6,8, 10.24,5.35
appear Point,10.24,5.35,"z",below note_Angle 0,"value",10,8,6,8,8.54,6.41 appear Compa, 10,4
move Compa, 6,8,32
call Compa.OpenCompa,0.7 rotate_compa Compa,0.7,64 disappear Compa
end
Lệnh khai báo có dạng
(20)Hình sau nhấn nút đồng ý , chương trình tự chạy
Hình mơ nằm trang hình Sau thu nhỏ di chuyển bên hình
2) Copy từ giảng sẵn có để đưa vào giảng
Trong giảng , phần giảng có phần mô , song để viết đoạn mã lệnh đưa vào giảng điều không dễ Cho nên ta sưu tầm số giảng có phần mơ copy chung đưa vào soạn Sau tơi trình bày cách đơn giản để thực điều
Bước : Chọn giảng có chứa nội dung mơ Bước : Mở trang soạn thảo bải giảng
Bước : Mở giảng có nội dung cần copy , nhấp chuột vào nút chỉnh sửa , chọn nút “Tiếp tục”
Bước : Nhấp chuột đúp vào hình mơ , hình xuất nút vuông xung quanh , nhấn tổ hợp phím Ctrl+C
Bước : Mở lại trang soạn thảo , nhấn tổ hợp phím Ctrl+V Lúc hình soạn thảo chứa tồn nội dung phần mơ Trong bước tồn mã lệnh lệnh khai báo copy sang trang soạn thảo đầy đủ
(21)(22)(23)Như trang hình vừa copy sang chứa đầy đủ nội dung trang gốc
(24)