Topics

Hallo,

ich möchte für Android schreiben. Habe mir auch das Zip File dafür herunter geladen. Aber wohin damit?
Ich finde nirgends einen Hinweis darauf. Fast wie bei der Geheimen Elfen Technologie. :-)

Gruss TFT

Hallo,

Ich möchte für ein ARDUINO Projekt für mein Galaxy Tablet eine App schreiben. Kann ich von GLBasic aus eine Serielle Komunikation mit dem Onbord Bloutoth
eines Handy Kontackt aufnehmen? Und wenn ja wie?

Gruss TFT

Hallo,
nach einigem hin und her habe ich mir nun einen Mac Besorgt mit Lion und XCode 4. Habe mich angemeldet und auch das erste App im Testlauf mit den Xcode Frameworks erstellt und auf meinem IPad getestet.

Nun habe ich in GLBasic die IMouse Demo als IPhone app im release compiliert und versucht das ganze mit XCode zu starten.

Fehlanzeige ..... Xcode bemängelt schon beim Start das XCode Projekt file. Als Fehler wird "Wrong Workspace"  ausgegeben.

Bitte helft mir ........ Gruss TFT

Hallo,

wenn ich Dim verwende und den Haken bei Explizit gesetzt habe gibt es eine Fehlermeldung. Local und Global werden vor dem Dim nicht akzeptiert.

Gruss TFT

Hallo,

inwieweit werden die DDGui elemente übernommen? Oder werden diese als UIKit befehle umgewandelt?

Gruss TFT

Hallo,

gibt es hier jemanden der für das IPhone oder IPad ein App programiert hat und sein wissen teilen würde.

Gruss TFT

Hallo,

ich habe GLBasic nun schon 4 Jahre, habe dabei immer mal wider die Updates geladen und so wie neulich halt auch die Version 10. Da ich auch diverse andere Basic Sprachen benutze bin ich halt ein sehr eingelaufener Stereo Type. Nach einer Installation sollten die mitgelieferten Beispiele wenigstens funktionieren. Ich habe eigentlich meinem Sohn das ganze etwas näher bringen wollen. Zumal ihr ja auch mit Schullizenzen werbt. Nach 2 Stunden habe ich nun die ersten Demos wenigstens zum laufen gebracht. Aber so richtig umsteiger freundlich ist das ganze nicht. Mir ist bewusst das GLBasic durch seine Platform übergreifende Grund Strucktur anders ist als andere Dialekte. Aber das der unterschied mit der zeit so gross geworden ist war mir nicht klar. Da ich aber gerne etwas für mein IPad machen möchte und Objectiv C nicht gerade meine Kragenweite darstellt. Zumal ich keinen eigenen Mac besitze. Werde ich hier diverse fragen stellen die den meisten hier fieleicht ein ..... wassen das fürn nub ..... entlockt. Aber die fragen kommen aus dem Umstieg von anderen Sprachen zu GLBasic. Also bitte nicht persönlich nehmen ......

Gruss TFT

Hallo,
ich möchte gerne für das IPhone Apps anfertigen. Aber habe aufgrund der mangelden MAC erfahrung keinen Schimmer wie ich vorgehen soll. Könte hir mal jemand eine solche beschreibung abgeben? Einen IMac habe ich mir besorgt. Und ein IPhone habe ich ebenfals.

Gruss TFT

Hallo,

Habe mit begeisterung das 3D Set von NVidea inclusive Monitor zugelegt. Das Grauen nahm kein Ende.
Kein Basic Dialekt ausser GLBasic scheind ?berhaubt etwas darzustellen wenn die 3D Treiber installiert sind.
Da war es sch?n festzustellen das GLBasic da eine Aussname ist.

Ist es M?glich das GLBasic 3DVision voll unterst?tzt? Beziehungsweise wie macht man das?

Gruss TFT

Hallo..

so .. nach l?ngerer Zeit habe ich mich mal wider mit GLBasic befast. Mir ist aufgefallen das im Follbild Modus nur aufl?sungen bis 1024 * X m?glich sind. L?st sich das ?ndern oder ist das die maximale aufl?sung bei GLBasic.

Gruss TFT

PS: Im ?brigen leuft es auf W 7 sehr gut .

Hallo....

ich wollt mir gerade das Update holen ... aber der Updater macht den MAV.

Gruss TFT

Hallo,

Das Problem....

