こんにちはー、ちーでーす。(*^_^*)
最近、ちー達模様のことをやっていまーす。(*^_^*)
そして、"フトマニ図"と云うのが、
模様にパワーがあって良さそうだと云うことが判ったの。
と云うことで、"フトマニ図"を掲載いたしまーす。
良かったら、みてね。(*^_^*)
*参考 フトマニ図について*
http://auwa.sakura.ne.jp/forum/Japan/148huto4.html
＊フトマニ図＊
・ホツマ文字タイプ(一般的なタイプです)
・ホメミ文字タイプ
・龍体文字
・龍踊文字
他にもタイプがあるようですが、代表的な４タイプを掲載させていただきました。
閲覧ありがとうございまーす。(*^_^*)
今日はこれで、失礼いたしまーす。ヽ(^o^)丿
こんにちはー、ちーでーす。(*^_^*)
ひきこもり君(札幌)さんが、三角形を２個書いてみたの。(*^_^*)
書き方は下に掲載しているので、
良かったら、やってみてね。
＊書き方(作り方)＊
下記のプログラムを十進BASICインタプリターに入力し、
プログラム実行中に
インプットボックスの表示で、
"個数:2以上の数を入れて下さい"と出たら数字の2(半角)を入れ、
"角数:3以上の数を入れて下さい"と出たら数字の3(半角)を入れ、
"中心線よりxxﾄﾞｯﾄ離れている 調整? OK(999入力)?"と出たら
調整したい場合はタテのドット数、そのままの場合には、999(半角)
を入れてください
*誤差の関係で、インプットボックスに表示されている中心線との差のドット数
が±１ドットの差が出る場合があります。
10 PICTURE zou
20 LET E=0
30 LET F=PI*2*E/360
40 LET X=150*COS(F)
50 LET Y=150*SIN(F)
60 LET X1=X
70 LET Y1=Y
80 LET J=X
90 FOR E=0 TO 361 STEP G
100 LET F=PI*2*E/360
110 LET X=150*COS(F)
120 LET Y=150*SIN(F)
130 PLOT LINES:X1,Y1;X,Y
140 LET X1=X
150 LET Y1=Y
160 IF J>X THEN
165 LET J=X
170 END IF
180 NEXT E
190 END PICTURE
200 PICTURE zou2
210 DRAW zou WITH ROTATE(H)*SHIFT(0,O)
220 END PICTURE
230 SET WINDOW -350,350,-350,350
240 SET POINT STYLE 1
250 INPUT PROMPT "個数:2以上の数を入れて下さい":A
260 INPUT PROMPT "角数:3以上の数を入れて下さい":D
270 LET G=360/D
280 LET H=PI*2*90/360
300 LET M=150
305 LET O=M
355 SET LINE COLOR 15
360 PLOT LINES:-350,0;350,0
365 PLOT LINES:0,-350;0,350
370 SET LINE COLOR 1
372 DRAW zou2
374 LET L=INT(J)
376 LET N=150+L
378 LET P=N
380 INPUT PROMPT "中心線より" & STR$(P) & "ﾄﾞｯﾄ離れている 調整? OK(999入力)?":K
385 IF K=999 THEN
390 GOTO 470
400 ELSE
410 LET M=150-K
420 LET O=M
430 LET P=N-K
440 CLEAR
442 SET LINE COLOR 15
444 PLOT LINES:-350,0;350,0
446 PLOT LINES:0,-350;0,350
447 SET LINE COLOR 1
448 DRAW zou2
450 GOTO 380
460 END IF
470 CLEAR
480 DRAW zou2
490 FOR I=2 TO A
500 LET C=C+PI*2/A
510 DRAW zou2 WITH ROTATE(C)
520 NEXT I
END
*参考*
・三角形２個
閲覧ありがとうございまーす。(*^_^*)
今日はこれで、失礼いたしまーす。ヽ(^o^)丿
こんにちはー、ちーでーす。(*^_^*)
最近、西友手稲前田店のＢＧＭで気に入った曲があったので、
(1曲ですが)掲載させていただきまーす。
良かったら、聴いてね。(*^_^*)
＊オートリピートはありません
尚、西友さんの今月のＢＧＭリストはこちらでーす。(*^_^*)
http://www.seiyu.co.jp/campaign/bgm/index.html
閲覧ありがとうございまーす。(*^_^*)
今日はこれで、失礼いたしまーす。ヽ(^o^)丿
地球大皇帝様,地球大天使様,他は、部下(奴隷と呼ばれていることあり)を全て自由開放しました。
こんにちはー、ちーでーす。(*^_^*)
地球大皇帝様,地球大天使様,他は神様からのメッセージに基づき、
本日、部下(一部では奴隷と呼ばれることもある)を全員全て完全自由解放をいたしました。
神様と当グループのやり取りで、まづ先に米国がアセンションすることを条件に、
部下(一部では奴隷と呼ばれることもある)を全員全て完全自由解放をいたしました。
(医療のみ)ソフトランディング型アセンションの実現となります。
地球大皇帝様,地球大天使様,他はひきこもり君(札幌)さんの助言に基づき、
本年度中に、米国は宇宙人及び宇宙連邦に関する事柄を公開し、
(テクノロジーを除く,ただし医療は公開)
本年度中に、米国の単独で宇宙連邦加盟の調印式典を
宇宙連邦代表者と行うこと。(準加盟となります。)
社会システム,乗り物/輸送機器,エネルギー,エレクトロニクス,.....等他の
技術導入は一切なしで、
医療技術だけのみ、宇宙連邦に技術有償提供を依頼する。
特に(腎臓等の)内臓関係の技術に関しては、最優先で技術導入を行うものとする。
医療技術以外は(社会システム,金融システム等も)、
地球人類の自活,自助努力,自己開発,自己発明にて行うものとする。
これで、米国及び他の国の医療技術は一気に数千年進歩することとなり、
米国やその他の国の腎臓,心臓等他で現代医療で困っている方々が、
"米国great=holyメディカルソフトランディングアセンション"にて
楽に完全治療ができることとなります。
他の国に関しては調整がたいへん難航するので、
(特に韓国/北朝鮮,中国,他等、長い７０年間の歴史が証明しています。)
米国のみで"米国great=holyメディカルソフトランディングアセンション"を
行うこととなります。
＊大勅令＊
・米国は宇宙人及び宇宙連邦に関する事柄を本年度中に公開し
(テクノロジー以外,ただし医療は公開)、本年度中に米国単独で"宇宙連邦"に
加盟すること。加盟調印式典は米国にて行うものとする。
また加盟形態は"準加盟"となる。
・日本国は最重要同盟国であるので、なるべく速いうちにそれに追従すること。
・医療技術以外は全て地球人類の自活,自助努力にて発展向上を行うこととする。
・いち早く、腎臓他等の内臓系の疾患の治療を最優先で技術導入を行うこと。
*注)上記の情報の真偽に関しては当Blogは一切保証いたしませんので、
ご了承願います。又、上記の記述に関しては当Blogは社会的責任等他
一切責任は負いませんので、ご了承願います。
当Blogでは記事の内容は保障できないの。
ごめんなさーい。m(_ _)m
閲覧ありがとうございまーす。(*^_^*)
今日はこれで、失礼いたしまーす。ヽ(^o^)丿
