今日もお疲れ様でした
おやすみなさい
また明日 バイト3日目なんだけどなーんにも覚えてなくて死にたい
明日精神科通院だけど起きれる気がしない。 明日は午後から作業だ
やっと眠くなってきた
おやすみなさい
うあー今日面接
なにもしてなあ フルニトラゼパム4ミリとコントミン50ミリで寝たら3時間しか寝れなかった
きつい
昨日はドンキホーテでけつ毛カッター買ってけつ毛とちん毛を剃った
これでSEXの時にアナルも舐めてもらえる
おはようございます
今日も1日よろしくお願いいたします >>10
こんな俺にも理解のある彼女さんがいますなの？ 早起きすると一日中鬱という予感
今日も5時に起きたし不安だ
良い天気だなぁ
予定通り寝過ごして精神科行けなかった
ちんぽがムズムズする
しかし触ると疲れるので触りません
スクワットしてウォーキング出来れば良い
体重は91キロ
92キロから急に減量の速度が遅くなった
90キロを切ると一つまた励みになるのだが。 blender学習進めたいのにエロMMDのモデル改造やめらんなくてたすけて
仕事行くの面倒臭いけど4月という新年度だし行きたくない訳ではないがすげぇ眠い
午後からの仕事で良かったが風呂入らんと人前に出れる存在になれんのが面倒だ
1時間掛かってバリカンで坊主にした
何年もやってるのに全く時短出来ない
刈残しがないか慎重にしているので
どうしても時間が掛かる。
5年位自分で坊主にしているから
12*5で六万円は得してる 精神二級だが、ベーマガ世代のためにＢＡＳＩＣコンパイラーつくることにした。
10 RESTORE 1000
20 READ C
30 RESTORE
40 DIM COMMAND$(C),COML(C),TBL1$(10000),TBL2$(10000),TBL3$(10000)
50 FOR I=1 TO C
60 READ COMMAND$(I),COML(I)
70 PRINT I,COMMAND$(I)
80 NEXT I
85 LET R$="C:\Users\user\Documents\FFC.txt"
90 LET W$="C:\Users\user\Documents\RSLT.txt"
100 OPEN #1:NAME R$
110 OPEN #2:NAME W$
115 ERASE #2
117 LET N=1
119 DO
120 LINE INPUT #1,IF MISSING THEN EXIT DO:L$
130 LET TBL1$(N)=L$
140 FOR J=1 TO C
150 LET M=1
160 LET P=POS(L$,COMMAND$(J))
170 IF P=0 THEN GOTO 210
172 IF ORD(L$(P-1:P-1))>64 AND ORD(L$(P-1:P-1))<91 THEN GOTO 210
180 LET L$(POS(L$,COMMAND$(J),M):POS(L$,COMMAND$(J),M)-1)="_"&STR$(J)&"_"
190 LET L$(POS(L$,COMMAND$(J),M):POS(L$,COMMAND$(J),M)-1+COML(J))=""
200 GOTO 160
210 NEXT J
230 PRINT #2:L$
240 LET TBL2$(N)=L$
245 LET N=N+1
250 LOOP
300 CLOSE #2
310 CLOSE #1
400 FOR K=1 TO N
410 PRINT TBL1$(K)
420 NEXT K
430 FOR C=1 TO N
440 PRINT TBL2$(C)
450 NEXT C
604 DATA OPTION ARITHMETIC RATIONAL,26,DECLARE EXTERNAL FUNCTION,25,OPTION ARITHMETIC COMPLEX,25,OPTION ARITHMETIC DECIMAL,25
606 DATA OPTION ARITHMETIC NATIVE,24,GRAPHICS DEVICE PRINTER,23,ASK CHARACTER PENDING,21,OPTION ANGLE DEGREES,20,OPTION ANGLE RADIANS,20
608 DATA ASK MAX POINT STYLE,19,SET DEVICE VIEWPORT,19,ARITHEMTIC DECIMAL,18,ASK MAX LINE STYLE,18,WHEN EXCEPTION USE,18,"CHARACTER INPUT #",17
610 DATA CHARACTER PENDING,17,EXTERNAL FUNCTION,17,MAKE DIRECTIONARY,17,SET DEVICE WINDOW,17,WHEN EXCEPTION IN,17,ASK TEXT JUSTIFY,16,DECLARE EXTERNAL,16
612 DATA EXTERNAL PICTURE,16,OPTION CHARACTER,16,RECTYPE INTERNAL,16,REMOVE DIRECTORY,16,SET TEXT JUSTIFY,16,ASK BITMAP SIZE,15,ASK PIXEL ARRAY,15
614 DATA ASK PIXEL VALUE,15,ASK POINT COLOR,15,ASK POINT STYLE,15,CHARACTER INPUT,15,DECLARE NUMERIC,15,MAT GRAPH CELLS,15,MAT PLOT POINTS,15
616 DATA MAT PRINT USING,15,READ IF MISSING,15,SET BITMAP SIZE,15,SET POINT COLOR,15,SET POINT STYLE,15,SET TEXT HEIGHT,15
618 DATA ASK AREA COLOR,14,ASK AXIS COLOR,14,ASK LINE COLOR,14,ASK LINE STYLE,14,ASK PIXEL SIZE,14,ASK TEXT COLOR,14,DECLARE STRING,14
620 DATA FILE SPLITNAME,14,MAT PLOT CELLS,14,MAT PLOT LINES,14,SET AREA COLOR,14,SET COLOR MODE,14,SET LINE COLOR,14,SET LINE STYLE,14,SET TEXT COLOR,14
622 DATA ASK COLOR MIX,13,ASK DIRECTORY,13,ASK MAX COLOR,13,EXIT FUNCTION,13,INPUT ELAPSED,13,INPUT TIMEOUT,13,LOCATE CHOICE,13,MAT PLOT AREA,13
624 DATA ON ERROR GOTO,13,POINTER BEGIN,13,SET BEAM MODE,13,SET COLOR MIX,13,SET DIRECTORY,13,SET ZONEWIDTH,13,CREATEOBJECT,12,END FUNCTION,12
626 DATA EXIT HANDLER,12,EXIT PICTURE,12,EXTERNAL SUB,12,FILE GETNAME,12,INPUT PROMPT,12,"LINE INPUT #",12,LOCATE VALUE,12,ORGANIZATION,12,SET VIEWPORT,12
628 DATA TEXT JUSTIFY,12,ASSOC PRINT,11,CALLBACKADR,11,FILE DELETE,11,FILE RENAME,11,GETKEYSTATE,11,GETOPENNAME,11,GETSAVENAME,11,OPTION BASE,11
630 DATA PIXEL ARRAY,11,PIXEL VALUE,11,PLOT POINTS,11,POINT COLOR,11,POINT STYLE,11,POINTER END,11,PRINT USING,11,PROPERTYGET,11,PROPERTYPUT,11
632 DATA RECTYPE CSV,11,SELECT CASE,11,TEXTWINDOW1,11,TEXTWINDOW2,11,WAIT SIGNAL,11,ARITHMETIC,10,ASK WINDOW,10,BACKGROUND,10,COLOR MODE,10,COLORINDEX,10
634 DATA END SELECT,10,FOR APPEND,10,FOR OUTPUT,10,LINE COLOR,10,LINE INPUT,10,LINE STYLE,10,MOUSE POLL,10,PIXEL SIZE,10,PLOT LINES,10,SET MARGIN,10,SET WINDOW,10
636 DATA TEXT COLOR,10,TRANCEFORM,10,WAIT DELAY,10,BASIC.BAK,9,BASIC.INT,9,CASE ELSE,9,COLOR MIX,9,DIRECTORY,9,DRAW AXES,9,DRAW GRID,9,DRAW MODE,9,ENDOFLINE,9
638 DATA EXCEPTION,9,FOR INPUT,9,GET POINT,9,MAT INPUT,9,MAT PRINT,9,MAT REDIM,9,NOBEAMOFF,9,OVERWRITE,9,PLOT AREA,9,PLOT TEXT,9,RANDOMIZE,9,REMAINDER,9
640 DATA SETUP.BAT,9,SKIP REST,9,SPLITNAME,9,UNPACKDBL,9,WINHANDLE,9,ZONEWIDTH,9,CALLBACK,8,"CONFIRM$",8,CONTINUE,8,END WHEN,8,EXIT FOR,8,EXIT SUB,8,FUNCTION,8
642 DATA INTERNAL,8,MAT PLOT,8,MAT READ,8,"PACKDBL$",8,PROBLEMX,8,PROBLEMY,8,RATIONAL,8,SET ECHO,8,TRUNCATE,8,VIEWPORT,8,COMPLEX,7,CONSOLE,7,DECIMAL,7,DECLARE,7
644 DATA DEGREES,7,ELAPSED,7,END SUB,7,EXECUTE,7,EXIT DO,7,GETNAME,7,HANDLER,7,"INPUT #",7,JUSTIFY,7,LIBRALY,7,MAXSIZE,7,MISSING,7,NUMERIC,7,PENDING,7,PICTURE,7
646 DATA "PRINT #",7,PRINTER,7,PRIVATE,7,PROGRAM,7,RADIANS,7,RECTYPE,7,"REPEAT$",7,RESTORE,7,"STRING$",7,"SUBSTR$",7,TIMEOUT,7,ACCESS,6,ASSIGN,6,BEZIER,6,BITAND,6
648 DATA BITMAP,6,BITNOT,6,BITXOR,6,CHOICE,6,CIRCLE,6,DEFDBL,6,DEFINT,6,DELETE,6,DEVICE,6,"DWORD$",6,ELSEIF,6,END IF,6,EXTYPE,6,HEIGHT,6,HIDDEN,6,"INKEY$",6
650 DATA INTSQR,6,LBOUND,6,"LCASE$",6,LOCATE,6,LPRINT,6,"LTRIM$",6,MARGIN,6,MAXNUM,6,MODULE,6,NATIVE,6,NOTXOR,6,NOWAIT,6,OPTION,6,OUTPUT,6,PIXELX,6,PIXELY,6,POINTS,6
652 DATA PROMPT,6,PUBLIC,6,RENAME,6,RESUME,6,RETURN,6,"RIGHT$",6,ROTATE,6,"RTRIM$",6,SCREEN,6,SIGNAL,6,"SPACE$",6,STREAM,6,STRING,6,UBOUND,6,"UCASE$",6
654 DATA UNSAVE,6,"USING$",6,WINDOW,6,WORLDX,6,WORLDY,6,ANGLE,5,AXES0,5,BITOR,5,BREAK,5,"BSTR$",5,"BYTE$",5,CAUSE,5,CELLS,5,CHAIN,5,CLEAR,5,CLOSE,5,COLOR,5
656 DATA "DATE$",5,DEBUG,5,DELAY,5,DENOM,5,ERASE,5,FLOOD,5,GLOAD,5,GOSUB,5,GRAPH,5,GRID0,5,GSAVE,5,IMAGE,5,INPUT,5,INSTR,5,KANJI,5,LABEL,5,"LEFT$",5,LIMIT,5
658 DATA LINES,5,LOCAL,5,LOG10,5,MERGE,5,NUMER,5,OUTIN,5,PAINT,5,PAUSE,5,PIXEL,5,POINT,5,PRINT,5,REDIM,5,RETRY,5,ROUND,5,SCALE,5,SHARE,5,SHEAR,5,SHIFT,5,"TIME$",5
660 DATA TRACE,5,UNTIL,5,USING,5,VALUE,5,WHILE,5,"WORD$",5,WRITE,5,ACOS,4,AREA,4,ASIN,4,AXES,4,BASE,4,BEAM,4,BEEP,4,BLEN,4,BVAL,4,BYTE,4,CALL,4,CASE,4,CEIL,4
662 DATA "CHR$",4,CINT,4,CLIP,4,COM1,4,COM2,4,COMB,4,CONJ,4,COSH,4,DATA,4,DATE,4,DISK,4,DRAW,4,ECHO,4,ELSE,4,EXIT,4,FACT,4,FILE,4,"GET@",4,GOTO,4,GRID,4,"HEX$",4
664 DATA KILL,4,LINE,4,LOG2,4,LOOP,4,"MID$",4,MORE,4,NAME,4,NEXT,4,"NUL$",4,OPEN,4,PERM,4,PLAY,4,PLOT,4,POLL,4,PSET,4,"PUT@",4,READ,4,REST,4,SINH,4,SIZE,4,SKIP,4
666 DATA STEP,4,STOP,4,"STR$",4,SWAP,4,TANH,4,TEXT,4,THEN,4,TIME,4,TYPO,4,WAIT,4,WEND,4,WHEN,4,WITH,4,ABS,3,AND,3,ARG,3,ASC,3,ASK,3,ATN,3,BOX,3,CLS,3,CON,3,COS,3
668 DATA COT,3,CSC,3,CSV,3,DEF,3,DEG,3,DET,3,DIM,3,DOT,3,END,3,EOF,3,EPS,3,EXP,3,FIX,3,FOR,3,GCD,3,GET,3,IDN,3,INT,3,INV,3,KEY,3,LEN,3,LET,3,LOG,3,MAT,3,MAX,3,MIN,3
670 DATA MIX,3,MOD,3,NOT,3,OLE,3,ORD,3,ORG,3,PDF,3,POS,3,RAD,3,REM,3,RND,3,SEC,3,SET,3,SGN,3,SIN,3,SPC,3,SQR,3,SUB,3,TAB,3,TAN,3,TRN,3,USE,3,VAL,3,ZER,3,DO,2,FP,2
672 DATA IF,2,IM,2,IP,2,OR,2,PI,2,RE,2,TO,2
1000 DATA 448
END
難しくて読めない だよん。プログラミングで本気だすよん。オナ禁１６０日目だよん。
そうかもしらんが、精神病患者として、やればできることを証明したいんでな。やる気スイッチ入ったのさ。
14時に始めて16:30で勉強終了
どうしても腹が減ってな
>>38
自分もそろそろ買うよ
今月で車検切れるから慌てて買うのイヤで勿体ないけど車検通した
でも自力でユーザー車検やったから格安で済んだわ >>44
エージェントがかってに面接取ってきたから仕方ない 第一号命令語翻訳完了。
ＲＥＭ文が一番簡単だべいと思ってな。
9999 REM REM
10000 FOR KK=1 TO N
10010 IF POS(TBL2$(KK),"__425_")<>0 AND TBL2$(KK)(1:3)<>"670" AND TBL2$(KK)(1:5)<>"10010" THEN LET TBL3$(KK)=TBL1$(KK)((POS(TBL2$(KK),"__425_")+4) :LEN(TBL2$(KK))) ELSE GOTO 10050
10020 LET TBL3$(KK)="/* "&TBL3$(KK)&" */"
10030 PRINT TBL3$(KK)
10050 NEXT KK
若い頃に空手してたんだけど得意技が
左の回し蹴り
調子漕いてこればかりしてたら
左膝と右足首を痛めた25年経っても未だに
ちょっと運動したら痛む事がある。
ウォーキングしてて右足首痛くてシップ貼るかロキソニン飲むか考えている。
関節の痛みって軟骨のすり減りとか関係あるのかな 次はＩＮＰＵＴ、ＦＯＲ〜ＮＥＸＴ、ＰＲＩＮＴあたり、やってみっかな。
58番組の途中ですがアフィサイトへの転載は禁止です2021/04/09(金) 20:30:40.40
部屋の土壁？砂壁に穴空いてるの早く埋めたい
59番組の途中ですがアフィサイトへの転載は禁止です2021/04/09(金) 20:44:47.56
砂壁でした
今日もお疲れ様でした
おやすみなさい
また明日 あんまりオナ禁すると女性で言う閉経しそうで怖くて性欲落ちてきたのに無理矢理してるわ。出したい時に出しといた方がいい。あと人生で何回出せるか
おはようございます
今日も1日よろしくお願いいたします 今体重測ったら90.9キロここからが下らない、ここ二週間停滞。
4月なのに寒い冬波の気温
>>69
お前ここに来んなよ
せっかく平和だったのに >>70
をれが居るから平和なんだぜ？おまえ、戦争を望んだでそ？ この1ヶ月間ずっと胃が気持ち悪く、夜になると特に酷くなるので
人間の生活に晩御飯は不要なのではないかと思い始めた
4月で天気いいのに気温10度以下寒いぞ
温野菜にくっさいドレッシング掛けて喰ってコーヒー飲んでスクワットした。 これは障碍者差別がひどい国及びそうでない国ではもちろん、福祉大国でも、そうでない国でも、起こりえることであり、今後日本はもちろん、その周辺国、反日国家、親日国家関係なく、十分にあり得ることであり、これだけは確かなのは、寛容さを捨て、少数派とズレた意見を含む、他者の意見に耳を傾け、向き合おうとしなくなれば、いつでもこのようなことは起こるのだ。
↓
重 ｈ・ｋを批判したり評価しないことは差別でありヘンケんといuのなラ
自分の住む国ｊという国で、多くの障碍者が殺される事件があったとき、その事件を起こした殺人犯と同じように「障碍者は皆殺しにしろ」という人達をｊの政府が障碍者以外は攻撃し、ｊの多くの人達は攻撃した。
同時に「一部の障碍者を皆殺しにしろ」という人達も、ｊの政府が障碍者以外は攻撃し、ｊの多くの人達は攻撃した。
自分は軽度の障碍者であり、障碍者だから過去に差別を受けて、差別を受けるのが怖かったし、そういう人達に報復しようと思い攻撃した。
その直後、ｊの政府が、重度の障碍者を皆殺しにした、uという国から来た難民は保護したが、その国の移民を障碍者以外は攻撃したとき、少数の人達は疑問に思ったが、多数の人達は攻撃した。
自分は軽度の障碍者であり、uが怖いので攻撃した。
時は流れ、ｊの政府が、ｈ・ｋという、幼い時に視覚と聴覚を失い、声を発することができない、重度の障碍者になったにも関わらず、ものすごく頭のいい人達が通う大学に合格して卒業し、世界各地を歴訪し、戦争や死刑制度に反対して、障碍者の教育や福祉の発展に尽くした、重度の障碍者の偉人を批判したり、評価しない人達を障碍者以外は攻撃したとき、ｊの少なくない人達は疑問を抱いたし、ｊの政府を批判する人達もいたが、半数以上の人達は攻撃した。
自分は軽度の障碍者であり、h・ｋを尊敬していたから攻撃した。
長い年月が経ち、ｊの政府が、精神病院を廃止した、iという国の移民や「精神病院を廃止しろ」という人達を、精神病患者及び障碍者以外は攻撃したとき、ｊの半数近くの人達は疑問に思ったし、ｊの政府を批判する人達も少なくなかったが、半数の人達は攻撃した。
自分は軽度の障碍者であり、何か不安に思ったが、精神病患者ではなく、iは好きではなかったので攻撃した。
そして、自分の晩年、ｊの政府が、重度の障碍者以外の障害者及び精神病患者や、バカな人達などを攻撃したとき、ｊの半数の人達が攻撃され、後悔したが遅すぎた。
自分は精神病患者ではないが、軽度の障碍者でバカなので攻撃された。
その時、自分にできることは何もなかった。
あとがき・障碍者か難病の病人しかその国の厚生労働大臣などの、何かの省の大臣になれないとか、あるいは、障碍者か難病の病人しかその国の指導者になれない、もしくは、障碍者か難病の病人しかその国の国会議員になれないという国があったのなら、この物語の最後に書かれていること同じか、もっとひどいことが起きる。
そして、今後４０年以内に、障碍者の指導者で、酷い暴政を行う指導者が、世界のどこかに現れることは間違いない。
だが、そうなっても、ｈ・ｋのような人がたまたま障碍者だったのであって、障碍者がｈ・ｋではないように、その国の指導者がたまたま、障碍者であっただけであり、障碍者がその国の指導者なのではないのだということを、理解しないといけないし、決して忘れてはいけない。
そうしなければ、障害者への差別や偏見もなくならないし、障碍者が理解され、障碍者と健常者が共に生きれる社会などできない。
それこそ、この物語に書かれている、恐ろしいことと似たようなことか、同じことが起こるのだ。
追伸・この物語の主人公「自分」のモデルは実在します。
もちろん、俺はその人を良く知っています。
その人は最近まで、ｈ・ｋのような人を尊敬していました。
今では批判していますけどね。
また、その人は昔は、iのような国は好きではありませんが、今はiのような国が大好きです。
この人は、５ちゃん（旧２ちゃん）や、いろんなブログにも、書き込んでいます。
もしかしたら、今日も５ちゃん（旧２ちゃん）や、いろんなブログを閲覧して、何か書き込んでるかもしれませんね。
うつ病でもないのにネットでパキシル注文しちゃった
怖いか？
>>91
普通に逆じゃない？
その親戚は秋田から東京に出たんでしょ？ >>92
いや、うちの爺さんが埼玉県だから
関東が元
ウォーキングした。
久々に紅茶でも飲もうかな >>95
爺さんが婆さんに惚れて付いてきた
婆さん秋田県の生まれで戦争で知り合った
僕は秋田で3ヶ月暮らしたことがある
横手市だね
飯も酒も美味かったなあ >>98
好きというか俺はつくづく田舎向きだと思い知らされた
東京に憧れて東京に住んだことあるけど合わなくてすぐおかしくなった
>>99
アザラシ横手にきたことあるんだな
俺が住んでるのは横手から車で20分のとこだわ
晴れてるのに気温10度アホかよ寒い 親戚と間がもたなくてつらい
無職なの快く思ってないからなー
サウナに入ってきました
きもちいい 全身がかゆい
餃子しか食べてないのに
小麦アレルギーとかだったら嫌だな
休みで晴れだったけど10℃なのでサイクリング行くか迷ったけど半年ぶりのいつものコース楽しかったー
躁鬱にはこうやって強制的に上げるイベントがてきめんに効くわ
>>109
障害者年金とかもらってる？
収入ないと詰むぞ？
今日もお疲れ様でした
おやすみなさい
また明日 早い時間に寝てしまい今目が覚めた
睡眠薬飲もうか迷う
おはようございます
今日も1日よろしくお願いいたします 涙が枯れるまで思い切り泣くのはストレスが洗い流されるから悪いことじゃないと思う
今日は集団ストーカーがちょこちょこ出てきた。近づいてきて咳払い、鼻すすりされた。あと車のナンバー「37」がやたらと出てきた。 今日は4時からDAZNでクラシコ観て午後はjリーグ観る予定
普段全く摂取しないカフェインをエナドリでぶっこんだ
モンスターのでかいやつ
寝れなくなったら困るけどなんとかなるやろ
朝から業スーで大福とおはぎ買って
うんこモリモリして
ダイエットしてるのにチャーハン山盛り喰ってアニメ見ながらウォーキングして
ちんこムラムラするけど我慢してスクワットする予定
ねむい
チンコむらむらパワーをスクワットに配分したい はー働いた
家族も近くに居ないしあとは死に向けたイベントくらいしかないや
心が壊れかけたとき一番辛かったのは過覚醒だった
スマブラやりゅ >>128
チンコムラムラパワースポットに見えた
麻婆豆腐作ってくるわ…
世界が暗い
なんか虚無感と切なさをかんじる
体重全然ヘラなくなったので
大福2つ喰った
罪悪感がある
去年は給付金貰えてよかった。
今年は貰えないからつまらんな。
楽天モバイル紹介で1500ポイントともらえたのが嬉しい >>138
そこで踏ん張らないとそれ以上落ちないぞ
>>141 今日は怠ける騙す日チートデイと言うことで
チートデイとは、ダイエット実践中の体重がなかなか減少しない「停滞期」に、あえて摂取カロリーを増やす日のことを指します。
だってさ。 >>142
まあ息抜きも必要か
だらだら行かないようにな
>>143 了解、明日からまた野菜炒めと温野菜と豆腐鶏肉にするよ。 チートデイとか調子こいた事言ったけど
俺糖尿だった....
単なるダイエットとは違うわぁ。
今日もお疲れ様でした
おやすみなさい
また明日 明後日に入院なのに診察券が見当たらない
もういいや諦めよう
明日は山下公園デートだ寝よう
最悪、今度は手術痕の保護テープ取れちゃった
まだ傷口ふさがってないみたいだしどうしよう
