gelöst

Übersicht

BlitzBasic

Beginners-Corner

	Niklas 3D Betreff: gelöst	Sa, Aug 15, 2009 10:44 Antworten mit Zitat
Ich habe nur eine kleine Frage: Das ist mein Programmtext; Es soll ein Fadenkreus anzeigen das sich bewegen kann mit Hilfe der Pfeiltasten! Und dabei soll ein Bild über den Bildschirm laufen was ich abknallen kann! Wie kann ich es umschreiben das, dass Bild gleichzeitig mit dme Fadenkreuz angezeigt wird und wie kann ich den Gegenstand dann abballern!!! Code: [AUSKLAPPEN] [EINKLAPPEN] Global PosY, PosX PosY=MouseY() PosX=MouseX() Global Ende Graphics 640, 480, 16, 1 Global Grafik SetBuffer BackBuffer () Grafik = LoadImage ("C:\Dokumente und Einstellungen\User1\Desktop\images.jpeg") For x = 1 To 400 DrawImage Grafik, x, 100 Next Color 255,255,255 While Ende = 0 Color 0,0,0 Rect 0,0,639,479,1 If KeyDown(1) Then Ende = 1 If KeyDown(200) Then PosY = PosY -1 If KeyDown(208) Then PosY = PosY +1 If KeyDown(203) Then PosX = PosX -1 If KeyDown(205) Then PosX = PosX + 1 If PosY > 460 Then MouseY = 460 If PosY < 20 Then MouseY = 20 If PosX > 620 Then MouseX = 620 If PosX < 20 Then MouseX = 20 Color 255,255,255 Line PosX - 10, PosY, PosX + 10, PosY Line PosX, PosY - 10, PosX, PosY + 10 Flip Wend
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Betreff: gelöst

Sa, Aug 15, 2009 10:44
Antworten mit Zitat

Ich habe nur eine kleine Frage:

Das ist mein Programmtext;
Es soll ein Fadenkreus anzeigen
das sich bewegen kann mit Hilfe der Pfeiltasten!

Und dabei soll ein Bild über den Bildschirm laufen was ich abknallen kann!
Wie kann ich es umschreiben das, dass Bild gleichzeitig mit dme Fadenkreuz
angezeigt wird und wie kann ich den Gegenstand dann abballern!!!

Code: [AUSKLAPPEN]

Global PosY, PosX
PosY=MouseY()
PosX=MouseX()
Global Ende
Graphics 640, 480, 16, 1
Global Grafik
SetBuffer BackBuffer ()
Grafik = LoadImage ("C:\Dokumente und Einstellungen\User1\Desktop\images.jpeg")
For x = 1 To 400
DrawImage Grafik, x, 100
Next
Color 255,255,255
While Ende = 0
Color 0,0,0
Rect 0,0,639,479,1
If KeyDown(1) Then Ende = 1
If KeyDown(200) Then PosY = PosY -1
If KeyDown(208) Then PosY = PosY +1
If KeyDown(203) Then PosX = PosX -1
If KeyDown(205) Then PosX = PosX + 1
If PosY > 460 Then MouseY = 460
If PosY < 20 Then MouseY = 20
If PosX > 620 Then MouseX = 620
If PosX < 20 Then MouseX = 20

Color 255,255,255
Line PosX - 10, PosY, PosX + 10, PosY
Line PosX, PosY - 10, PosX, PosY + 10

Flip
Wend

Ultra schnelle Datengrüße sendet dir Niklas

Zuletzt bearbeitet von Niklas 3D am So, Aug 16, 2009 11:12, insgesamt 5-mal bearbeitet

	Nicdel	Sa, Aug 15, 2009 10:47 Antworten mit Zitat
Mach den Code in Codeboxen und verwende nicht so viele Smileys. Bei mir geht der Code einwandfrei.
Desktop: Intel Pentium 4 2650 Mhz, 2 GB RAM, ATI Radeon HD 3850 512 MB, Windows XP Notebook: Intel Core i7 720 QM 1.6 Ghz, 4 GB DDR3 RAM, nVidia 230M GT, Windows 7

