Warum ist der code für Hallo_Welt.pb so gross?

Für allgemeine Fragen zur Programmierung mit PureBasic.
Benutzeravatar
Hades
Beiträge: 100
Registriert: 21.05.2005 11:54

Beitrag von Hades »

Versucht mal ein 'Hello World' Programm in Visual Basic auf einer Diskette abzuspeichern.
Dann wisst Ihr was groß ist. :wink: :mrgreen:
Benutzeravatar
ts-soft
Beiträge: 22292
Registriert: 08.09.2004 00:57
Computerausstattung: Mainboard: MSI 970A-G43
CPU: AMD FX-6300 Six-Core Processor
GraKa: GeForce GTX 750 Ti, 2 GB
Memory: 16 GB DDR3-1600 - Dual Channel
Wohnort: Berlin

Beitrag von ts-soft »

Hades hat geschrieben:Versucht mal ein 'Hello World' Programm in Visual Basic auf einer Diskette abzuspeichern.
Dann wisst Ihr was groß ist. :wink: :mrgreen:
Der Installations-Assistent erstellt wohl ca. 5 Disketten :mrgreen:
PureBasic 5.73 LTS | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Nutella hat nur sehr wenig Vitamine. Deswegen muss man davon relativ viel essen.
Bild
Benutzeravatar
Falko
Admin
Beiträge: 3535
Registriert: 29.08.2004 11:27
Computerausstattung: PC: MSI-Z590-GC; 32GB-DDR4, ICore9; 2TB M2 + 2x3TB-SATA2 HDD; Intel ICore9 @ 3600MHZ (Win11 Pro. 64-Bit),
Acer Aspire E15 (Win11 Home X64). Purebasic LTS 6.11b1
HP255G8 Notebook @AMD Ryzen 5 5500U with Radeon Graphics 2.10 GHz 3.4GHz, 32GB_RAM, 3TB_SSD (Win11 Pro 64-Bit)
Kontaktdaten:

Re: Warum ist der code für Hallo_Welt.pb so gross?

Beitrag von Falko »

Dr.Pixel hat geschrieben:Hallo.
Warum ist die erzeugte exe mit dem Code bestehend aus dem Code

Code: Alles auswählen

MessageRequester("Test", "Hallo Welt")
3,5 KByte gross?
Kann man irgentwelche libs (ich weiss nicht was ) die nicht benötigt werden aus dem Code entfernen?
Versteht mich nicht falsch. Pb erzeugt ja schon optimierten Code.
Ist nur so eine Frage, da ich bei oben genanntem Code sicherlich keine
libs oder includes brauche!?

mfg
Dr. Pixel
Bei mir ist sie nur noch 2,5KByte gross :mrgreen:

Code: Alles auswählen

MessageBox_(0,"Test","Hallo Welt",#MB_OK)
Bild
Win11 Pro 64-Bit, PB_6.11b1
Benutzeravatar
Macros
Beiträge: 1361
Registriert: 23.12.2005 15:00
Wohnort: Olching(bei FFB)
Kontaktdaten:

Beitrag von Macros »

Das hatten wir doch schon längst.
Benutzeravatar
Falko
Admin
Beiträge: 3535
Registriert: 29.08.2004 11:27
Computerausstattung: PC: MSI-Z590-GC; 32GB-DDR4, ICore9; 2TB M2 + 2x3TB-SATA2 HDD; Intel ICore9 @ 3600MHZ (Win11 Pro. 64-Bit),
Acer Aspire E15 (Win11 Home X64). Purebasic LTS 6.11b1
HP255G8 Notebook @AMD Ryzen 5 5500U with Radeon Graphics 2.10 GHz 3.4GHz, 32GB_RAM, 3TB_SSD (Win11 Pro 64-Bit)
Kontaktdaten:

Beitrag von Falko »

Das kommt davon wenn man am Ende erst liest und am Anfang das Zitat nimmt. Sorry :oops:
Bild
Win11 Pro 64-Bit, PB_6.11b1
Benutzeravatar
NicTheQuick
Ein Admin
Beiträge: 8809
Registriert: 29.08.2004 20:20
Computerausstattung: Ryzen 7 5800X, 64 GB DDR4-3200
Ubuntu 24.04.2 LTS
GeForce RTX 3080 Ti
Wohnort: Saarbrücken

Beitrag von NicTheQuick »

Hier ist ein 64-Byte Programm (allerdings nicht von mir):
(Das eigentlich Programm ist natürlich der Hex-Code da unten)

Code: Alles auswählen

File.s = "C:\Tolle 64 Byte Demo von farbrausch.com"
If FileSize(File) >= 0 : MessageRequester("", "Datei gibt es schon") : End : EndIf
FileID.l = CreateFile(#PB_Any, File)
If FileID
  WriteData(?Demo, 64)
  CloseFile(FileID)
  RunProgram(File, "", "", 1)
  DeleteFile(File)
EndIf

DataSection
  Demo:
    Data.b $B0, $13, $F5, $42, $CD, $10, $68, $00, $A0, $07, $F7, $E3, $40, $01, $F8, $11
    Data.b $1C, $F7, $74, $0C, $D8, $0C, $DE, $04, $DF, $1F, $2D, $82, $00, $87, $07, $31
    Data.b $C1, $DF, $07, $D8, $C8, $31, $EB, $92, $D9, $C9, $75, $E8, $DE, $C1, $D9, $FA
    Data.b $D8, $3C, $DF, $07, $DF, $46, $00, $D9, $F3, $D6, $91, $0C, $87, $AA, $EB, $CA
EndDataSection
Antworten