Hallo.
Bin jetzt an dem punkt, wo ich nicht mehr "spielen" will, ich habe nun angefangen eine sub"Line" zu bauen, aber irgendwo habe ich da nen denkfehler

im moment ist es schon ganz schön schlech gecoded aber optimiert wird hinterher.
im hauptprogramm rufe ich x= y= x2= y=2 danach die sub. meint ihr man sollte das als funktion schrieben (geht das in Bascom überhaupt?)


Code:
Line:

'lX ursprung x
'lY ursprung y
'lX2 ziel x
'lY2 ziel y

Lx = X
Ly = Y

Lx2 = X2
Ly2 = Y2

Z = 0                                                       'hell

Do

Porta = Lx
Portc = Ly

If Lx < Lx2 Then Incr Lx
If Ly < Lx2 Then Incr Ly

If Lx > Lx2 Then Decr Lx
If Ly > Lx2 Then Decr Ly

Waitus 10

Loop Until Lx = Lx2 And Ly = Ly2

Z = 1                                                       ' dunkel

Return
[/code]