Sehr elastisches Gummiband =) [Trägheit] von ???
[code:1:fb962d635b]
Graphics 800,600,32,0

SetBuffer BackBuffer()
Repeat
Cls
If KeyHit(1) Then End
mx=MouseX()
my=MouseY()
If mx>pos_x# Then speedx#=speedx#+0.1
If mx<pos_x# Then speedx#=speedx#-0.1
If my>pos_y# Then speedy#=speedy#+0.1
If my<pos_y# Then speedy#=speedy#-0.1
pos_x#=pos_x#+speedx#
pos_y#=pos_y#+speedy#
Oval pos_x#-5,pos_y#-5,10,10
Oval mx-5,my-5,10,10
Line pos_x#,pos_y#,mx,my
Flip
Forever
[/code:1:fb962d635b]
===
von ???
hehe...das ist lustig

Aber der Gummi sollte sich anch einer gewissen Zeit von alleine ziehen
===
von ???
lol

is ja cool
===
von ???
Hi!
cool! wenn man den Radius einschränkt, könnte man daraus für ein Spiel
auch eine Schleuder oder so bauen.
mfg olli
===
von ???
hab das schon irgendwie versucht mit radius einschränken
aber speedx&y müssen sich ja trotzdem noch ausgleichen...

und ungleiche werte lassen das dumm aussehen...hmm
===
von ???
vielleicht solltest du noch sowas einbauen, das der ball der durch die gegend geschleudert wird irgendwann auf dem anderen stehen bleibt!
===
von ???
krass :shock:

übrigens cool zu sehen, wieviele möglichkeiten es gibt um eine schleife zu kreieren :lol: hier mal die variante: "ich wiederhol für immer und frag die esc taste in ner if klausel ab" 8)
===
von ???
ich benutz immer die forever scleife und frag esc ab
sonst hängt sich mein pc beim beenden manchmal auf :?



Suche:
(unterstützt mySQL Wildcards ala %)
Titel:
Text:
Autor: