Topics

Heute surfte ich wie gewohnt im GP2X Board um hilflosen mitgp2xlern zu helfen und da sah ich ...

1 Neue Private Nachricht.
Inhalt:

Code (glbasic) Select Expand


Betreff: eine blöde flachpfeife

Von: sechsrad
An: trucidare
Verfasst am: Mo März 24, 2008 23:05
Titel: eine blöde flachpfeife

was maulst du hier herum, du pfeifenkopf. saublöd nichts vollbracht nur scheisse vollbracht. was hast du schon geproggt.
du hast doch von tuten und blasen keine ahnung. aufblasen, das kannst du.

schwachmat...lol..was soll ich nun davon halten? Und vorallem warum schreibt er das nicht öffentlich.

Aber ich muss zugeben meine Releases die _nicht_ aus nem teil c++ bestehen sind sehr mager. Ich werds ändern hehe.

Hi Folks,

i have a little Sample for you. Thanks to Schranzor for the Bass.dll

Code (glbasic) Select Expand

http://www.zshare.net/download/90923188e7d3bd/EDIT:// now with runtimes in Setup file

here an actual Screenshot



and the Source (2 versions ago)

Code (glbasic) Select Expand

// --------------------------------- //
// Project: Musik-Player
// Start: Monday, March 10, 2008
// IDE Version: 5.194
AUTOPAUSE FALSE

GLOBAL GUI_WINDOW = 0
GLOBAL GUI_DIALOG = 1

GLOBAL GUI_BOX_VERTICAL = 1
GLOBAL GUI_BOX_HORIZONTAL = 0
GLOBAL GUI_BOX_BOXONLY = 1

GLOBAL GUI_PROGRESS_LEFT_TO_RIGHT
GLOBAL GUI_PROGRESS_RIGHT_TO_LEFT
GLOBAL GUI_PROGRESS_BOTTOM_TO_TOP
GLOBAL GUI_PROGRESS_TOP_TO_BOTTOM

GLOBAL Volume = 50
GLOBAL done = 0

GLOBAL Songhandle
GLOBAL Pause = FALSE

hwnd = GetHwnd()
HideGLBWindow(hwnd)
GuiInit()
BASS_Init(-1,44100,0)

window = GuiCreateWindow("Music-Player",320,50,GUI_WINDOW,TRUE)
 GuiEventConnect(window,"delete_event")

btnplay = GuiCreateButton("Play",TRUE)
 GuiEventConnect(btnplay,"clicked")

btnstop = GuiCreateButton("Stop",TRUE)
 GuiEventConnect(btnstop,"clicked")

btnopen = GuiCreateButton("Open",TRUE)
 GuiEventConnect(btnopen,"clicked")

btnplus = GuiCreateButton("  +  ",TRUE)
 GuiEventConnect(btnplus,"clicked")

btnminus = GuiCreateButton("  -  ",TRUE)
 GuiEventConnect(btnminus,"clicked")

lbltime = GuiCreateLabel("",TRUE)

lblpos = GuiCreateLabel("",TRUE)

lbltitle = GuiCreateLabel("",TRUE)
 GuiSetLabelText(lbltitle,BASS_GetDeviceDescription$(BASS_GetDevice()))

table = GuiCreateTable(2,5,TRUE,TRUE)
 GuiAddContainer(window,table)
 GuiTableAttach(table,btnplay,0,1,0,1)
 GuiTableAttach(table,btnstop,1,2,0,1)
 GuiTableAttach(table,btnopen,2,3,0,1)
 GuiTableAttach(table,btnminus,3,4,0,1)
 GuiTableAttach(table,btnplus,4,5,0,1)
 GuiTableAttach(table,lblpos,0,1,1,2)
 GuiTableAttach(table,lbltitle,1,4,1,2)
 GuiTableAttach(table,lbltime,4,5,1,2)
GuiMain()
GuiEnd()

CALLBACK FUNCTION EVENTS: WIDGET,EVENT,DATA$
SELECT WIDGET
CASE window
GuiEnd()
BASS_End(chan)
END
CASE btnplay
IF Songhandle
chan = BASS_SampleGetChannel(Songhandle,FALSE)
Play = BASS_ChannelPlay(chan,FALSE)
StartThread()
ENDIF
CASE btnstop
BASS_ChannelStop(chan)
done = 1
CASE btnminus
Volume = Volume - 5
IF Volume < 0 THEN Volume = 0
BASS_SetVolume(Volume)
CASE btnplus
Volume = Volume + 5
IF Volume > 100 THEN Volume = 100
BASS_SetVolume(Volume)
CASE btnopen
IF chan THEN BASS_ChannelStop(chan)
done = 1
file$ = FILEREQUEST$(TRUE,"Musik|*.mp3|*.wav|*.ogg|*.mpeg|*.*")
HideGLBWindow(hwnd)
Songhandle = BASS_SampleLoad(FALSE,file$,0,0,1,BASS_SAMPLE_LOOP)
ENDSELECT
RETURN TRUE
ENDFUNCTION

Hier mal eine Demo. Viel spaß damit hehe ist nur ganz simple.

Danke an Schranzor für die Bass.dll

Code (glbasic) Select Expand

http://www.zshare.net/download/9041401d76cf1c/

Hallo,
ich versuche ein string zu DGStr zu convertieren aber es will einfach nicht. Und den rest auf DGStr umschreiben kann ich auch nicht da ich die member von DGStr nich kenne.

Kann mir jemand helfen?

EDIT:// Erledigt

Da bittschön ein Base64 Lib. Viel spaß damit

English:
A Base64 Lib for converting Files. Only for You

http://www.zshare.net/download/88698151b83c91/

