Teeth
Author |
Message |
kirsty_16
|
Posted: Thu Oct 30, 2003 1:08 pm Post subject: Teeth |
|
|
Hey again
Thankyou to whoever helped me out with the eyes!! It was a big help
Does anyone know how to make or draw teeth for a program? I f anyone can or knows please help!!  |
|
|
|
|
 |
Sponsor Sponsor

|
|
 |
hackman
|
Posted: Fri Oct 31, 2003 11:33 am Post subject: (No subject) |
|
|
Hmm i cant realy think of anything. Maby...
Thats all i can think of. Or you could always do a bunch or Draw.Lines |
|
|
|
|
 |
Regole
|
Posted: Fri Oct 31, 2003 12:57 pm Post subject: (No subject) |
|
|
or you could always use the drawfillarc command
code: |
drawfillarc(x,y,r1,r2,a1,a2,c)
|
where x and y are the location, r1 and r2 are the radius, and a1 and a2 are the initial and final angles, and c is the colour |
|
|
|
|
 |
AsianSensation
|
Posted: Fri Oct 31, 2003 6:37 pm Post subject: (No subject) |
|
|
code: | proc DrawTeeth (x, steepness : int)
var d := 1
var tempx := x
var tempy := 0
for rep : 1 .. 1001
drawdot (tempx, tempy, 7)
if tempy >= 100 then
d := -1
elsif tempy <= 0 then
d := 1
end if
tempy += d
if tempy mod steepness = 0 then
tempx += 1
end if
end for
end DrawTeeth
DrawTeeth (200, 10) |
very simple code, didn't feel like shading it...enjoy |
|
|
|
|
 |
Andy
|
Posted: Fri Oct 31, 2003 10:15 pm Post subject: (No subject) |
|
|
asian, instead of drawing dots, u should drawlines from the last location to the new location, its much better |
|
|
|
|
 |
thoughtful

|
Posted: Sat Nov 01, 2003 12:23 pm Post subject: My teeth generator |
|
|
Here is a teeth generator i made
code: |
proc ThoughtTeeth (x, y, xlength, height, number, colr : int)
var tempx : array 1 .. number of int
var mid : int := round ((xlength / number) / 2)
for i : 1 .. number
tempx (i) := round (xlength / number) * i
end for
drawline (x, y, x + mid, y + height, colr)
drawline (x + mid, y + height, x + tempx (1), y, colr)
for i : 2 .. number
drawline (x + tempx (i - 1), y, x + tempx (i - 1) + mid, y + height, colr)
drawline (x + tempx (i - 1) + mid, y + height, x + tempx (i), y, colr)
end for
end ThoughtTeeth
ThoughtTeeth (10, 10, 100, 50, 10, red)
% Syntaxt: ThoughtTeeth (xposition,yposition,total_x_width,height,number %of teeth,color )
|
|
|
|
|
|
 |
AsianSensation
|
Posted: Sat Nov 01, 2003 7:51 pm Post subject: (No subject) |
|
|
dodge_tomahawk wrote: asian, instead of drawing dots, u should drawlines from the last location to the new location, its much better
I know, but I was trying to use RGB effects, like have the teeth go slowly yellow, and it's easier to do that with drawdot, but then I realized that I have work to do, and didn't spend much time on it. I'll do it later, when I'm done all the assignments and projects. |
|
|
|
|
 |
Andy
|
Posted: Sun Nov 02, 2003 3:03 pm Post subject: (No subject) |
|
|
lol, i heard u die in the movie.... i so want to see that |
|
|
|
|
 |
Sponsor Sponsor

|
|
 |
|
|