ChatterBox

BlitzPlus Forums/BlitzPlus Beginners Area/ChatterBox

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Just so you know, I don't know how to indent...
Graphics 800,600,0,2
SeedRnd MilliSecs()
		Global x=Rand(1,800)
		Global y=Rand(1,600)
		Global x1=400
		Global y1andx2=5
		Global y2andy3=595
		Global x3=795
		Global NewDot
		Global NewDot2
		Global whattodo=Rand(1,1)
	While Not KeyDown(1)
Color 0,255,0
			Plot x1,y1andx2
			Plot y1andx2,y2andy3
			Plot x3,y2andy3
			Plot x,y
			Delay 5000
	If whattodo = 1 Then
NewDot=x+x1/2
NewDot2=y+y1andx2/2
Plot NewDot,NewDot2
	EndIf
	Wend
End




It doesn't make another dot between them, it makes a triangle...


I'll work on it.