Ich wollte schon ganz Wütend auf die Tastatur hämmernsix1 hat geschrieben: ↑Do 23. Dez 2021, 12:26Projekt liegt nun auch auf Github
https://github.com/six1/WarpSpaceCraft
Ganz tolles Projekt
Ich wollte schon ganz Wütend auf die Tastatur hämmernsix1 hat geschrieben: ↑Do 23. Dez 2021, 12:26Projekt liegt nun auch auf Github
https://github.com/six1/WarpSpaceCraft
Kannst du das auch in dein GitHub-Repo stellen?!
Ich habe es mittlerweile auch geschaft ins Projekt einzubinden. Ohne das Lazarus bei mir hops geht.
Habe es mittlerweile auch gefundensix1 hat geschrieben: ↑Fr 24. Dez 2021, 07:42LEDControls_Master ist nicht in OPM; habe eben gerade nochmal nachgeschaut.
Das Paket kommt von "Atomek" www.atomek.de/coding/ledcontrols
Danke! Ich habe dein Projekt mittlerweile auch auf GitHub geforkt, um evtl. meinen Code dir als Pull-Request schicken zu können. Momentan will ich das Projekt sauber in Lazarus übersetzen können. Da Libs wie LEDControls bereits im GitHub sind, denke ich das deine beigepackte Lib hier gar nicht benötigt wird. Also kann sie in deiner Repo raus. BGRA ist in OPM, was noch fehlt, ist deine NewShape im GitHub. Dann hätte ich ein schmales Projekt und eine Anleitung wie man das Projekt baut. An der Anleitung arbeite ich gerade.
Ich nutze Fedora 35 und das hat Lazarus 2.0.12. BGRA hat mein Lazarus zerstört weil ich unter Fedora noch mesa-libGLU benötigte. Danach ließ sich auch Lazarus mit BGRA nutzen und LEDControls ebenfalls ins Projekt integrieren. Also:
Code: Alles auswählen
uses
{$IFDEF windows}
Windows,
{$ENDIF}
Code: Alles auswählen
Compile Project, Mode: Default, Target: WarpSpaceCraft: Exit code 1, Errors: 1, Warnings: 2
WarpSpaceCraft.lpr(21,1) Warning: "crtbeginS.o" not found, this will probably cause a linking failure
WarpSpaceCraft.lpr(21,1) Warning: "crtendS.o" not found, this will probably cause a linking failure
linker: /usr/bin/ld: cannot find -lbass
WarpSpaceCraft.lpr(21,1) Error: Error while linking
Vielleicht hilft die das als Einstieg: https://www.getlazarus.org/videos/baregame/
Code: Alles auswählen
type
TShoot = record
pic:TImage;
sidewaysDirection:integer;
sidewaysAngle:integer;
end;
Code: Alles auswählen
Shoot:array of TShoot;
Code: Alles auswählen
setlength(Shoot, length(Shoot)+1);
Code: Alles auswählen
Shoot[high(Shoot)].pic:=TImage.Create(nil);
Shoot[high(Shoot)].pic.left
....