Doppeltastenbetätigung =)

Übersicht

BlitzBasic

Allgemein

	Luciano Betreff: Doppeltastenbetätigung =)	So, März 13, 2005 14:40 Antworten mit Zitat
Hallo an alle! Ich habe hier den code au meinem Game herauskopiert, der es dem einen Spieler ermöglicht sich nach unten, obed, rechts und links zu bewegen. Ich möchte, dass wenn der Spieler die jeweilige Taste zweimal nacheinander inerhlab von einer halben sekunde drückt, er sich mit doppelter geschwindigkeit in die jeweilige richtung bewegt. Kann man das was mit Millisecs () machen? Danke für die Hilfe ;Bewegungen Spieler1 If KeyDown(205) Then ;Rechts RichtungSp1$ = "R" If ZeitS1 + 20 < MilliSecs() Then W1 = W1 + 6 ZeitS1 = MilliSecs() EndIf EndIf If KeyDown(203) Then ;Links RichtungSp1$ = "L" If ZeitS1 + 20 < MilliSecs() Then W1 = W1 - 6 ZeitS1 = MilliSecs() End If EndIf If KeyDown(208) Then ;Oben If ZeitS1 + 20 < MilliSecs() Then S1 = S1 + 6 ZeitS1 = MilliSecs() End If EndIf If KeyDown(200) Then ;Unten If ZeitS1 + 20 < MilliSecs() Then S1 = S1 - 6 ZeitS1 = MilliSecs() End If End If

Luciano

Betreff: Doppeltastenbetätigung =)

So, März 13, 2005 14:40
Antworten mit Zitat

Hallo an alle!
Ich habe hier den code au meinem Game herauskopiert, der es dem einen Spieler ermöglicht sich nach unten, obed, rechts und links zu bewegen.
Ich möchte, dass wenn der Spieler die jeweilige Taste zweimal nacheinander inerhlab von einer halben sekunde drückt, er sich mit doppelter geschwindigkeit in die jeweilige richtung bewegt.
Kann man das was mit Millisecs () machen?
Danke für die Hilfe

;Bewegungen Spieler1
If KeyDown(205) Then ;Rechts
RichtungSp1$ = "R"

If ZeitS1 + 20 < MilliSecs() Then
W1 = W1 + 6
ZeitS1 = MilliSecs()
EndIf

EndIf

If KeyDown(203) Then ;Links
RichtungSp1$ = "L"

If ZeitS1 + 20 < MilliSecs() Then
W1 = W1 - 6
ZeitS1 = MilliSecs()
End If

EndIf

If KeyDown(208) Then ;Oben

If ZeitS1 + 20 < MilliSecs() Then
S1 = S1 + 6
ZeitS1 = MilliSecs()
End If

EndIf

If KeyDown(200) Then ;Unten

If ZeitS1 + 20 < MilliSecs() Then
S1 = S1 - 6
ZeitS1 = MilliSecs()
End If

End If

	simi	So, März 13, 2005 14:48 Antworten mit Zitat
Hi, ich würde das etwa so machen: Code: [AUSKLAPPEN] [EINKLAPPEN] if MouseHit(1) then mh1=1 if Millisecs()-time <= ZuWArtendeZeit then mh1=2 time = Millisecs() end if Dann ist 1 = Normaler Klick und 2 = Doppelklick....

simi

So, März 13, 2005 14:48
Antworten mit Zitat

Hi, ich würde das etwa so machen:
Code: [AUSKLAPPEN]

if MouseHit(1) then
mh1=1
if Millisecs()-time <= ZuWArtendeZeit then mh1=2
time = Millisecs()
end if

Dann ist 1 = Normaler Klick und 2 = Doppelklick....

	Sebastian	So, März 13, 2005 17:27 Antworten mit Zitat
Hi,ich würde das so machen: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Repeat If MouseHit(1) Then Delay 500 ; 1000 = 1Sec If MouseHit(1) Then Print \"Doppelklick\" Else Print \"Einfach klick\" EndIf Until KeyHit(1) Genau das Gleiche wie Simi bloß ohne Millisecs() ..... Ps: Gruß an die Admins der BB-Code sieht Klasse aus !!
Seit 2 Jahren kein BlitzBasic und kein Windows mehr, und stolz darauf !

Sebastian

So, März 13, 2005 17:27
Antworten mit Zitat

Hi,ich würde das so machen:
BlitzBasic: [AUSKLAPPEN]


Repeat 
If MouseHit(1) Then 
	Delay 500 ; 1000 = 1Sec
	If MouseHit(1) Then Print \"Doppelklick\" Else Print \"Einfach klick\"
EndIf  
Until KeyHit(1)

Genau das Gleiche wie Simi bloß ohne Millisecs() .....

Ps: Gruß an die Admins der BB-Code sieht Klasse aus !!

Seit 2 Jahren kein BlitzBasic und kein Windows mehr, und stolz darauf !

	Artemis	So, März 13, 2005 18:12 Antworten mit Zitat
KEIN DELAY wenn du 4* 500 millisecs delay hast, wird dein programm 2 sekunden pro schleifendurchlauf angehalten!!! Das ist einfach sch****!! Luciano hör nicht auf Sebastian! [EDIT] Das mit dem "Mousehit(1)" musst du natürlich durch "Keyhit(TastenScancode)" ersetzen. [/EDIT]

Artemis

So, März 13, 2005 18:12
Antworten mit Zitat

KEIN DELAY
wenn du 4* 500 millisecs delay hast, wird dein programm 2 sekunden pro schleifendurchlauf angehalten!!!
Das ist einfach sch****!!
Luciano hör nicht auf Sebastian!

[EDIT]
Das mit dem "Mousehit(1)" musst du natürlich durch "Keyhit(TastenScancode)" ersetzen.
[/EDIT]

	Luciano	So, März 13, 2005 21:25 Antworten mit Zitat
Merci an alle ja di Lösung mit millisecs hatte ich auch vor sonst stockt das ganze system =) Danke Gruss luciano

Luciano

So, März 13, 2005 21:25
Antworten mit Zitat

Merci an alle
ja di Lösung mit millisecs hatte ich auch vor
sonst stockt das ganze system =)

Danke

Gruss luciano

	Sebastian	Fr, März 18, 2005 12:52 Antworten mit Zitat
Naja das stimmt mit den 2 min natürlich ...... Ich wollte ja nur mal zeigen das es die Möglichkeit auch gibt , wenn sie auch nicht sehr praxis tauglich ist.........
Seit 2 Jahren kein BlitzBasic und kein Windows mehr, und stolz darauf !

Sebastian

Fr, März 18, 2005 12:52
Antworten mit Zitat

Naja das stimmt mit den 2 min natürlich ......

Ich wollte ja nur mal zeigen das es die Möglichkeit auch gibt , wenn sie auch nicht sehr praxis tauglich ist.........

Seit 2 Jahren kein BlitzBasic und kein Windows mehr, und stolz darauf !

Übersicht

BlitzBasic

Allgemein

Nach Oben

BlitzBasic Portal

Doppeltastenbetätigung =)

Luciano

Betreff: Doppeltastenbetätigung =)

simi

Sebastian

Artemis

Luciano

Sebastian