Forum: Programmieren allgemein
by ISAS,
9. Jul 2004
Was du gesagt hast, stimmt natürlich schon, aber.. (Trommelwirbel)
...aber kann man auch in Rollenspielen, die es auf dem Markt gibt, auch einen Sessel als Waffe nehmen. Es wäre natürlich nicht schwer, den Sessel nun als Waffe machen, aber da es bei mir auch skills gibt, müsste ich für jeden Gegenstand einen Extraskill machen. Dann würde es bei mir Sword, Axe, Club, Fists, Distance, Sessel,...
Forum: Programmieren allgemein
by ISAS,
9. Jul 2004
Hab das Inventar nun so, wie ich es haben will. Eins bereitet mir dennoch "Schwierigkeiten":
Münzen sollte man doch auf einem Feld stappeln lassen. Ich hab das nun umständlich gemacht, nämlich so:
(Nur ein Beispiel) TMünze hat einen Integer und zwar Anzahl. Anzahl gibt an, wieviele Münzen das TMünze besitz.
zB: Münze.Anzahl:=3 -> dann hat Münze 3 Münzen. Ich kann nun Münzen stappeln. Wenn...
Forum: Programmieren allgemein
by ISAS,
26. Jun 2004
Ja, das Problem is das: Liegt das Sprite vor dem anderen, ist es verschiebbar, liegt es hinterhalb, dann nicht
(Fahr morgen nach Rom, also wird sich der Thread für kurze Zeit "einfrieren")
Forum: Programmieren allgemein
by ISAS,
26. Jun 2004
Nein, nein. Ich hab deinen Code nicht eingebaut. Das war ja nur ein Nebenprogramm. Hab das ins Hauptprogramm eingebaut und siehe da, es funktioniert. Keine Ahnung wieso, aber es geht und das ist auch gut so. Häng trotzdem noch ein bisschen am Inventar fest. Hoffe, dass ich das bald löse. Weisst du zufällig, ob, wenn ein Sprite hinter einem anderen ist, das Sprite "inaktiv" wird, geht?
Forum: Programmieren allgemein
by ISAS,
26. Jun 2004
Aso, nein, das wäüre dann zu Umständlich. (Das is ja nur ein kleines Programm)
Hab das nun einegbaut und es funktioniert. Weiss aber nicht, warum??
Forum: Programmieren allgemein
by ISAS,
26. Jun 2004
Das Problem bei deiner Lösung ist, dass die beiden Teile, die du herausgenommen hast, ohne FOR-Schleife nicht funktionieren:
for k:=0 to 1 do begin
if (X>=Gegenstand.X) and (X<=Gegenstand.X+32) and (Y>=Gegenstand.Y) and (Y<=Gegenstand.Y+32)
then Gegenstand.hant:=true;
end;
Gegenstände.... Braucht eine FOR-schleife, da es ja ein array, sonst hätte k keinen Wert und das geht natürlich...
Forum: Programmieren allgemein
by ISAS,
26. Jun 2004
k, habs nun doch mit arrays gemacht. Is meiner Meinung nach sehr umständlich, wenns aber nicht leichter geht. k
Aja, thnx nochmal für die Antwort, Nicodius!!! :wink:
Hab nun aber ein Problem. Ich schick hier mal die Datei. Samt Quellcode, da man den Fehler herauslesen muss. Ich find halt keinen Fehler. (Aja, wenn sich jemand fragt, wieso ich das TGegenstand auch mit einem array gemacht...
Forum: Programmieren allgemein
by ISAS,
25. Jun 2004
Bastle gerade an einem Rollenspiel mit DelphiX und da darf ein Inventar natürlich nicht fehlen 8) . Das Inventar befindet sich rechts aussen. Hier eine Bild, wie das Inventar aussieht. Bild(Das Bild ist aus einem anderen Spiel)
Was das Inventar alles zu haben hat:
1. Man soll von der Spielfläche Sachen direkt ins Inventar und natürlich auch umgekehrt schieben können. Also ein Schwert in die...