HSP

HSPに投稿されたコード一覧

【非推奨】wait相当の動作をするはずのモジュール

HSP 3.6 β3 コールバックルーチン中のwaitが使用できなくなったので、自前でメッセージループを処理してwait相当の処理をするモジュール。 おすすめはしないです。
HSP 3.6 β3 コールバックルーチン中のwaitが使用できなくなったので、自前でメッセージループを処理してwait相当の処理をするモジュール。 おすすめはしないです。
// モジュール開始
#module waithack
#uselib "user32.dll"
#func PeekMessageA "PeekMessageA" sptr,sptr,int,int,int
#func GetMessageA "GetMessageA" sptr,int,int,int
コードを見る
  • hk1v
  • 2020/7/5 23:49
  • タグ:
  • タグはありません

配列の引き算

いろいろしたいことを試していたら、結果、 配列の引き算になってしまいました。 インデックスソートを行った後、そのリストから削除するインデックス、のリストを受け取って、整列を維持したまま削除する という...
いろいろしたいことを試していたら、結果、 配列の引き算になってしまいました。 インデックスソートを行った後、そのリストから削除するインデックス、のリストを受け取って、整列を維持したまま削除する という...
#module
//{ 配列a - 配列b : return 引いた後の配列aのサイズ } ( aもbも破壊します)
#defcfunc 配列引き算 array a, array b, int sizeA, int sizeB
	lpoke ln
	bn = sizeB
コードを見る

長テーブルのうなぎ屋

ネットで見つけた問題を解きました。 https://qiita.com/krppppp/items/a75205c9dcb4165ca2b4
ネットで見つけた問題を解きました。 https://qiita.com/krppppp/items/a75205c9dcb4165ca2b4
#module
#deffunc うなぎ屋さんの設定 str 入力1
	s = 入力1
	split s, " ", table_max, group_max
	table_max = int(table_max)
コードを見る
  • タグ:
  • タグはありません
  • タグ:
  • タグはありません

HSPでプチコンのCALL関数のようなもの

#include "hscallbk.as" #include "var_ass […]
#include "hscallbk.as" #include "var_ass […]
#include "hscallbk.as"
#include "var_assoc.as"

#module
	#uselib ""
コードを見る
  • タグ:
  • タグはありません

HSPでカラーコードを使う。

#deffunc cc2rgb ref array RGB,str cc カラーコードをRGB配列に変換する。 #define ctype apply3 array RGB 配列を3つの引数に展開する...
#deffunc cc2rgb ref array RGB,str cc カラーコードをRGB配列に変換する。 #define ctype apply3 array RGB 配列を3つの引数に展開する...
#module @cc2rgb
	#deffunc local cc2rgb array RGB,str _cc
		cc=_cc
		ccLen=strlen(cc)
		cci=int("$"+strmid(cc,1,ccLen-1))
コードを見る
  • タグ:
  • タグはありません

無理やり文字化け

ヒマじゃないけどヒマだから
ヒマじゃないけどヒマだから
#include "hspinet.as"

title"文字化けちゃう"

text=""
コードを見る