2 Programme die 3D objecte darstellen. Aber es wird nur jeweils auf einem Gerendert. Nämlich das , das Activ ist.

Lösungen in sicht?

Die Hilfe für die NET unterstützung ist ja recht dünn. Oder gibts nur die 3 Befehle ?

Gruss TFT

Hallo....

ich suche eine Möglichkeit, daten von einem Process zu einem nächsten zu transferieren. Die Üblichen MemCopy API befehle funktioniere wegen des Virtuellen Speicher Managment nicht.
Und der Datentransver via Clipbord oder UDP sind einfach zu langsam. Eigentlich suche ich eine API Funktion in der art.
DMACopy(SorceProcessID,SorceAdresse,SorceLänght,DestProcessID,DestAdresse)
Habe aber bisher nichts passendes gefunden.

MfG TFT

Hallo ...

wie siehts denn mit einem Entitysytem aus. Bissher sind die 3D functionen eher rudimentär. Alles absolute befehle. Keine Relativen wie Turn und Move. Ich vermisse auch die Blending funktionen , damit sich flächen und Objecte für blur effekte einsetzen lassen. Aber fieleich gibt es das ja alles bereits und ich bin nur zu einfältig diese zu finden.

Gruss TFT

Hi

und eine eher doofe frage. Aber warum funktioniert das hir nicht?

Code (glbasic) Select Expand

DIM s[29]
DIM c[29]

FOR i =0 TO 29
s[i]=SIN(i/29*360)*150 // !!!! diese zeile macht einen Fehler
c[i]=COS(i/29*360)*150
NEXT


FOR i =0 TO 29
PRINT s[i],10,i*10
PRINT c[i],50,i*10
NEXT

Hallo ...

meine ersten versuche mit 3D in GLBasic. Um weitere Tests für die Object Optimierung zu machen. Wäre es gut wenn ihr den Code mal ausfürt und Postet wiefiel Quad und FPS bei euch rauskommt. Das Programm nähert sich an die 30 FPS grenze an und bleibt dann bei einer gewissen anzahl Quad stehen.

ich habe einen : P4 HT 2.8 GHz mit 2 GB Ram und Radeon X1600, macht 6480 Quad bei 28 FPS

Code (glbasic) Select Expand

// --------------------------------- //
// Project: First3D
// Start: Friday, August 10, 2007
// IDE Version: 4.254

LIMITFPS -1

donut  = 0
sphere = 1


// Donut machen
CreateCube(donut, 1, RGB(255,255,255))
// CreateTorus(donut, 12, 24, 12, 9, 2, 1)
// Kugel machen
CreateCube(sphere, 24, RGB(255,255,255))

LOCAL mx, my, b1, b2
fpse=0
fps=-1

WHILE TRUE
   // 3000 ist weit genug hier
   X_MAKE3D 1, 3000, 65

   // ein Winkel für alles
   phi = GETTIMERALL() / 150

   X_CAMERA 800,800,800, 0,0,0
   X_SPOT_LT  0, RGB(0,255,255), 0,0,0, -1,-1,-1, 180

   // Ringelreihen
   FOR i=0 TO kl1
      psi = phi + i/kl1*360
      px = SIN(psi)*300
      py = COS(psi)*300
      pz = (SIN(psi)+COS(psi)*2)*300
      // bewegen und bisserl drehen
      X_MOVEMENT px, py, pz
      X_ROTATION psi*40, 3,4,5

      // Jetzt relaitv zum Torus die Kugeln
      X_PUSHMATRIX
         FOR j=0 TO 29
            X_MOVEMENT SIN(j/29*360)*150, 0, COS(j/29*360)*150
            X_SCALING .3, .3, .3
            X_DRAWOBJ sphere, 0
         NEXT
      X_POPMATRIX
      X_DRAWOBJ donut,0
   NEXT
   
   fps_time = GETTIMERALL()
   fps_counter = fps_counter + 1
   IF (fps_time-fps_temp)>1000
      fps_temp = fps_time
      fps = fps_counter
      fps_counter = 0
   ENDIF
   
   X_MAKE2D
   
   PRINT fps+" Frames "+i*j+" Quads",10,100
   
   IF fps>30 AND fpse=0
    INC kl1,1
   ELSEIF fps>-1
    fpse=1
   ENDIF
   
   SHOWSCREEN
WEND



