すべてのコード

投稿されたすべてのコード一覧

HSPでモジュール変数再現

できないことはなかったけどマクロまみれだしとてつもなかった。型を放棄して全部文字列とかにすればかなり楽になるのは確か。
できないことはなかったけどマクロまみれだしとてつもなかった。型を放棄して全部文字列とかにすればかなり楽になるのは確か。
#module Person
	;int
	#enum age=0
	;str
	#enum name=0
コードを見る
  • タグ:
  • hsp

トランプモジュール

HSPでトランプのモジュール型変数を作って適当に配る
HSPでトランプのモジュール型変数を作って適当に配る
#runtime "hsp3cl"
#cmpopt varinit 1

#module TrumpCard name,power,suit
	#modinit str _name,int _power,int _suit
コードを見る
  • タグ:
  • hsp

FNV-1 on HSP (ハッシュ関数)

http://wowdev.jp/?p=873 からお借りしてHSPに移植しました。
http://wowdev.jp/?p=873 からお借りしてHSPに移植しました。
// http://wowdev.jp/?p=873
// https://qiita.com/Ushio/items/a19083514d087a57fc72
/**
 * FNV Constants
 */
コードを見る

HSPプログラムコンテストの作品をリスト&カウント

Enterキーで選択中の作品ページを開きます。 マイナスの文字が化けているかも。33行目のマイナス、78行目の "<!–段落始まり–>" はHT...
Enterキーで選択中の作品ページを開きます。 マイナスの文字が化けているかも。33行目のマイナス、78行目の "<!–段落始まり–>" はHT...
#include "hspinet.as"

#define URL_BASE "http://dev.onionsoft.net/seed/info.ax?id="

	netinit
コードを見る
  • タグ:
  • タグはありません

みんな遅い遅いって言うから高速動作するstrmid作ったよ

strmidと置き換えるだけで使えます。右から取り出す場合はstrlenが重くてどうしようもありませんでした。(´・ω・`)
strmidと置き換えるだけで使えます。右から取り出す場合はstrlenが重くてどうしようもありませんでした。(´・ω・`)
// 
// [ Infomation ]
//  Name      : 高速strmid
//  SubName   : 
//  Version   : 1.00
コードを見る

矩形敷き詰め問題

矩形(デフォルトで正方形)をなるべく隙間が出来ないように左上から敷き詰める。 画面をスプレッドシートとして扱い、空き領域を「セル」として管理する。
矩形(デフォルトで正方形)をなるべく隙間が出来ないように左上から敷き詰める。 画面をスプレッドシートとして扱い、空き領域を「セル」として管理する。
/*
	矩形敷き詰め問題
	
	 表計算ソフトのシートの要領で空き領域を管理する。
	爆速だけどメモリ消費が多い(100個の矩形で6MB程)。
コードを見る
  • タグ:
  • タグはありません

テキストルーレット

この前作ったXorShiftモジュールを使ってざっくりと適当に作った。
この前作ったXorShiftモジュールを使ってざっくりと適当に作った。
#cmpopt varinit 1
#packopt name "txtLret"
#packopt xsize 600,ysize 400
#include "XorShift.as"

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