dim var problem

Übersicht

BlitzBasic

Beginners-Corner

	US-Blitz ehemals "SimssmiS" Betreff: dim var problem	Do, Aug 19, 2010 0:14 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] Graphics 270,220,32,2 SetBuffer BackBuffer() nb=LoadImage("Graphics\noteback.jpg") pen=LoadImage("Graphics\pen.png") Point=LoadImage("Graphics\point.bmp") MaskImage pen,255,255,255 HidePointer Dim pointx(100000) Dim pointy(100000) i=1 Repeat mdown=MouseDown(1) Cls Text 0,0,mdown DrawImage nb,0,0 For i2=0 To i DrawImage point,pointx(i),pointy(i) Next If Mdown=1 Then i=i+1 pointx(i)=MouseX() And pointy(i)=MouseY() DrawImage pen,MouseX(),MouseY()-22 Text 30,30,pointx(1) Flip Until KeyHit(1) End pointx(1-100000) und pointy(1-100000) bleiben immer 0 auch wenn ich die maus drücke warum

US-Blitz

ehemals "SimssmiS"

Betreff: dim var problem

Do, Aug 19, 2010 0:14
Antworten mit Zitat

Code: [AUSKLAPPEN]

Graphics 270,220,32,2
SetBuffer BackBuffer()
nb=LoadImage("Graphics\noteback.jpg")
pen=LoadImage("Graphics\pen.png")
Point=LoadImage("Graphics\point.bmp")
MaskImage pen,255,255,255
HidePointer
Dim pointx(100000)
Dim pointy(100000)
i=1
Repeat
mdown=MouseDown(1)
Cls
Text 0,0,mdown
DrawImage nb,0,0
For i2=0 To i
DrawImage point,pointx(i),pointy(i)
Next
If Mdown=1 Then i=i+1 pointx(i)=MouseX() And pointy(i)=MouseY()
DrawImage pen,MouseX(),MouseY()-22
Text 30,30,pointx(1)
Flip
Until KeyHit(1)
End

pointx(1-100000) und pointy(1-100000) bleiben immer 0 auch wenn ich die maus drücke warum

	Xeres Moderator	Do, Aug 19, 2010 0:18 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] If Mdown=1 Then i=i+1 pointx(i)=MouseX() And pointy(i)=MouseY() Was soll das AND dazwischen? Nimm den Doppelpunkt um mehrere Befehle in einer Zeile sichtbar ab zu trennen. Einrückungen und Absätze im Code helfen bei der Übersicht.
Win10 Prof.(x64)/Ubuntu 16.04\|CPU 4x3Ghz (Intel i5-4590S)\|RAM 8 GB\|GeForce GTX 960 Wie man Fragen richtig stellt \|\| "Es geht nicht" \|\| Video-Tutorial: Sinus & Cosinus THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Xeres

Moderator

Do, Aug 19, 2010 0:18
Antworten mit Zitat

Code: [AUSKLAPPEN]

If Mdown=1 Then i=i+1 pointx(i)=MouseX() And pointy(i)=MouseY()

Was soll das AND

dazwischen? Nimm den Doppelpunkt um mehrere Befehle in einer Zeile sichtbar ab zu trennen. Einrückungen und Absätze im Code helfen bei der Übersicht.

Win10 Prof.(x64)/Ubuntu 16.04|CPU 4x3Ghz (Intel i5-4590S)|RAM 8 GB|GeForce GTX 960
Wie man Fragen richtig stellt || "Es geht nicht" || Video-Tutorial: Sinus & Cosinus
THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

	Silver_Knee	Do, Aug 19, 2010 14:13 Antworten mit Zitat
ich schlage vor mach am besten BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] If Mdown=1 Then i=i+1 pointx(i)=MouseX() pointy(i)=MouseY() EndIf Dann bist du auf der sicheren Seite

Silver_Knee

Do, Aug 19, 2010 14:13
Antworten mit Zitat

ich schlage vor mach am besten
BlitzBasic: [AUSKLAPPEN]

If Mdown=1 Then 
  i=i+1
  pointx(i)=MouseX() 
  pointy(i)=MouseY() 
EndIf

Dann bist du auf der sicheren Seite