// ------------------------------------------------------------- //
// -=#  SPHERE  #=-
// ------------------------------------------------------------- //
FUNCTION CreateSphere: num, r, n, col
LOCAL i,j, theta1, theta2, theta3, pi
   pi = ACOS(0)*2
   IF r < 0 THEN r = -r
   IF n < 4 THEN n = 4

   X_AUTONORMALS 2 // smooth edges
   X_OBJSTART num
   FOR j=0 TO INTEGER(n/2) -1
      theta1 = j * 2*pi / n - pi/2;
      theta2 = (j + 1) * 2*pi / n - pi/2;
      FOR i=0 TO n
         theta3 = i * 2*pi / n;
         X_OBJADDVERTEX   r*COS(theta2) * COS(theta3), r*SIN(theta2), _
                     r*COS(theta2) * SIN(theta3), i/n, 2*(j+1)/n, col
         X_OBJADDVERTEX   r*COS(theta1) * COS(theta3), r*SIN(theta1), _
                     r*COS(theta1) * SIN(theta3), i/n, 2*j/n, col
      NEXT
      X_OBJNEWGROUP
   NEXT
   X_OBJEND
ENDFUNCTION // n



// ------------------------------------------------------------- //
// -=#  CREATETORUS  #=-
//
// By Samuel R. Buss
// http://math.ucsd.edu/~sbuss/MathCG
// ------------------------------------------------------------- //
FUNCTION CreateTorus: num, MinorRadius, MajorRadius, NumWraps, NumPerWrap, TextureWrapVert, TextureWrapHoriz
   // Diese Variablen sind als LOCAL definiert:
   // x, y,
   // Draw the torus
LOCAL i, di, j, wrapFrac, wrapFracTex, phi, thetaFrac, thetaFracTex, theta
LOCAL x, y, z, r

   X_AUTONORMALS 2
   X_OBJSTART num
   FOR di=0 TO NumWraps-1
      FOR j=0 TO NumPerWrap
         FOR i=di+1 TO di STEP -1
            wrapFrac = MOD(j, NumPerWrap)/NumPerWrap
            wrapFracTex = j/NumPerWrap
            phi = 360*wrapFrac
            thetaFrac = (MOD(i, NumWraps)+wrapFracTex)/NumWraps
            thetaFracTex = (i+wrapFracTex)/NumWraps
            theta = 360*thetaFrac
            r = MajorRadius + MinorRadius*COS(phi)
            x = SIN(theta)*r
            z = COS(theta)*r
            y = MinorRadius*SIN(phi)
            X_OBJADDVERTEX x,y,z,  thetaFracTex*TextureWrapVert, wrapFracTex*TextureWrapHoriz, _
                        RGB(255, 255, 255)
         NEXT
      NEXT
      X_OBJNEWGROUP
   NEXT
   X_OBJEND
ENDFUNCTION

// ------------------------------------------------------------- //
// -=#  CREATECUBE  #=-
// ------------------------------------------------------------- //
FUNCTION CreateCube: num, sz, col
    // Diese Variablen sind als LOCAL definiert:
    // num, sz,
    sz=sz/2
    X_OBJSTART num
        // Front Face
        X_OBJADDVERTEX  sz, -sz,  sz, 1, 0, col
        X_OBJADDVERTEX -sz, -sz,  sz, 0, 0, col
        X_OBJADDVERTEX  sz,  sz,  sz, 1, 1, col
        X_OBJADDVERTEX -sz,  sz,  sz, 0, 1, col
        X_OBJNEWGROUP
        // Back Face
        X_OBJADDVERTEX -sz,  sz, -sz, 1, 1, col
        X_OBJADDVERTEX -sz, -sz, -sz, 1, 0, col
        X_OBJADDVERTEX  sz,  sz, -sz, 0, 1, col
        X_OBJADDVERTEX  sz, -sz, -sz, 0, 0, col
        X_OBJNEWGROUP
        // Top Face
        X_OBJADDVERTEX -sz,  sz,  sz, 0, 0, col
        X_OBJADDVERTEX -sz,  sz, -sz, 0, 1, col
        X_OBJADDVERTEX  sz,  sz,  sz, 1, 0, col
        X_OBJADDVERTEX  sz,  sz, -sz, 1, 1, col
        X_OBJNEWGROUP
        // Bottom Face
        X_OBJADDVERTEX  sz, -sz, -sz, 0, 1, col
        X_OBJADDVERTEX -sz, -sz, -sz, 1, 1, col
        X_OBJADDVERTEX  sz, -sz,  sz, 0, 0, col
        X_OBJADDVERTEX -sz, -sz,  sz, 1, 0, col
        X_OBJNEWGROUP
        // Right face
        X_OBJADDVERTEX  sz,  sz, -sz, 1, 1, col
        X_OBJADDVERTEX  sz, -sz, -sz, 1, 0, col
        X_OBJADDVERTEX  sz,  sz,  sz, 0, 1, col
        X_OBJADDVERTEX  sz, -sz,  sz, 0, 0, col
        X_OBJNEWGROUP
        // Left Face
        X_OBJADDVERTEX -sz, -sz,  sz, 1, 0, col
        X_OBJADDVERTEX -sz, -sz, -sz, 0, 0, col
        X_OBJADDVERTEX -sz,  sz,  sz, 1, 1, col
        X_OBJADDVERTEX -sz,  sz, -sz, 0, 1, col
        X_OBJNEWGROUP
    X_OBJEND

