?? ch17ex03.pro
字號:
/*
Turbo Prolog 2.0 Chapter 17, Example Program 3
Copyright (c) 1986, 88 by Borland International, Inc
*/
constants
% To access your BGI drivers and fonts bgi_path may need to equal "..\\BGI".
bgi_path = ""
% To access the GRAPDECL.PRO file you may need to add a path:
% include "..\\programs\\GRAPDECL.PRO"
include "GRAPDECL.PRO"
goal
initgraph(detect, 0, GraphDriver, GraphMode, bgi_path),
rectangle(0, 0, 100, 100),
bar3d(100, 10, 200, 100, 5, 1),
bar(30, 30, 80, 80),
drawpoly([50, 100, 100, 100, 150, 150, 50, 100]),
fillpoly([50, 10, 90, 50, 50, 90, 10, 50]),
readchar(_),
closegraph.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -