ゴールデンウィークは2億円のお宝さがし!


そろそろゴールデンウィーク直前が、もうバカンスの計画は立てたでしょうか?
今年はカレンダーどおりで5連休、中2日間も休めば9連休です。
南の島でノンビリするものいいでしょうねー


まぁーしかし、現実は家庭の事情とか色々とあって、そんなに人生は甘くはないのですが、色々と妄想するのは楽しいものです。
そんな妄想ネタです。



糸井重里の「徳川埋蔵金」って番組が好きだったんですが、最近はやってないのかな?出ないのはわかってるのですが、何故か最後まで見てしまう夢のある番組でした。w

糸井重里・徳川埋蔵金伝説 360万両は赤城山にある! 1/9
https://youtu.be/j32zj63E3zw


ただ現実的には、もしお宝が見つかっても文化的な遺産の場合、文化財保護法でほぼ没収されてしまうようです。たとえ時価4000億円でもスズメの涙しか手元には残りません。もしこっそり持ち出したら「遺失物等横領」で刑事罰を受けることになるのでお気を付けください。


ちょっと残念な夢のない話になってしまいましたが、アメリカのある大金持ちが「ロッキー山脈のどこかに2億円相当のお宝隠した」と公表したようです。
そんな人騒がせなオッチャンがこの方です。

forrest.fenn
https://www.instagram.com/forrest.fenn

彼はベトナム戦争時はパイロットだったようで、退役後に古美術商を営んで大金持ちになったようです。古美術の目利きの才能があったようです。


手がかりは「宝の地図」と意味深な「ポエム」となります。

宝の地図


ポエム

As I have gone alone in there
And with my treasures bold,
I can keep my secret where,
And hint of riches new and old.

Begin it where warm waters halt
And take it in the canyon down,
Not far, but too far to walk.
Put in below the home of Brown.

From there it’s no place for the meek,
The end is ever drawing nigh;
There’ll be no paddle up your creek,
Just heavy loads and water high.

If you’ve been wise and found the blaze,
Look quickly down, your quest to cease,
But tarry scant with marvel gaze,
Just take the chest and go in peace.

So why is it that I must go
And leave my trove for all to seek?
The answers I already know,
I’ve done it tired, and now I’m weak.

So hear me all and listen good,
Your effort will be worth the cold.
If you are brave and in the wood
I give you title to the gold.


ここに詳しく載ってます。(激重ページなので注意!)

In search of Forrest Fenn’s treasure
https://www.vox.com/a/fenn-treasure-hunt-map

宝箱はロマネスク様式でサイズは10×10インチのブロンズ製、重さは40ポンドだそうです。大きさ的にはミカン箱くらいでしょうか?重さが18kgもあるのなら80才の爺さんが素手で運べるものじゃないでしょう。

宝箱は水の中じゃなくて、リオグランデ川の近くでもなくて、大きな岩石を動かす必要もなく、険しい崖を登ったり降りたりする必要もなく、人工物の下には無いそうです。
もっと知りたい人は彼のブログから「カンニングペーパー」を見てください。

Thrill Of The Chase…
https://dalneitzel.com/2017/06/29/safety_first/

既に35万人以上がお宝探しにチャレンジして、4人が事故死しているようです。まさに命がけでお宝探しに夢中になってる人がいるようです。



ただ、気になるのはこの記事のコメントです。

An 87-year-old millionaire buried treasure in the Rockies?and he’s offered one main clue
https://www.cnbc.com/2018/04/17/millionaire-forrest-fenn-hid-treasure-in-the-rockies-and-left-a-clue.html

"It could be found soon or 1,000 years from now,"

「それはすぐに見つかるか1000年後」

この方、古美術商でしたよね。
古美術って、その当時は大した価値のないガラクタでも時間と共に価値が増大するという商売です。つまりどんなゴミでも1000年も経てば価値が出るわけです。

例えば、女子高生に大流行している「iPhone」を厳重なタイムカプセルに入れて1000年後に取り出したとしたら?相当な価値が付くかもしれません。
ひょっとしたらそんなゴミを隠したのかもしれませんね?

ただ隠したのは20年前に用意した宝箱のようなのでiPhoneじゃないでしょう。
20年前といえば何が流行ってたかな?・・・ファミコン???



しかしロッキー山脈と一言で言ってもとてつもなく広大です。
一度はトレッキングしてみたい綺麗なところです。

ROCKY MOUNTAIN 8K
https://youtu.be/9Gh44EYQ2zw


さっ!ゴールデンウィークはロッキー山脈に行きますか?

ただし、もしお宝を見つけたとしても、それをどうやってアメリカから持ち出すか?かなりハードルが高そうです・・・

どちら様もご無事で!



スムーススクロールするインフィニティーな世界 TIC-80


やってみたかったのは無限にスムーススクロールするインフィニティーな世界です。
マップは「パーリンノイズ」という計算式で、四方どの方向にも地理的に不変的なマップを無限に生成します。

ただこれは簡単なテストプログラムなので、ゲームとしては成立していません。
サンプルとして適当な当たり判定を付けていますので、シューティングゲームのベースして使えるか?と思います。

カーソルキーで移動と「Z」「X」キーでミサイルを発射します。
どこまで飛べるか試してみてください。w

TIC-80 Drone Attack #TIC80
https://tic.computer/play?cart=514



ただしブラウザ版では処理落ちが激しく正常に動作しません。
ダウンロードしてからローカルで実行してください。



山遊び「囲炉裏を作る」



山遊びは楽しいです。
休日は朝から山に籠もっています。

いつも焚き火をするので水場を整備しました。
窪地の水たまりを掘り広げました。


竹で足場も作って完成です。
濁ってますがしばらくすると水も澄んできます。


かなり水も澄んで、これで水には不自由しません。


続いて囲炉裏作りです。
といっても何もないのですが、竹のベンチを作りました。

まず適当な長さに竹をカットします。


竹を縛る紐は天然のツルを使います。
ツルは山に沢山生えているのでロープ代わりに使えます。


竹をツルで編んでいきます。


両方編めばベンチシートの完成です。簡単!


竹の表面をバナーでさっと炙ると油分が溶けて綺麗な緑色になります。
本来は竹を茹でて油抜きすると軽くて固く長持ちする竹材が作れます。


100%天然素材なので不要になれば囲炉裏の燃料にもなります。w


ラジオを聞きながら、オヤツ付きで火守してると超リラックスできます。
まさに人間の原風景、ストレス解消にはもってこいです。


竹ベンチと囲炉裏
https://youtu.be/ccIQOTL87xs


ちなみに孟宗竹の寿命は67年と言われています。
最後に花を付けて米のような実がなります。
実は米と同様に食べれるようですが美味しくないようです。

DNAにタイマーを持っていて、枯れる時は地域の竹林が一斉に枯れるようです。
竹はイネ科の植物ですが、草なのか?樹木なのか?不思議な植物のようです。

本日の収穫はこれだけです。


皮を剥いているので小さく見えますが、一番小さいのが市販されている上品なサイズです。それと比較するとほぼ商品価値のない巨大な竹の兄貴達ですが、これがまた美味いのです。

リタイヤしたら山の仙人になります。


TIC-80 テクスチャーマッピングの例題


まだ、ひっそりとTIC-80をやってます。

TIC-80 Rubber Texture Mapping #TIC80
https://tic.computer/play?cart=509


「textri」を使ったテクスチャーマッピングの例題です。
マウスでドラッグすると画像がグニャグニャに動きます。

元画像は0x4000~のスプライト領域に貼ってますが、
どうも関数の動きがイマイチです?・・・

lua言語を勉強しませんか?
TIC-80、日本でやってる人ほぼゼロかも?

チャレンジャー求む!