Nicdel

Sa, Aug 15, 2009 10:47
Antworten mit Zitat

Mach den Code in Codeboxen und verwende nicht so viele Smileys. Bei mir geht der Code einwandfrei.

Desktop: Intel Pentium 4 2650 Mhz, 2 GB RAM, ATI Radeon HD 3850 512 MB, Windows XP
Notebook: Intel Core i7 720 QM 1.6 Ghz, 4 GB DDR3 RAM, nVidia 230M GT, Windows 7

	Niklas 3D	Sa, Aug 15, 2009 10:49 Antworten mit Zitat
Es könnte sein das der Code nicht bei mir fnktioniert, weil ich die Demo Version habe aber damit arbeite ich schon 1 jahr
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 15, 2009 10:49
Antworten mit Zitat

Es könnte sein das der Code nicht bei mir fnktioniert, weil ich die Demo Version habe aber damit arbeite ich schon 1 jahr

Ultra schnelle Datengrüße sendet dir Niklas

	ToeB	Sa, Aug 15, 2009 11:05 Antworten mit Zitat
Lösch mal alle Minus zeichen und mach dort einen "-" (Rechts neben Punkt/doppelpunkt auf der Tastertur) Das problem ist nur, das dein Comiler das zeichen nicht erkennt (tut meiner zumindest nicht). mfg ToeB
Religiöse Kriege sind Streitigkeiten erwachsener Männer darum, wer den besten imaginären Freund hat. Race-Project - Das Rennspiel der etwas anderen Art SimpleUDP3.0 - Neuste Version der Netzwerk-Bibliothek Vielen Dank an dieser Stelle nochmal an Pummelie, welcher mir einen Teil seines VServers für das Betreiben meines Masterservers zur verfügung stellt!

ToeB

Sa, Aug 15, 2009 11:05
Antworten mit Zitat

Lösch mal alle Minus zeichen und mach dort einen "-" (Rechts neben Punkt/doppelpunkt auf der Tastertur)

Das problem ist nur, das dein Comiler das zeichen nicht erkennt (tut meiner zumindest nicht).

mfg ToeB

Religiöse Kriege sind Streitigkeiten erwachsener Männer darum, wer den besten imaginären Freund hat.
Race-Project - Das Rennspiel der etwas anderen Art
SimpleUDP3.0 - Neuste Version der Netzwerk-Bibliothek
Vielen Dank an dieser Stelle nochmal an Pummelie, welcher mir einen Teil seines VServers für das Betreiben meines Masterservers zur verfügung stellt!

	Niklas 3D	Sa, Aug 15, 2009 11:17 Antworten mit Zitat
Klappt leider nicht
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 15, 2009 11:17
Antworten mit Zitat

Klappt leider nicht Crying or Very sad

Ultra schnelle Datengrüße sendet dir Niklas

	Mathe	Sa, Aug 15, 2009 11:24 Antworten mit Zitat
Hallo Niklas, Du hast in der 10 Zeile folgendes stehen: Code: [AUSKLAPPEN] [EINKLAPPEN] If KeyDown(200) Then PosY = PosY !?! - 1 das müsste aber: Code: [AUSKLAPPEN] [EINKLAPPEN] If KeyDown(200) Then PosY = PosY - 1 heißen du hast versehentlich !?! rein geschrieben. Edit: Sorry für unnützen Antwort. Nachträglich erst gesehen das !?! eine Markierung der Codestelle ist. mfg. Matthias
Windoof nein DANKE => ArchLinux

Mathe

Sa, Aug 15, 2009 11:24
Antworten mit Zitat

Hallo Niklas,

Du hast in der 10 Zeile folgendes stehen:

Code: [AUSKLAPPEN]

If KeyDown(200) Then PosY = PosY !?! - 1

das müsste aber:

Code: [AUSKLAPPEN]

