烽火少年老电影:制作logo有什么好创意
来源:百度文库 编辑:高考问答 时间:2024/04/29 04:34:52
你可以下载软件:Ulead GIF Animator 5
里面有很多模板,不用你磕破脑袋去创意的。
一定记得给我加分!
1、空心正多边形(包括空心正三角形、空心正方形)
TO KXZDBX :N :B
REPEAT :N[FD :B RT 360/:N]
END
说明::N是边数,应大于3,:B是边长。
2、实心正多边形(包括实心正三角形、实心正方形)
TO SXZDBX :N :B
IF :B<1 STOP
REPEAT :N[FD :B RT 360/:N]
SXZDBX :N :B-1
END
说明::N是边数,应大于3,:B是边长。
3、空心平行四边形(包括空心正方形、空心长方形、空心菱形)
TO KXPXSBX :B1 :B2 :J
REPEAT 2[FD :B1 RT :J FD :B2 RT 180-:J]
END
说明:1、:B1是第一个边的长,:B2是第二个边的长,:J是转角的度数。
2、若:B1与:B2相等,则:J等于90度时,画空心正方形,:J等于其他度数时画空心菱形。
3、若:B1与:B2不相等,则:J等于90度时,画空心长方形,:J等于其他度数时画普通空心平行四边形。
4、实心平行四边形(包括实心正方形、实心长方形、实心菱形)
TO SXPXSBX :B1 :B2 :J
IF OR :B1<1 :B2<1 STOP
REPEAT 2[FD :B1 RT :J FD :B2 RT 180-:J]
SXPXSBX :B1-1 :B2-1 :J
END
说明:1、:B1是第一个边的长,:B2是第二个边的长,:J是转角的度数。
2、若:B1与:B2相等,则:J等于90度时,画实心正方形,:J等于其他度数时画实心菱形。
3、若:B1与:B2不相等,则:J等于90度时,画实心长方形,:J等于其他度数时画普通实心平行四边形。
5、正多角星
TO ZDJX :N :B :K
REPEAT :N[FD :B RT :K*360/:N]
END
说明:1、:N是角数,:B是边长,:K是参数(1<:K<:N/2,且:K与:N无公约数)。
2、若:K等于1,画正多边形。
6、空心正多角星
TO KXZDJX :N :B
REPEAT :N[FD :B RT 360/:N*2 FD :B LT 360/:N]
END
说明::N是角数,:B是边长。
7、奇数多角星
TO JSDJX :N :B
REPEAT :N[FD :B RT 180-180/:N]
END
说明::N是角数(奇数),:B是边长。
8、立体五角星
TO LTWJX :B
REPEAT 5[FD :B RT 144 FD :B RT 54 FD :B*1.9 BK :B*1.9 LT 126]
END
说明::B是边长。
9、圆或者圆弧(起点和终点在圆周上)
TO YH :N :R
REPEAT :N[RT 5 FD :R*6.28/36 RT 5]
END
说明::N是圆弧大小,如36画圆,18画半圆弧,:R是半径。
10、实心圆或者实心半圆(起点和终点在圆周上)
TO SXYH :N :R
IF :R<1 STOP
REPEAT :N[RT 5 FD :R*6.28/36 RT 5]
HOME
SXYH :N :R-1
END
说明::N是圆弧大小,:N等于36画实心圆,:N等于18画实心半圆,:R是半径。
11、空心圆或者空心圆弧(包括空心扇形,起点和终点均在圆心上)
TO KXYH :N :R
PU LT 90 FD :R RT 90 PD
REPEAT :N[RT 5 FD :R*6.28/36 RT 5]
PU RT 90 FD :R LT 90 PD
END
说明::N是圆弧大小,如36画空心圆,18画空心半圆弧,:R是半径。
12、实心圆或者实心圆弧(包括实心扇形,起点和终点均在圆心上)
TO SXYH :N :R
IF :R<1 STOP
PU LT 90 FD :R RT 90 PD
REPEAT :N[RT 5 FD :R*6.28/36 RT 5]
HOME
SXYH :N :R-1
END
说明::N是圆弧大小,如36画实心圆,18画实心半圆弧,:R是半径。
1、求两个数当中最大的数
TO ZDS :X :Y
IF :X>:Y [OP :X][OP :Y]
END
说明:1、:X 和 :Y 是任意的两个数。
2、调用本工具过程的命令语句可以是: PR ZDS :X :Y 。
2、求两个数当中最小的数
TO ZXS :X :Y
IF :X<:Y [OP :X][OP :Y]
END
说明:1、:X 和 :Y 是任意的两个数。
2、调用本工具过程的命令语句可以是: PR ZXS :X :Y 。
3、求两个数的最大公约数
TO ZDGYS :X :Y
IF (REMAINDER :X :Y)=0 OP :Y
ZDGYS :Y (REMAINDER :X :Y)
END
说明:1、:X 和 :Y 是任意的两个正整数。
2、调用本工具过程的命令语句可以是: PR ZDGYS :X :Y 。
4、求两个数的最小公倍数
TO ZXGBS :X :Y
IF (REMAINDER :X :Y)=0 OP :Y
ZXGBS :Y (REMAINDER :X :Y)
END
说明:1、:X 和 :Y 是任意的两个正整数。
2、调用本工具过程的命令语句可以是: PR :X*:Y/ZXGBS :X :Y 。
3、求两个数的最小公倍数的工具过程与求两个数的最大公约数的工具过程是一样的,只是调用本工具过程的命令语句不同。
5、判断一个数是否是素数
TO PSS :X
MAKE “N 1
FOR “M 2 :X-1 [IF (REMAINDER :X :M)=0 MAKE “N 0]
IF :N=1 [OP “YES][OP “NO]
END
说明:1、:X 是任意的正整数。
2、调用本工具过程的命令语句可以是: PR PSS :X 。
6、计算自然数 N 的阶乘 N!
TO JC :N
MAKE “S 1
FOR “X 1 :N [MAKE “S :S*:X]
OP :S
END
说明:1、:N 是任意的自然数。
2、调用本工具过程的命令语句可以是: PR JC :X 。
1、测量一个字或者表的长度(方法一)
TO CZBC :ZB
IF EMPTY? :ZB OP 0
OP 1+CZBC BF :ZB
END
2、测量一个字或者表的长度(方法二)
TO CZBC :ZB
MAKE “N COUNT :ZB
PR :N
END
3、颠倒打印一个字
TO DDZ :Z
IF EMPTY? :Z OP“
OP WORD DDZ BF :Z FIRST :Z
END
4、颠倒打印一个表
TO DDB :B
IF EMPTY? :B OP[]
OP LPUT FIRST :B DDB BF :B
END
5、从 :Z 的左边连续取 N 个字符
TO ZBQ :Z :N
IF :N=1 [OP FIRST :Z]
OP WORD FIRST :Z ZBQ BF :Z :N-1
END
6、从 :N 的左边连续取 X 个字符或者元素
TO ZBQ :N :X
MAKE “Y COUNT :N
REPEAT :Y-:X[MAKE “N BL :N]
OP :N
END
7、从 :N 的右边连续取 X 个字符或者元素
TO YBQ :N :X
MAKE “Y COUNT :N
REPEAT :Y-:X [MAKE “N BF :N]
OP :N
END
8、从 :N 中的第 :X1 个位置起连续取 :X2 个字符或者元素
TO ZJQ :N :X1 :X2
MAKE “Y COUNT :N
REPEAT :X1-1 [MAKE “N BF :N]
REPEAT :Y-:X1+1-:X2[MAKE “N BL :N]
OP :N
END
9、在 :X 中的第 :N 个位置插入 :Y
TO CR :X :N :Y
IF :N=1 [OP WORD :Y :X]
OP WORD FIRST :X CR BF :X :N-1 :Y
END
10、判断回文字
TO PHWZ :X
IF :X=DDZ :X [OP “YES][OP “NO]
END
11、判断对称表
TO PDCB :X
IF :X=DDB :X [OP “YES][OP “NO]
END
你可以下载软件:AAA LOGO
观察哪!看看书,仔细观察周围事物,把它想象成一幅LOGO图。
具体是代表什么行业和产品的,这样有了明确的目标才有的创意