1: 2004-12-13 (月) 14:12:49 [5] | |||
---|---|---|---|
Line 1: | Line 1: | ||
+ | * wiki版のintroシリーズ | ||
+ | -(by [[K]], 2004.12.13) | ||
+ | -これはC言語でもASKAでもnaskでもとにかくごちゃまぜでintroしてしまおうというこころみ。 | ||
+ | --これは[[guide/ASKA]]や[[guide/nask]]の続きなので、それを読んでない人はそれを読んでね。 | ||
+ | --C言語をやる人はintroaを読むといいでしょう。ここのプログラムは、introaと同一内容です。 | ||
+ | -質問とかはこめんと欄にレッツゴー。 | ||
+ | *** hello, world | ||
+ | -C版:"helloc4.c" | ||
+ | /* "helloc4.c":helloをC言語で記述した例 */ | ||
+ | /* stack:20k malloc:1k */ | ||
+ | |||
+ | #include <guigui00.h> | ||
+ | |||
+ | #define AUTO_MALLOC 0 | ||
+ | |||
+ | void OsaskMain() | ||
+ | { | ||
+ | struct LIB_WINDOW *window; | ||
+ | struct LIB_TEXTBOX *wintitle, *textbox; | ||
+ | |||
+ | /* ライブラリの初期化(必ず最初にやらなければならない) */ | ||
+ | lib_init(AUTO_MALLOC); | ||
+ | |||
+ | /* ウィンドウのオープン */ | ||
+ | window = lib_openwindow(AUTO_MALLOC, 0x0200, 136, 48); | ||
+ | |||
+ | /* ウィンドウタイトル用のテキストボックスをオープン */ | ||
+ | wintitle = lib_opentextbox(0x1000, AUTO_MALLOC, 0, 7, 1, 0, 0, window, 0x00c0, 0); | ||
+ | |||
+ | /* "hello, world"を表示するためのテキストボックスをオープン */ | ||
+ | textbox = lib_opentextbox(0x0000, AUTO_MALLOC, 0, 12, 1, 16, 16, window, 0x00c0, 0); | ||
+ | |||
+ | /* ウィンドウタイトルを表示 */ | ||
+ | lib_putstring_ASCII(0x0000, 0, 0, wintitle, 0, 0, "helloc4"); | ||
+ | |||
+ | /* メッセージを表示 */ | ||
+ | lib_putstring_ASCII(0x0000, 0, 0, textbox, 0, 0, "hello, world"); | ||
+ | |||
+ | /* 終了 */ | ||
+ | lib_waitsignal(0x0001, 0, 0); | ||
+ | } | ||
+ | |||
+ | -ASKA版:"helloa4.ask" | ||
+ | /* "helloa4.ask":helloをASKAで記述した例 */ | ||
+ | /* stack:20k malloc:0k */ | ||
+ | |||
+ | |||
+ | -nask版:"hellon4.nas" | ||
+ | ; "hellon4.nas":helloをnaskで記述した例 | ||
+ | ; stack:20k malloc:0k | ||
+ | |||
+ | |||
+ | |||
+ | |||
+ | * こめんと欄 | ||
+ | #comment |
(This host) = http://osask.net