============================================
以下ソースコードです。
============================================

-- title: Rubber
-- author: Time Tripper
-- desc: Rubber Texture Mapping
-- script: lua

pic_data={
"000000
:
【省略】
:
0000000"
}

pal={
"000000",
"070707",
"0E0E0E",
"151515",
"1C1C1C",
"232323",
"2A2A2A",
"313131",
"383838",
"3F3F3F",
"464646",
"4D4D4D",
"545454",
"5B5B5B",
"626262",
"696969"
}

function pallet()
i=0x3FC0
for y=1,16 do
for x=1,6,2 do
poke(i,tonumber(string.sub(pal[y],x,x+1),16))
i=i+1
end
end
end

function draw_pic()
cls()
i=0x4000
for sy=0,16 do
for sx=5,20 do
for iy=0,7 do
for ix=0,3 do
x=sx*8+ix*2+1
y=sy*8+iy+1
poke(i,tonumber(string.sub(pic_data[y],x+1,x+1)..string.sub(pic_data[y],x,x),16))
i=i+1
end
end
end
end
end


sqrt=math.sqrt
max=math.max
min=math.min
abs=math.abs
rand=math.random


function len(x1,y1,x2,y2)
return sqrt((x1-x2)^2+(y1-y2)^2)
end

par={}
function make_data()
for y=-10,150,5 do
for x=-10,250,5 do
local p={}
p.px=x
p.py=y
p.vx=0
p.vy=0
p.pc=15
table.insert(par,p)
end
end
end

function move()
for y=1,31 do
for x=2,52 do
i=x+y*53
local p=par[i]
p.px=p.px+p.vx
p.py=p.py+p.vy
p.vx=p.vx*0.93
p.vy=p.vy*0.93
p.vx=p.vx+(par[i-1].px-p.px)/50
p.vx=p.vx+(par[i+1].px-p.px)/50
p.vx=p.vx+(par[i-53].px-p.px)/50
p.vx=p.vx+(par[i+53].px-p.px)/50
p.vy=p.vy+(par[i-1].py-p.py)/50
p.vy=p.vy+(par[i+1].py-p.py)/50
p.vy=p.vy+(par[i-53].py-p.py)/50
p.vy=p.vy+(par[i+53].py-p.py)/50
end
end
end

function draw()
--cls()
for y=0,31 do
for x=1,52 do
i=x+y*53
local p=par[i]
textri(par[i].px,par[i].py,
par[i+1].px,par[i+1].py,
par[i+53].px,par[i+53].py,
(x-1)*5,y*5,
x*5,y*5,
(x-1)*5,(y+1)*5,
false,
0)
textri(par[i+54].px,par[i+54].py,
par[i+1].px,par[i+1].py,
par[i+53].px,par[i+53].py,
x*5,(y+1)*5,
x*5,y*5,
(x-1)*5,(y+1)*5,
false,
0)
--pix(p.px,p.py,15)
end
end
end

function init()
draw_pic()
pallet()
make_data()
end


init()


function TIC()
mx,my,md=mouse()
if md then
for i=1,#par do
local p=par[i]
w=len(mx,my,p.px,p.py)
if w<10 then
p.px=mx
p.py=my
end
end
end
move()
draw()
end



タケノコと焚き火

 
昨日のハイキングで若干筋肉痛ですが、朝からタケノコを見てきました。


ありました。今年の初物です。


本日の成果は3本でした。
初日はこんなものです。


午後は竹藪の整理をしました。
火遊びは楽しいですねーw

Bonfire at Bamboo forest 竹藪で焚き火
https://youtu.be/AxaUPp0kjOc


火の後始末はしっかりしないといけません。
竹をカットしてコップを作って、沢水を汲んで完全消火です。


本日の整理は下回りだけですが少しはスッキリしました。
ひと雨くれば来週はタケノコラッシュかも?


当然ですが、やっぱり美味いねー w