スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

お絵かきロジックをプログラムで解かせる

[WP]no.017 お絵かきロジック解法
http://shonen9th.blog.fc2.com/blog-entry-58.html

全体のソースコードを載せない的なことを言ったような気がしますが、載せました。
どちらかと言えばGithubの練習がメインです。

https://github.com/buyoh/prgm_paintl

現在40x40の問題で、8秒かかります。(著作権の都合上このサンプルデータのアップロードはできません)
もっと早くできる気がするんですがー。


github、まだ便利という実感が湧かない…


おまけ:支援ツール
言語はHSP3


#const SCR_CELLX 100
#const SCR_CELLY 100
#const FONT_H 10
#const FONT_W 10

nlarge="0","1","2","3","4","5","6","7","8","9"

rows=10
cols=10

inbox=""

screen 0
mesbox inbox,640,400,1,32768
button "update",*update
button "map",*map

screen 1,700,700,,,,300,300
font "MS ゴシック",11
mes "HelloWorldさしすせそ"
mes "abcdefghijあいうえお"
mes ginfo_mesx
mes ginfo_mesy

stop
*update
gsel 1
color 255,255,255:boxf
font "MS ゴシック",10

color 128,128,128
repeat 20
i=SCR_CELLX+cnt*FONT_W*5
line i,0,i,1000
i=SCR_CELLY+cnt*FONT_H*5
line 0,i,1000,i
loop
color 0,0,0

notesel inbox
h=0:w=-1
repeat notemax
noteget s,cnt

strrep s," "," "
s=strtrim(s,0,' ')

split s," ",res
l=stat
if (cnt==0){
w=-1
repeat l
if (res.cnt==""):continue
if (w==-1) :w=int(res.cnt):else:h=int(res.cnt):break
loop
continue
}
if (cnt<=w){
i=l
x=cnt-1
repeat l
if (res.cnt==""):continue
pos SCR_CELLX+FONT_W*x,SCR_CELLY-FONT_H*i
r=int(res.cnt):if (r<10):mes nlarge.r:else:mes res.cnt
i--
loop
continue
}
i=l
y=cnt-w-1
repeat l
if (res.cnt==""):continue
pos SCR_CELLX-FONT_W*i,SCR_CELLY+FONT_H*y
r=int(res.cnt):if (r<10):mes nlarge.r:else:mes res.cnt
i--
loop
continue

loop

stop
*map
gsel 1

notesel inbox
repeat notemax
noteget a,cnt
y=cnt
repeat strlen(a)/2
c=peek(a,cnt*2)
if (c=='#'):color 0,0,0
if (c=='?'):color 255,255,0
if (c=='_'):color 255,255,255
boxf SCR_CELLX+cnt*FONT_W+1,SCR_CELLY+y*FONT_H+1,SCR_CELLX+(cnt+1)*FONT_W-1,SCR_CELLY+(y+1)*FONT_H-1
loop
loop
stop
スポンサーサイト

テーマ : プログラミング
ジャンル : コンピュータ

tag : c++ アルゴリズムとデータ構造

コメントの投稿

非公開コメント

ブログ移転のお知らせ
ブログをshonen.hateblo.jpに移転します. 新規の記事はこちらに投稿します.
プロフィール

舞葉(ぶよう)

Author:舞葉(ぶよう)
github.io
はてなブログ(競プロ)

古い記事のソースコードは色分けしていないので、高機能テキストエディタに貼り付けたほうが見やすいかも。

検索フォーム
このブログについて
自分がつまづいた話題、なんとなく書きたいと思ったこと、ググったけど殆ど資料なかったぞオイ な話等をアップする予定。通りすがりでも、参考になっていただければと。プログラムの例外入力、メモリリークは責任負いません。投稿された記事は修正・削除する場合があります。
カテゴリ
タグ

HSP3アルゴリズムとデータ構造c++RubyJavaUnity画像解析C機械学習C#LinuxcodeIQKinectMinecraftTonyuSystemraspberrypiPythonHTML5音声制御Simulinkruby俺ルール通信制御Javascriptシミュレーション

counter-shinobi
固定記事
最新記事
最新コメント
月別アーカイブ
ブロとも申請フォーム

この人とブロともになる

アクセスランキング
[ジャンルランキング]
コンピュータ
635位
アクセスランキングを見る>>

[サブジャンルランキング]
プログラミング
94位
アクセスランキングを見る>>
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。