ENDFUNCTION // sz

// ------------------------------------------------------------- //
// -=#  CREATECYLINDER - also creates a cone if any radius = 0  #=-
// ------------------------------------------------------------- //
FUNCTION CreateCylinder: num, baseRadius, topRadius, height, slices, stacks, col
LOCAL da, r, dr, dz, x, y, z, i, j
LOCAL x1, y1, x2, y2
    da = 360 / slices
    dr = (topRadius-baseRadius) / stacks
    dz = height / stacks
    X_OBJSTART num
    FOR i=0 TO slices-1
        x1 = COS(i*da)
        y1 = SIN(i*da)
        x2 = COS((i+1)*da)
        y2 = SIN((i+1)*da)
        z = 0
        r = baseRadius

        // Bottom lid
        IF baseRadius>0
            X_OBJADDVERTEX 0, 0, 0,  .5, .5, col
            X_OBJADDVERTEX x1*r, y1*r, 0, x1/2+.5, y1/2+.5, col
            X_OBJADDVERTEX x2*r, y2*r, 0, x2/2+.5, y2/2+.5, col
            X_OBJNEWGROUP
        ENDIF
        // side
        FOR j=0 TO stacks
            X_OBJADDVERTEX x2*r, y2*r, z, (i+1)/slices,  j/stacks, col
            X_OBJADDVERTEX x1*r, y1*r, z,  i   /slices,  j/stacks, col
            z = z+dz
            r = r+dr
        NEXT
        // Top lid
        IF topRadius>0
            X_OBJNEWGROUP
            X_OBJADDVERTEX x2*r, y2*r, height, x2/2+.5, y2/2+.5, col
            X_OBJADDVERTEX x1*r, y1*r, height, x1/2+.5, y1/2+.5, col
            X_OBJADDVERTEX 0, 0, height,  .5, .5, col
        ENDIF
        X_OBJNEWGROUP
    NEXT
    X_OBJEND
ENDFUNCTION

Hi....

dieser Code kommt nie über 500 FPS. MAche ich etwas Falsch oder gibts nicht mer als 500-

// --------------------------------- //
// Project: Move without Frame
// Start: Sunday, March 04, 2007
// IDE Version: 4.114


LIMITFPS -1 ///  -1 = Vsync Off

WHILE TRUE
    fps_time = GETTIMERALL()
    fps_counter = fps_counter + 1
    IF (fps_time-fps_temp)>1000
       fps_temp = fps_time
       fps = fps_counter
       fps_counter = 0
    ENDIF
    PRINT fps+" Frames",10,100
SHOWSCREEN
WEND

Lg TFT

Hallo Gernot

wie sehen denn deine Anbitionen zu den Oben genannten Konsolen aus. Eine SDK für kleine WII Entwickler wird ja bald freigegeben. Da ist es nur eine Frage der Zeit bis es das auch für den DS gibt.

LG TFT

Hi ...

für ein einfache Hallo World ist das ja echt heftig. Dachte irgenwo gelesen zu haben das ASM Exe erzeugt wird. Aus Win 95 Tage weis ich noch das sowas etwa 4K benötigt. Gibt es eine Möglichkeit dinge aus der Exe zu entfernen die man nicht braucht.? Oder ist das wider so ein Typische C++ all in one zeug.

Hi

habe jetzt zum 10. mal einen foll crach meines PDA hingelegt. Funktioniert GLB fieleicht garnicht mit Windows Mobile ? Und wenn doch. Worauf muss ich achten.