HSPのコード一覧 | ページ 15 | Codetter（こーどったー）

#deffunc RESTAPI var p1, var p2, int p3, str p4, array p5

// ～略～
					repeat notemax
						noteget API_BufStr, cnt

#uselib "user32.dll"
#cfunc GetWindowLong "GetWindowLongA" int, int
#func SetWindowLong "SetWindowLongA" int, int, int

#define GWL_ID	-12

;
;[ Infomation ]
; Name      : ドロネー三角形分割
; SubName   : 
; Version   : 

// これでも動く驚き
button : gosub "btn", *btn
// 普通はこれかと
;button gosub "btn", *btn
stop

;
;	ツイートボタンの代わりをしてみるテスト
;
#include "shell32.as"
#define SW_SHOWDEFAULT 10

#include "shell32.as"
#define SW_SHOWDEFAULT 10

	url = "http://www.google.co.jp/search?q=ABCDEFGHIJKLMNOPQRSTUVWXYZ"
	url += "ABCDEFGHIJKLMNOPQRSTUVWXYZ"

#include "hspinet.as"
#include "encode.as"

src = "ウィキペディア"
dest = ""

#include "llmod.as"
#include "unicode.as"
#module
#deffunc replaceNullW val, int, int
	mref buf, 24

// HSP 2.61用コード
#include "llmod.as"
#include "unicode.as"
#module
#define WM_SETTEXT  0x000C

#runtime "hsp3ld"
#include "user32.as"
#include "kernel32.as"
#module load_dll
#deffunc load_dll_init