Planet Battle 3

[R4z0r1989]

sofort beim starten... aber nur wenn die andren daten bei sind Oo

[netzcoder]

Funktioniert es vielleicht so?

http://www.file-upload.net/download-190 ... t.exe.html

Was kommt eigentlich überhaupt für eine BlueScreenmeldung.

Also die funktioniert bei mir auch erste Sahne! Könntest du sagen wie du das machst?

EDIT: Doch nen Fehler! Wenn ich z.B nen Raumschiff baue springt der direkt wieder aus dem Planeten raus! Also Planet anklicken>> Schiff bauen! Dann muss ich wieder Planeten anklciken und nen Schiff bauen!

[kswb73]

Ist ein auf die schnelle Geschriebener Test.
Ich verwende hier nicht die Standard PureBasic MouseLibary, sondern Windows API. Dadurch berechnent Windows die Maus und dort funktioniert sie ja auch.

[netzcoder]

Aso okay!

[kswb73]

So, jetzt noch einmal die überarbeitete Version hochgeladen. Das ganze sollte jetzt bei jedem ohne Maus-gestottere laufen und Bluescreen ist hoffentlich auch weg. Link findet ihr im ersten Post. Gescrollt wird jetzt mit Plus und Minus, da ich keine Möglichkeit gefunden habe, das Maurad in Screen per Windows-API abzufragen.

[netzcoder]

Einfach diesen Code nehmen:

Code: Alles auswählen

Procedure.l WinCallback(hwnd, msg, wparam, lparam)
  result = #PB_ProcessPureBasicEvents
  Select msg
    Case #WM_MOUSEWHEEL
      If wparam < 0
        direction$ = "Scrolling towards user"
      Else
        direction$ = "Scrolling away from user"
      EndIf
      SetGadgetText(0, direction$)
  EndSelect
  ProcedureReturn result
EndProcedure
If OpenWindow(0, 0, 0, 300, 200, "Detect Mousewheel", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  SetWindowCallback(@WinCallback())
  TextGadget(0, 10, 50, 280, 25, "", #PB_Text_Center)
  Repeat
    event = WaitWindowEvent()
  Until event = #PB_Event_CloseWindow
EndIf
End

Danke für die neue Version

[kswb73]

Ja, den Code hab ich auch schon gefunden. Das Problem ist das ich ein Screen und nicht ein windows nutze. Da weiß ich leider nicht wie man das realisiert. (Außer windowedScreen, bordless und dann maximieren, was aber deutlich langsamer)

[netzcoder]

Oh sry das wusste ich nicht!

[FosJonas]

das spiel macht echt fun, besonders gelungen finde ich die ebenen der sterne.
vlt noch die möglichkeit geben eigene formationen zu machen? das würde bissl abwechslung bringen.

[netzcoder]

Und nen Multiplayer! Ich würds mal versuchen wenn du Lust hättest! Meld dich einfach per PN wenn du bock hast!