 |
Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
|
| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
Flo
aka kleiner_hacker
Anmeldungsdatum: 23.06.2006
Beiträge: 1210
|
 Verfasst am: 08.02.2007, 20:06 Titel: problem mit put (illegal function call, err code 1) |
 |
|
hi leude
ich bastel grad an nem spiel in fb rum
| Code: | defsng a-z
SUB figur (xko!, yko!) STATIC
IF oldx = 0 THEN oldx = 30: oldy = 30
PUT (oldx - 10, oldy - 10), FigHG, pset
GET (xko - 10, yko - 10)-(xko + 10, yko + 10), FigHG
PUT (xko - 10, yko - 10), lalala, OR
PUT (xko - 10, yko - 10), lululu, AND
oldx = xko: oldy = yko
END SUB |
so wird die firgur dargestellt
(lalala und lululu sind die figur-arrays)
am anfang wird per get der erste hg noch eingelesen
so...
in qb gestartet (war ursprünglich für qb, aber wegen sound auf fb umgestiegen), läuft prima
in fb gestartet
prog bricht ab
fehler code 1
wenn ich jetz die put anweisung für FigHG auskommentier, gehts
wenn ich statt FigHG ein anderes feld putte gehts auch
am anfang vom prog (nach dem einlesen des HGs) ein put (1,1),FigHG,pset
geht super
felder sin alle mit dim shared deklariert
also zugriff hat die sub
alle anderen puts gehen...
wisst ihr worans liegt? hab inzwischen 0.16 stable
_________________
MFG
Flo
Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.
zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich. |
|
| Nach oben |
|
 |
