Su dung lap trinh mo phong trong mon Toan THCS

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]

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

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

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)

Để 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

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

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ứ

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

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

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

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 )

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

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)

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ễ

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 đỏ)

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)

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)

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ơ

Để 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

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

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 đủ

Như trang hình vừa copy sang chứa đầy đủ nội dung trang gốc