ページ 29 | Codetter（こーどったー）

#module 
#uselib "ws2_32.dll"
#cfunc WSAStartup "WSAStartup" int, sptr
#func WSACleanup "WSACleanup"
#cfunc inet_addr "inet_addr" str

// 改造はご自由に
#module
#uselib "ws2_32.dll"
#cfunc WSAStartup "WSAStartup" int, sptr
#cfunc inet_addr "inet_addr" str

// ファイルの所有者を変更してみる by ake260

// ※管理者権限で実行してください

#uselib "advapi32.dll"

PS1='\a\h:\w \u$ '
PS1='\a\h:\W \u$ '

// 一部のみ
#deffunc RESTAPI var p1, var p2, int p3, str p4, array p5
//  引数チェック＆初期化
	sdim p1
	sdim p2

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

// ～略～
					repeat notemax
						noteget API_BufStr, cnt

library IEEE;
use IEEE.std_logic_1164.all;
use IEEE.std_logic_arith.all;
 
entity TEST_ARY is

library IEEE;
use IEEE.std_logic_1164.all;
use IEEE.std_logic_arith.all;

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

#define GWL_ID	-12

#! /usr/bin/ruby

t = Time.now
p t.year	#=> 2012
p t.month	#=> 3