ytwinky
Anmeldungsdatum: 28.05.2005
Beiträge: 2624
Wohnort: Machteburch
|
| Verfasst am: 08.02.2007, 20:33 Titel: |
|
|
Auf den ersten Blick stört mich die DefSng a-z Anweisung..
Bist du sicher, daß Single das richtige Format für die Grafik-Befehle ist?
_________________
| v1ctor hat Folgendes geschrieben: | | Yeah, i like INPUT$(n) as much as PRINT USING.. |
..also ungefähr so, wie ich GOTO.. |
|
| Nach oben |
|
|
Michael Frey
Anmeldungsdatum: 18.12.2004
Beiträge: 2577
Wohnort: Schweiz
|
| Verfasst am: 09.02.2007, 10:10 Titel: |
|
|
Genial, das die Leute nur kompletten Source posten, so das man sich auf die Fehlersuche Konzentirenen kann.
Deklarier erstmal alle Variabeln und Poste soviel Code, das irgendwas Sinnvolles passiert/passieren sollte.
_________________
http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
| Nach oben |
|
|
Flo
aka kleiner_hacker
Anmeldungsdatum: 23.06.2006
Beiträge: 1210
|
| Verfasst am: 09.02.2007, 15:10 Titel: |
|
|
| Code: |
DECLARE SUB figur (xko!, yko!)
DIM SHARED true AS INTEGER, false AS INTEGER
true = -1: false = 0
DIM SHARED x AS DOUBLE, y AS DOUBLE
DIM SHARED ax AS DOUBLE, ay AS DOUBLE
DIM SHARED vx AS DOUBLE, vy AS DOUBLE
DIM SHARED vxalt AS DOUBLE, vyalt AS DOUBLE
DIM SHARED FigHG(1 TO 400) AS INTEGER
DIM SHARED lalala(1 TO 400) AS INTEGER
DIM SHARED lululu(1 TO 400) AS INTEGER
lesefigur
CLS
sleep 1000
FOR i = 1 TO 50
xx = RND * 320: yy = RND * 200: cc = RND * 16
CIRCLE (xx, yy), RND * 100, cc
PAINT (xx, yy), cc
NEXT
GET (30, 30)-(50, 50), FigHG
x = 30: y = 30
ax = 0: ay = -10
vx = 1: vy = 10
zoom = 1
dummy = deltaT(1)
sleep 1000
'SCREEN 13
GET (x - 10, y - 10)-(x + 10, y + 10), FigHG
put (1,1),fighg
sleep 1000
figur (1,1)
sleep 100
figur (10,1)
sleep 1100
end (123)
SUB lesefigur
SCREEN 13
CLS
LINE (10, 10)-(1, 1), 4
LINE (10, 10)-(20, 1), 4
LINE (10, 10)-(10, 6), 4
LINE (10, 10)-(1, 20), 1
LINE (10, 10)-(20, 20), 1
CIRCLE (10, 3), 2, 3
GET (0, 0)-(20, 20), lalala
'SLEEP
CLS
LINE (0, 0)-(30, 30), 15, BF
LINE (10, 10)-(1, 1), 4
LINE (10, 10)-(20, 1), 4
LINE (10, 10)-(10, 6), 4
LINE (10, 10)-(1, 20), 1
LINE (10, 10)-(20, 20), 1
CIRCLE (10, 3), 2, 3
GET (0, 0)-(20, 20), lululu
'SLEEP 2
END SUB
|
so das wars (was man wissen muss, die physikalische berechnung vom ort bleibt weg  )
@ytwinky: ohne defsng a-z heists typemismatch (aber nur bei yko, nich bei xko...)
_________________
MFG
Flo
Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.
zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich. |
|
| Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192
|
| Verfasst am: 09.02.2007, 19:36 Titel: |
|
|
Hi,
in der SUB figur fehlen die DIM für oldx und oldy.
Sonst fehlen noch xx, zoom, ....
Arbeite doch mit 'OPTION EXPLICIT' dann bekommst du die Zeile (Parameter) indem der Fehler auftrat angezeigt.
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
| Nach oben |
|
|
ytwinky
Anmeldungsdatum: 28.05.2005
Beiträge: 2624
Wohnort: Machteburch
|
| Verfasst am: 10.02.2007, 22:09 Titel: |
|
|
| volta hat Folgendes geschrieben: | | Arbeite doch mit 'OPTION EXPLICIT' dann bekommst du die Zeile (Parameter) indem der Fehler auftrat angezeigt. |
..gilt die DefSng..-Anweisung nicht für das gesamte Programm?
Deshalb meine Frage(s.o.)..
Gruß
ytwinky
_________________
| v1ctor hat Folgendes geschrieben: | | Yeah, i like INPUT$(n) as much as PRINT USING.. |
..also ungefähr so, wie ich GOTO.. |
|
| Nach oben |
|
|
Michael712
aka anfänger, programmierer
Anmeldungsdatum: 26.03.2005
Beiträge: 1593
|
| Verfasst am: 11.02.2007, 02:56 Titel: |
|
|
| volta hat Folgendes geschrieben: | Hi,
in der SUB figur fehlen die DIM für oldx und oldy.
Sonst fehlen noch xx, zoom, ....
Arbeite doch mit 'OPTION EXPLICIT' dann bekommst du die Zeile (Parameter) indem der Fehler auftrat angezeigt. |
Am besten die neuste FreeBASIC Version nehmen, denn da gibts kein OPTION xxx mehr, sondern da ist das alles standard (explicit, byval, etc).
Und bessere Fehlermeldungen/überprüfung ist auch vorhanden. 
_________________
| Code: | | #include "signatur.bi" |
|
|
| Nach oben |
|
|
Flo
aka kleiner_hacker
Anmeldungsdatum: 23.06.2006
Beiträge: 1210
|
| Verfasst am: 11.02.2007, 11:22 Titel: |
|
|
welche neueste? 0.17 oder was? (is die nich noch testing?)
achja, ich hab bemerkt: der krigt sein feld nich rüber
also innerhalb von EINER sub putttet er fighg ganz toll
und wenn ich in der anderen sub vor demn fehlerhaften put das ganze gette, gehts auch...
irgendwie bekomt der fighg nich obwohls shared is
und wenn ich option explicit einfüg und quick run:
"das programm fbide.exe hat einen fehlert verursacht und wird geschlossen
ein fehlerprotokoll wird erstellt"
_________________
MFG
Flo
Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.
zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich. |
|
| Nach oben |
|
|
Sebastian
Administrator
Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
|
| Verfasst am: 11.02.2007, 12:06 Titel: |
|
|
| Zitat: | "das programm fbide.exe hat einen fehlert verursacht und wird geschlossen
ein fehlerprotokoll wird erstellt" |
Dann scheint das Problem aber erst mal an der fbIDE und nicht an deinem Programm selbst zu liegen. Installier die fbIDE am besten noch mal neu und achte darauf, dass du die letzte Version hast. Oder hattest du dein Programm etwa fbide.exe genannt? 
_________________
Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen! |
|
| Nach oben |
|
|
Mao
Anmeldungsdatum: 25.09.2005
Beiträge: 4409
Wohnort: /dev/hda1
|
| Verfasst am: 11.02.2007, 13:23 Titel: |
|
|
@Sebastian:
Auch eine Idee. 
So wid der Konkurrenzkampf bei der FB-IDE ausgeschlossen.
@kleiner_hacker:
Die 0.17 ist noch testing, läuft aber recht stabil.
Außerdem gibt's jetzt nächtliche Builds der aktuellen CVS-Version.
_________________
Eine handvoll Glück reicht nie für zwei.
--
 |