If KeyDown(200) Then PosY = PosY - 1

heißen du hast versehentlich !?! rein geschrieben.

Edit:
Sorry für unnützen Antwort. Nachträglich erst gesehen das !?! eine Markierung der Codestelle ist. Embarassed

mfg.
Matthias

Windoof nein DANKE => ArchLinux Wink

Zuletzt bearbeitet von Mathe am Sa, Aug 15, 2009 11:38, insgesamt 2-mal bearbeitet

	Niklas 3D	Sa, Aug 15, 2009 11:27 Antworten mit Zitat
Nein, ich habe nur die Stelle makiert wo er nach der Fehlermeldng den cursor hinsetzt
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 15, 2009 11:27
Antworten mit Zitat

Nein, ich habe nur die Stelle makiert wo er nach der Fehlermeldng den cursor hinsetzt

Ultra schnelle Datengrüße sendet dir Niklas

	Mathe	Sa, Aug 15, 2009 11:33 Antworten mit Zitat
Ah okey... Bei deinen Code erkennt BB bei mir die Minuszeichen nicht. Hast du den Code direkt in BB geschrieben oder hast du ihn rein kopiert?
Windoof nein DANKE => ArchLinux

Mathe

Sa, Aug 15, 2009 11:33
Antworten mit Zitat

Ah okey...

Bei deinen Code erkennt BB bei mir die Minuszeichen nicht.
Hast du den Code direkt in BB geschrieben oder hast du ihn rein kopiert?

Windoof nein DANKE => ArchLinux Wink

	Niklas 3D	Sa, Aug 15, 2009 11:41 Antworten mit Zitat
Ich hab in reinkopiert
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 15, 2009 11:41
Antworten mit Zitat

Ich hab in reinkopiert

Ultra schnelle Datengrüße sendet dir Niklas

	Niklas 3D	Sa, Aug 15, 2009 11:45 Antworten mit Zitat
Jetzt klappt es Vielen Dank Mathe
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 15, 2009 11:45
Antworten mit Zitat

Jetzt klappt es Vielen Dank Mathe

Ultra schnelle Datengrüße sendet dir Niklas

	Mathe	Sa, Aug 15, 2009 11:51 Antworten mit Zitat
kein Problem Edit: @ToeB tja mfg. Matthias
Windoof nein DANKE => ArchLinux

Mathe

Sa, Aug 15, 2009 11:51
Antworten mit Zitat

kein Problem

Edit:
@ToeB
tja Very Happy

mfg.
Matthias

Windoof nein DANKE => ArchLinux Wink

Zuletzt bearbeitet von Mathe am Sa, Aug 15, 2009 13:40, insgesamt einmal bearbeitet

	ToeB	Sa, Aug 15, 2009 12:06 Antworten mit Zitat
Das hab ich doch auch gesagt mfg ToeB p.s. : Keine Doppel posts
Religiöse Kriege sind Streitigkeiten erwachsener Männer darum, wer den besten imaginären Freund hat. Race-Project - Das Rennspiel der etwas anderen Art SimpleUDP3.0 - Neuste Version der Netzwerk-Bibliothek Vielen Dank an dieser Stelle nochmal an Pummelie, welcher mir einen Teil seines VServers für das Betreiben meines Masterservers zur verfügung stellt!

ToeB

Sa, Aug 15, 2009 12:06
Antworten mit Zitat

Das hab ich doch auch gesagt Wink

mfg ToeB

p.s. : Keine Doppel posts Rolling Eyes

	Niklas 3D	Sa, Aug 22, 2009 16:09 Antworten mit Zitat
auch danke toeb
Ultra schnelle Datengrüße sendet dir Niklas

Niklas 3D

Sa, Aug 22, 2009 16:09
Antworten mit Zitat

auch danke toeb

Ultra schnelle Datengrüße sendet dir Niklas

Übersicht

BlitzBasic

Beginners-Corner

Nach Oben

BlitzBasic Portal

gelöst

Betreff: gelöst