warum ende???

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

 

blitz

Betreff: warum ende???

BeitragFr, Apr 22, 2005 21:53
Antworten mit Zitat
Benutzer-Profile anzeigen
bei mir zumindest beendet sich das programm immer, wieso???
BlitzBasic: [AUSKLAPPEN]

;optionen / auflösung
.optionenauflosung
Cls
Flip
Cls
SetFont comicsansms30
Repeat
mx=MouseX()
my=MouseY()
Locate 30,20
Print \"Die derzeitige Auflösung beträgt \" + lange + \" * \" + breite
DrawImage links, 50, 100
DrawImage rechts, 150, 100
DrawImage pointer, mx, my
If ImagesOverlap(pointer, mx, my, links, 50, 100) Then
Cls
DrawImage links2, 50, 100
DrawImage rechts, 150, 100
Locate 30,20
Print \"Die derzeitige Auflösung beträgt \" + lange + \" * \" + breite
DrawImage pointer, mx, my
If MouseDown(1)=1 Then
lange=lange/2
breite=breite/2
Delay 500
EndIf
EndIf
If ImagesOverlap(pointer, mx, my, rechts, 150, 100) Then
Cls
DrawImage links, 50, 100
DrawImage rechts2, 150, 100
Locate 30,20
Print \"Die derzeitige Auflösung beträgt \" + lange + \" * \" + breite
DrawImage pointer, mx, my
If MouseDown(1)=1 Then
Delay 500
lange=lange*2
breite=breite*2
EndIf
EndIf
Flip
Cls
Until KeyHit(1)=1
End


die kürzung so recht???
  • Zuletzt bearbeitet von blitz am Fr, Apr 22, 2005 22:47, insgesamt einmal bearbeitet

diGGa

GruppenKaspar

BeitragFr, Apr 22, 2005 22:03
Antworten mit Zitat
Benutzer-Profile anzeigen
ich hab echt keinen bock mir deinen spagetti code anzugucken... aber es kann schon am " If MouseDown(1)=1 Then End" liegen. das mousedown nimmt auch befehle an die vorher gemacht worden sind, kann sein das n mousedown noch aufm stack lag...
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram

Hubsi

BeitragFr, Apr 22, 2005 22:11
Antworten mit Zitat
Benutzer-Profile anzeigen
Du meinst MouseHit(), digga Very Happy

Editier hier den Code zusammen auf die problematische Stelle. Erstens ist es lästig wenn der Server so lange braucht um den Code zu formatieren (Links, Farben) und zum anderen tut sich kaum einer das Gewurstel an, zumal Deine Problembeschreibung auch recht dürftig ist Very Happy
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

diGGa

GruppenKaspar

BeitragFr, Apr 22, 2005 22:19
Antworten mit Zitat
Benutzer-Profile anzeigen
aja.. hatte gedacht bei mousedown nimmt ders auch mit... is ja auch egal:

wenn du drückst -> wechselst zum menü -> maustaste noch kurz gedrückt -> program nimmt war -> beendet

das hab ich gemeint
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram
 

blitz

Betreff: -

BeitragFr, Apr 22, 2005 22:46
Antworten mit Zitat
Benutzer-Profile anzeigen
da komm ich jetzt nicht mehr mit.
also: es hat funktioniert dann hab ich das delay reingetan, da es sonst zu schnell wäre. sobald es über war beendetete es sich. hab das delay rausgetan und es gib auch wieder nicht???????????

diGGa

GruppenKaspar

BeitragFr, Apr 22, 2005 22:50
Antworten mit Zitat
Benutzer-Profile anzeigen
ma ne frage, wann beendet es sich? wen man drückt irgendwo oder sofort?
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram
 

blitz

BeitragFr, Apr 22, 2005 22:59
Antworten mit Zitat
Benutzer-Profile anzeigen
also es startet, wenn man dann auf optionen klickt is es weg

diGGa

GruppenKaspar

BeitragFr, Apr 22, 2005 23:20
Antworten mit Zitat
Benutzer-Profile anzeigen
mach mal hinter das

.optionenauflosung


flushmouse()
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragFr, Apr 22, 2005 23:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Machs mit Mousehit (1) wie mit mx my
dann sollte das Problem gelöst sein
[BB2D | BB3D | BB+]
 

blitz

Betreff: -

BeitragFr, Apr 22, 2005 23:27
Antworten mit Zitat
Benutzer-Profile anzeigen
das hat funktioniert, danke!!!
 

blitz

Betreff: -

BeitragSa, Apr 23, 2005 20:17
Antworten mit Zitat
Benutzer-Profile anzeigen
doch wieder vorgekommen und dann wieder nicht.
bin auf den fehler draufgekommen:
wenn man kurz drückt kein ende
wenn man lang drückt ende
=> er rechnet mir den druk bei den zweiten auch an und da dieser auf ende eingestellt ist => ende

Alfadur

BeitragSa, Apr 23, 2005 21:40
Antworten mit Zitat
Benutzer-Profile anzeigen
am besten du machst das mit den tasten so :

global MAUSHIT_1
global MAUSHIT_2
global MAUSDOWN_1 usw

repeat
MAUSHIT_1=Mousehit(1)
MAUSHIT_2=Mousehit(2)

if MAUSHIT_1 then usw

until weißdergeier
A Cray is the only computer that runs an endless loop in less than four hours.
 

Dohlä

BeitragSo, Apr 24, 2005 10:39
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich finde das programm cool!!!!!!!! Exclamation
 

FBI-blitz

BeitragSo, Apr 24, 2005 11:31
Antworten mit Zitat
Benutzer-Profile anzeigen
ich würde eben nicht mit goto arbeiten! Wink
Computer 1: AMD Athlon64 3500+ | nVidia GF 7900GT | 1024 MB DDR-RAM | ASUS A8N-SLI Preimium | 250 GB SATA 2 || WindowsXP | Blitz3D | Blitz+
Computer 2: AMD AthlonXP 2400+ | ATI Radeon 9500 | 512 MB DDR-RAM | MSI K7N2 | 80 GB IDE | 160 GB IDE || WindowsXP | Blitz3D | Blitz+
Computer 3: Intel Pentium MMX | onBoard-Grafik | 32 MB RAM | 1 GB IDE || Windows 98 SE | Blitz+

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group