|
| Nach oben |
|
|
Flo
aka kleiner_hacker
Anmeldungsdatum: 23.06.2006
Beiträge: 1210
|
| Verfasst am: 11.02.2007, 13:42 Titel: |
|
|
also beim nur compilen kommt auch der fehler
_________________
MFG
Flo
Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.
zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich. |
|
| Nach oben |
|
|
Michael Frey
Anmeldungsdatum: 18.12.2004
Beiträge: 2577
Wohnort: Schweiz
|
| Verfasst am: 11.02.2007, 15:20 Titel: |
|
|
| Code: | DECLARE SUB figur (xko!, yko!)
Declare sub lesefigur
CONST AS INTEGER true=-1
CONST AS INTEGER false=0
DIM SHARED x AS DOUBLE, y AS DOUBLE
DIM SHARED ax AS DOUBLE, ay AS DOUBLE
DIM SHARED vx AS DOUBLE, vy AS DOUBLE
DIM SHARED vxalt AS DOUBLE, vyalt AS DOUBLE
DIM SHARED FigHG(1 TO 400) AS INTEGER
DIM SHARED lalala(1 TO 400) AS INTEGER
DIM SHARED lululu(1 TO 400) AS INTEGER
DIM SHARED oldx
DIM SHARED xko
DIM SHARED yko
dim deltaT(1) as integer
lesefigur
CLS
sleep 1000
FOR i = 1 TO 50
xx = RND * 320: yy = RND * 200: cc = RND * 16
CIRCLE (xx, yy), RND * 100, cc
PAINT (xx, yy), cc
NEXT
GET (30, 30)-(50, 50), FigHG
x = 30: y = 30
ax = 0: ay = -10
vx = 1: vy = 10
zoom = 1
dummy = deltaT(1)
sleep 1000
'SCREEN 13
GET (x - 10, y - 10)-(x + 10, y + 10), FigHG
put (1,1),fighg
sleep 1000
figur (1,1)
sleep 100
figur (10,1)
sleep 1100
end (123)
SUB lesefigur
SCREEN 13
CLS
LINE (10, 10)-(1, 1), 4
LINE (10, 10)-(20, 1), 4
LINE (10, 10)-(10, 6), 4
LINE (10, 10)-(1, 20), 1
LINE (10, 10)-(20, 20), 1
CIRCLE (10, 3), 2, 3
GET (0, 0)-(20, 20), lalala
'SLEEP
CLS
LINE (0, 0)-(30, 30), 15, BF
LINE (10, 10)-(1, 1), 4
LINE (10, 10)-(20, 1), 4
LINE (10, 10)-(10, 6), 4
LINE (10, 10)-(1, 20), 1
LINE (10, 10)-(20, 20), 1
CIRCLE (10, 3), 2, 3
GET (0, 0)-(20, 20), lululu
'SLEEP 2
END SUB
SUB figur (xko!, yko!) STATIC
IF oldx = 0 THEN oldx = 30: oldy = 30
PUT (oldx - 10, oldy - 10), FigHG, pset
GET (xko - 10, yko - 10)-(xko + 10, yko + 10), FigHG
PUT (xko - 10, yko - 10), lalala, OR
PUT (xko - 10, yko - 10), lululu, AND
oldx = xko: oldy = yko
END SUB
|
Geht doch.
_________________
http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
| Nach oben |
|
|
Flo
aka kleiner_hacker
Anmeldungsdatum: 23.06.2006
Beiträge: 1210
|
| Verfasst am: 12.02.2007, 17:57 Titel: |
|
|
ahaaaaaa... 
fehler gefunden: ich hab (für irgdend ein anderes prog) der befehlszeile
"-ex"
hinzugefügt (damit was anderes geht...)
und vergessen es zu löschen
etz gehts
(option explicit auch...)
/edit: option explicit geht mit meinem original nich, aber mit deinem schon..?
und: er restauriert den hintergrund nich und es bricht nach ner halben bis ganzen sekunde ab... diesmal aber wegen "fbidetemp" bzw dem programmnamen...  irgendwie hab ich des gefühl fb mag mich nich
_________________
MFG
Flo
Satoru Iwata: Wer Spaß am Spielen hat, fragt nicht nach Grafik.
zum korrekten Verstaendnis meiner Beitraege ist die regelmaessige Wartung des Ironiedetektors unerlaesslich. |
|
| Nach oben |
|
|
|
|
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