und zwar arbeite ich doch gerade an der GUI. Die GuiMain() bildet jedoch eine schleife die alles andere blockiert, dass von GLB kommt. Alles bisher kein Problem. Jedoch benötige ich soetwas wie eine while schleife oder ähnliches, damit ich z. B. Labels mit neuen Werten füllen kann.

Jemand ne Idee?

hier schaut selbst.



und nummer 2:



diesmal mit 3 buttons und positionierung. Aufruf des widgets durch die erstellung.

und das letzte mal für heute:



Diesmal die Toolbar und ein paar andere nette funktionen wie den Unterschied zwischen window und dialog.

und nomma:



zusehen ist ein Fenster. Mit click auf Text -> Statusbar wird der Text (Test) in die Statusbar geschrieben.
Durch ändern des CallBacks kann man per Quit das ganze program schließen.

und ein letztes mal heute:



MenuBar mit einträgen. jedoch noch keien untermenus.

Guten Morgen aus dem schneienden Norden:



Diesmal mit Subemenus

Und Nomma



Diesmal TextBoxen und Events (bei klick auf Login wird der dialog daneben angezeigt mit dem namen der in der textbox eingegeben wurde)

Derzeit unterstürzt wird:

- CreateButton
- CreateLabel
- CreateToolbar
- CreateTable
- TableAttach
- CreateWindow
- CreateHandlebox
- CreateStatusbar
- CreateMenu
- MenuAddLabel
- CreateMenuBar
- ToolbarAdddItem
- AddContainer
- ShowWidget
- BoxPack
- Items zur Statusbar hinzufügen
- Widget mit Event an Callback übergeben (Teilerfolg)
- Box erstellen und verwenden

und ich hoffe heute noch ein paar steuerelemente und vielleicht sogar die events hinbekomme.

EDIT// Teilerfolg bei den Events erstmals ganze anwendungen möglich

Mfg

Hmm ich glaub ich hab vorhin vergessen Absenden zu klicken

Also nochmal ich wünsche mir Methoden in Types:

Code (glbasic) Select Expand

TYPE moop
     a
     b$
     
     METHODE Create()
           _list = NEW List
     ENDMETHODE

     METHODE Add()
           ADDLAST(List,_list)
     ENDMETHODE
ENDTYPEaufrufen dann mit moop.Create() oder moop:Create().

na wir wär das?

...wünsch ich euch allen.

Aus purer Langerweile habe ich das hier programmiert...



Vielleicht sieht jemand ja ne zukunft dafür... es wird ein messenger mit syntaxhighlighting für c++ und glbasic.

Also ich will dann mal in ein neues SpieleGenre eintreten. Es nennt sich Eat em` up!.

Geplant dazu habe ich mein u. a. altbekanntes und unveröffentlichtes Spiel:

-> Bratkartoffeln - Episode 1 (ehemals das Bratkartoffelspiel)
-> Kartoffelpü - Rebellion der Kartoffelstärke
-> Pommes - Weltherrschaft der fettigen Stäbchen
-> Kartoffelsalat - Fusion der Imperial-Mächte

Meinungen bitte.

Ich hab wie versprochen das pong spiel angefangen... benötige aber noch eine ball funktion. bin zu blöde dazu.

bisher steht client server erkennung und verbindung, senden undempfangen vonnachrichten, variablen,

nur noch das spiel an sich ^^

*GRINS*



http://trucidare.funpic.de/Gui.JPG

Ich hab mal den Chat als Netzwerkexample angefangen und hab da ein kleines problemchen...

Ich kann nachrichten schicken und alles die verbindung steht aber die kommt nich an


ich habe den Empfang per thread eingebaut.

Code (glbasic) Select Expand

msg$=NETGETMSG(id$)irgendwelche vorschläge? das mein anzeige system funktioniert erkenn ich daran das wenn ich eine Nachrihct schicke ( sie in meiner queue auftaucht)

Ich wüüüüünsche mir ... ^^
Nein, ich frage mal an ob es möglich ist ne Art Konsolenprogramm zu schreiben. Gerade bei spiele servern wäre das recht hilfreich. Somit könnten dedicated server auf linux roots im netz gemacht werden.

Also ich stellte mir das so vor:

Code (glbasic) Select Expand

CONSOLE TRUESo dass dann die ganzen Grafikbefehle unbrauchbar werden und nur noch sowas wie print, input etc pp sowie die netzwerkbefehle gehen.

Hier ein SQLite Test...
Wenn das jemand gebrauchen kann bitte melden ich machs dann weiter.



http://trucidare.funpic.de/SQL.JPG

Also ich werde mal wieder einen Chat machen diesmal nicht mit dem irc protokoll. Ich suche ejdoch noch ein Design. Bisher sah der Chat ungefähr so aus:

http://trucidare.tr.funpic.de/test.JPG VollBild



Vielleicht hat jemand ja ein vorschlag für ein design.

mfg
trucidare

Ich hab mein macbook pro ^^

Wollt ich nur mal mitgeteilt haben

Ich hab hier so ein Halbfertiges SnakeSpiel. Wenn Ihr lust habt könnt ihr es weitermachen. Würd mich freuen.

hier mal der link:

http://rapidshare.com/files/61985677/KS.rar.html

mfg NT

Hier mal eine klitze kleine vorab version der scriptsprache Lua in GLBasic.



bisher nur eine Funktion mit Ausgabe auf das GLBasic Fenster alles andere ist reine Konsolensache.

mfg
nt

P.S.: Kritiken bitte in die Comments.

//UPDATE (8.10.2007 - 10:55)
//UPDARE (10.10.2007 - 16:10)

//GESTOPPT (12.10.2007 - 10:31)