Zitat:

---

Gibt es denn ein SDL-Porting-Guide für den Amiga (auch wenn genannte Funktionen erstmal nichts mit SDL zu tun haben scheinen)?

---

C code:

---

struct CSet
{
    uint32 CodeSet;
    uint32 Reserved[7];
}

---

C code:

---

/* Good coders do not comment. What was hard to write should be hard to read too. */

---

Zitat:

---

locale.library/--environment_vars--

Starting with V40, locale.library maintains a global environment variable called "Language" which contains the name of the current default language as used in the system. This is the name of the language associated with the Locale structure returned by OpenLocale(NULL).

Starting with V50, locale.library maintains a global environment variable called "LanguageName" which contains the name of the current default language as used in the system. This is the english name of the language associated with the Locale structure returned by OpenLocale(NULL). For compatibility, "Language" may be non-english or even non-ASCII.

Starting with V50, locale.library maintains a global environment variable called "Charset" which contains the MIME name of the current default charset as used in the system. This is the name of the charset associated with the Locale structure returned by OpenLocale(NULL).

---

ARexx code:

---

/* Diese Notifys in CreateApp einfügen, Fenster-Schließen oder Cancel-Button */
call Notify("progress","CloseRequest",1,"app","Return","LEAVEME")
call Notify("cancel","pressed",0,"app","Return","LEAVEME")
/* END Notifys */

----

/* die schleife mit der fortschrittsanzeige */
go:
call set('win','Sleep',1)
call set("progress","open",1)

ns=1
DO a=0 to 1054

	if a*100/1054>5*ns then do
		percent=5*ns
		/* die anzeige wird aktualisiert */
		call set("gauge_glob_progress","Current",percent)
		call set("gauge_glob_progress","InfoText",percent||"%")
		call set("gauge_glob_progress","ShowMe",1)
		ns=ns+1
	end

	/* Jetzt nach Events abfragen, aber die Anwendung nicht blockieren */
	h.NoWait = 1
	call NewHandle("APP","H")
	/* Das einzige Event hier sollte LEAVEME sein */
	if h.event="LEAVEME" then leave

END

call set("progress","open",0)
call set('win','Sleep',0)

return

---

code:

---

"=?" charset "?" encoding "?" encoded-text "?="

---

code:

---

percent = trunc(percent+0.5, 0)

---

ARexx code:

---

/*
save all parts of an email
*/

OPTIONS RESULTS

smport = ADDRESS()

IF smport ~== "SIMPLEMAIL.1" THEN
DO
        smport = "SIMPLEMAIL.1"
        address "SIMPLEMAIL.1"
END

READINFO STEM mail.

DO i = 0 TO mail.filename.count-1
   savename = 'RAM:part.' || i
   READSAVE PART i FILENAME '"' || savename || '"'
END

---

ARexx code:

---

/*
save all parts of an email
*/

OPTIONS RESULTS

smport = ADDRESS()

IF smport ~== "SIMPLEMAIL.1" THEN
DO
	smport = "SIMPLEMAIL.1"
	address "SIMPLEMAIL.1"
END

READINFO STEM mail.

DO i = 0 TO mail.filename.count-1
   savename = 'RAM:' || mail.filename.i
   "READSAVE PART i FILENAME '" || savename || "'"
END

---

Zitat:

---

Eine Library heißt unter AmigaOS 4 selbstverständlich *.library, ...

---

Du meinst sicherlich #?.library, SCNR

Zitat:

---

... Boolgadget (Knopf gedrückt oder nicht heißen die nicht auch Radio Knöpfe ???).

---

code:

---

This is a multi-part message in MIME format.

------=_MIX_ff0fb2fd365833f450710935166116e0
Content-Type: multipart/related;
        boundary="----=_REL_7a1d89cceb7746105bc99a82ec276109"

------=_REL_7a1d89cceb7746105bc99a82ec276109
Content-Type: multipart/alternative;
        boundary="----=_ALT_f180c493dba4bde2ed453ddd7f6d8bd4"

---

code:

---

This is a multi-part message in MIME format.

------=_MIX_ff0fb2fd365833f450710935166116e0
Content-Type: multipart/related;
        boundary="----=_REL_7a1d89cceb7746105bc99a82ec276109"

This is a multipart message in MIME format.

------=_REL_7a1d89cceb7746105bc99a82ec276109
Content-Type: multipart/alternative;
        boundary="----=_ALT_f180c493dba4bde2ed453ddd7f6d8bd4"

---

code:

---

220 smtp.1und1.de (mrelayeu7) Welcome to Nemesis ESMTP server
ehlo 1und1.de
250-mrelayeu7.kundenserver.de pleased to meet you
250-STARTTLS
250-AUTH PLAIN LOGIN
250-AUTH=PLAIN LOGIN
250-PIPELINING
250-SIZE 52428800
250 HELP

---

code:

---

multipart/mixed
   multipart/alternative
      text/plain
      multipart/related
         text/html
         image/jpeg
         image/jpeg
         image/jpeg
   text/plain

---