Viết thủ tục hinhvuong Nháy chuột vào ngăn gõ lệnh Gõ lệnh edit “hinhvuong và nhấn phím enter gõ câu lệnh Lưu chọn File -> save and exit lưu trong bộ nhớ Dùng lệnh save “ tên tập tin [r]
Trang 1THẾ GIỚI HÌNH HỌC TRONG LOGO
SGK TIN HỌC QUYỂN 2,3
Khởi động Giới thiệu con trỏ, cửa số màn hình, cửa sổ lệnh
Các lệnh MSLOGO STT Lệnh đầy đủ Viết tắt Hành động của Rùa
2 ClearScreen CS Rùa về vị trí xuất phát và xóa
toàn bộ sân chơi
3 ForwarD n FD n Rùa đi về phía trước n bước
4 RighT k RT n Rùa quay phải k độ
11 Clean Xóa màn hình, Rùa vẫn ở vị trí
hiện tại
14 Print hoặc show Tính toán
Viết thủ tục hinhvuong
Nháy chuột vào ngăn gõ lệnh
Gõ lệnh edit “hinhvuong và nhấn phím enter
( gõ câu lệnh )
Lưu chọn File -> save and exit lưu trong bộ nhớ
Dùng lệnh save “ tên
( tập tin lưu mặc định ở C:\Program Files\Softronics\Microsoft Windows Logo) Tương tự cho thủ tục tamgiac và hinhtron
Gọi thủ tục nhập tên ở cửa số lệnh
to hinhvuong
Repeat 4 [fd 50 rt 90]
end
to tamgiac
Repeat 3 [fd 50 lt 120]
end
Trang 2to hinhtron
repeat 24 [fd 5 rt 15]
end
to hinh1
SETPENCOLOR 4
SETPENSIZE [3 3]
Repeat 4 [tamgiac fd 50 rt 90]
end
to hinh2
SETPENCOLOR 19
SETPENSIZE [3 3]
Repeat 6 [hinhvuong fd 50 rt 90 tamgiac lt 150] end
to hinh3
SETPENCOLOR 14
SETPENSIZE [3 3]
Rt 90
Repeat 5 [lt 45 hinhvuong rt 45 pu fd 18 pd] end
to hinh4
SETPENCOLOR 17
SETPENSIZE [3 3]
Repeat 10 [hinhvuong pu fd 58 pd rt 36]
end
to hinh5
SETPENCOLOR 13
SETPENSIZE [3 3]
Repeat 5 [tamgiac rt 72]
end
to hinh6
SETPENCOLOR 12
SETPENSIZE [3 3]
Repeat 2 [tamgiac rt 90 pu bk 25 pd lt 30] end
Trang 3to hinh7
SETPENCOLOR 7
SETPENSIZE [3 3]
Rt 45
Repeat 4 [hinhvuong rt 90]
Repeat 2 [pu fd 25 rt 90 pd]
hinhvuong
end
to hinh8
SETPENCOLOR 10
SETPENSIZE [3 3]
Rt 90
Repeat 2 [repeat 6 [tamgiac rt 60] pu fd 50 pd] end
to hinh9
SETPENCOLOR 9
SETPENSIZE [3 3]
Repeat 10 [hinhtron pu fd 70 pd rt 36]
end
to hinhtron
;hinh tron dac ruot
repeat 120 [ fd 10 bk 10 rt 3]
end
repeat 6 [fd 50 hinhtron rt 60]
repeat 8[fd 50 hinhtron rt 45]
to hinhtron
; hinh tron rong
repeat 24 [ fd 5 rt 15]
Trang 4repeat 24 [ hinhtron FD 15 rt 360/24]
To canhhoa
; vẽ cánh hoa
Repeat 6 [FD 10 BK 10 RT 60]
End
To hoatuyet
; vẽ bông hoa tuyết
Repeat 6 [FD 50 canhhoa BK 50 RT 60] End
to T1
; Bài T1-122 Q3 phoi hop hinh ve va van ban
CS SETPENCOLOR 4
REPEAT 30 [REPEAT 6 [FD 30 RT 60] RT 12]
PU BK 60 RT 90 BK 120
SETPENCOLOR 1
LABEL [ CHUC MUNG SINH NHAT ME ] end
To hinhvuonglaco
; lam la co
Repeat 4 [fd 20 rt 90]
end
To chongchong
; ve chong chong
Repeat 8 [fd 40 hinhvuonglaco bk 40 rt 360/8] end
To lucgiac
Repeat 6 [fd 30 rt 60]
End
To hinhhoc4
Repeat 6 [lucgiac fd 60 rt 360/6]
Trang 5To hinhvuong
Repeat 4 [fd 30 rt 90] End
To tamgiac
Repeat 3 [fd 30 rt 120] End
To ngoinha
Hinhvuong
Fd 30 rt 30
Tamgiac
End
To banhxe
HT
Repeat 12 [ngoinha] end