ポケコンで・・・
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNGでもいいので、なにか凄いプログラムを教えてください！
0031デフォルトの名無しさん
NGNGコラぁ〜〜〜〜！
それはゆっちゃ、ダメでしょ〜〜〜〜〜〜っ
ｳｧｰｰｰｰﾝ
0032デフォルトの名無しさん
NGNG0033デフォルトの名無しさん
NGNGWizardry:Black-Onix = Black-Onix:俺のプログラム
くらいの割合でヘボイのなら作った。
8x8の5階構造くらいだったかな？BASICで3000byte程度。
あと、BASICコンパイラ使って
スクランブルとグラディウスを足して２で割ったようなのを
作ったこともある。これは2500byteくらい。
あ！ポケコンじゃなかった！ポタコンだった。。。
0034デフォルトの名無しさん
NGNG演算させると動きが遅くなるんで、
全て手計算で出した値を記憶させ、
それを使わせた。
計算させられない計算機だった。
0035デフォルトの名無しさん
NGNG0036デフォルトの名無しさん
NGNGちょうど元は取ったといえよう。
0037デフォルトの名無しさん
NGNG0038デフォルトの名無しさん
NGNG休刊した。多分4年前くらいにな。
0039デフォルトの名無しさん
NGNGのにちょうどよかったんだけど。
まさか Ｚ80がこんなにはやく消えるとは、思わなかったＹＯ。
0040元PC-E500ユーザ
NGNG関数電卓壊れたので、ひとつ欲しくなってしまった。
0041デフォルトの名無しさん
NGNG0042元PC-E500ユーザ
NGNG0043デフォルトの名無しさん
NGNG0044デフォルトの名無しさん
NGNG0045デフォルトの名無しさん
NGNG超遅レス。
PC-G850ならシューティングとか作れる。
って見てないか・・・
0046デフォルトの名無しさん
NGNG御存知の方いらっしゃいますか？
もしいらっしゃれば
何卒、
漏れにご教授いただけませんでしょうか？
お願いします
0047デフォルトの名無しさん
NGNG0048デフォルトの名無しさん
NGNG0050デフォルトの名無しさん
NGNG俺と同じ学校のやつじゃないの？
いのかしら
ha
ore to isshon gakkou janeeka?
soredattara hazukasiina konna kotokakikomunante
inokasira de wakarudaro?
0052デフォルトの名無しさん
NGNG005346
NGNG小一時間検索しましたが見つかりませんでした
0055駄レスさん
NGNG何次か知らんが掃き出し法でも調べとけ。
行列式で判定して丁寧にやったっていいじゃないか。
0056デフォルトの名無しさん
NGNGマインスイーパーとか作って授業中に
回してましたよ〜。
ま〜、結構ソースが長いからココに書いても、
それを打ち込むかどうかは、又別問題だと思うけど・・・。
005746
NGNG２次方程式が解きたいです
漏れ的にはソースだけわかればいいんです
まだ行列とかわからないので…
ソースがわかったら後は自分で考えます
0058駄レスさん
NGNG第一、原理を知らずにプログラムを読むのは不可能です。
0059デフォルトの名無しさん
NGNG006046
NGNG本当ですか！？
是非教えていただけませんか？
0061デフォルトの名無しさん
NGNG条件判断式のとき、条件要素をANDで区切ったるするときにその要素を括弧でくくってやると
少しだけ解釈が早くなるということがあった。意外と実用的かも。
あと、こいつのおかげで遅いコンピューターも必要だということがわかった。
突き詰めてくと、割と簡潔に書けるようになる。（トリッキーにもなるが。）
0062デフォルトの名無しさん
NGNG大学の計算機内にありますが何か。
つか、単なる2次方程式なら解の公式使えば？
漏れ持ってるのはその方法だった。
…高次方程式を解くのを作ろうかと思ったけど面倒になてﾊﾟｽ。
0063デフォルトの名無しさん
NGNGどこかにそんなプログラムがネット上に
転がっていると思っているのだろうか
○○バンクじゃあるまいし
プログラム作って
動いたときの感動を味わいたくないの？
ただ単に、数学の宿題を楽に仕上げたいだけなのかな
006446
NGNGヒントって言うか答えみたいなモンだけど
ax+by=c
dx+ey=f
という2式が与えられたとき、その解として
x=(ce-bf)/(ae-bd)
y=(cd-af)/(bd-ae)
となるものです.
よって,
・a,b,c,d,e,fの値を入力する
・x,yを上式に従って計算する
・x,yを表示する
といった手順を踏めば良いわけですよね？
これで良いならスグにプログラム組めます
0065デフォルトの名無しさん
NGNGこれってマイナー過ぎか?
ついでにポケコンはCASIO Z-1GR。
学校で無理やり買わされましたｗ
0066デフォルトの名無しさん
NGNG漏れも持ってる。
工高生なら多少いるだろうけど…
0067デフォルトの名無しさん
NGNG漏れ工高生。
今年で卒業。もう学校行ってないヽ(´ー｀)ﾉ
006861
NGNGうんで、ポケコンの計算検定3級だったかはもってるけど意味なしっぽい・・・。
工業に行ったら、危険物取ればほかいらない気がする。
僕は落ちたんで持ってないが（笑
0069デフォルトの名無しさん
NGNGに１０００ペリカ。
007046
NGNG（デルタ）=0の判定って何ですか？
0071デフォルトの名無しさん
NGNG俺も去年工高卒したが、確かにポケコンは役に立つ。
電気工事士とか取りたかったが、結局乙四危険物だけ。
この資格、今だに役に立たない…
0072デフォルトの名無しさん
NGNG…1類たった10問に数千円＋手数料って、物凄い無駄金かけて。
他の人と同様全く役に立ってない。
0073デフォルトの名無しさん
NGNG幾らだったの？
0074東条上等兵
NGNG0075デフォルトの名無しさん
NGNGTI-92plusに買い替えればよいのだ
0076デフォルトの名無しさん
NGNG0077デフォルトの名無しさん
NGNG0078デフォルトの名無しさん
NGNGこんなサービスはじめちゃったよ だれか注文してみて
http://www53.tok2.com/home/patrosystem/service.htm
0079デフォルトの名無しさん
NGNG0080デフォルトの名無しさん
NGNG0081デフォルトの名無しさん
NGNGったらいいのに。
0082デフォルトの名無しさん
NGNGほとんどの携帯電話には、電卓が付属していると思われ。
0083デフォルトの名無しさん
NGNGテスト中に携帯ちょしたら捕まるって
0084デフォルトの名無しさん
NGNGベーシックでキャラクターのスクロールの仕方を教えてください。→のキーを押したときに
Ｘ座標に＋して表示すると前のキャラクターが残っているので消すためにＣＬＳを使ってるんですけど、
そうするとすべての表示が消えてしまうので、そのキャラクターにビームを発射させようとするとビームだけが表示されて（スクロールはできている）
発射したキャラクターが消えてしまいます。
一部を消す関数みたいなのはないのでしょうか？
やりかたを教えてください。
0085デフォルトの名無しさん
NGNG0086マリモーマ
NGNGhttp://pc.2ch.net/test/read.cgi/tech/1021219939/
0087デフォルトの名無しさん
NGNG日付の比較もできないバカﾊｹｰﾝ!!
0088デフォルトの名無しさん
NGNG0089デフォルトの名無しさん
NGNGいや、たかじょだろ？
0090デフォルトの名無しさん
NGNGなんせオペレーティングシステムを作ったんだからな。
0091マリモーマ
NGNG0092デフォルトの名無しさん
NGNGいや、VERTEBRAかも知れん。
もしかしたらMORかも知れないし、
実は島崎犬だったのかも知れない。
009392
NGNG実は佐伯氏かも。
0094デフォルトの名無しさん
NGNG禿同。あの人すげぇよ。
最後の逸材だったね。
0095デフォルトの名無しさん
NGNG0096デフォルトの名無しさん
NGNG0097かおりん祭り ◇KAORinK6
NGNG（ ＾▽＾） ＜ 新スレおめでとうございま−す♪
= ⊂ ） ＼＿＿＿＿＿＿＿
= (__/"(__) ﾄﾃﾃﾃ
0098ポケコンスレageまくり連合
NGNG0099デフォルトの名無しさん
NGNG10 PRINT"ｽｺﾞｲ!":END
0100デフォルトの名無しさん
NGNG20CLEAR :CLS :FOR A=0 TO 500:NEXT :LOCATE 7,2:PRINT "Patrosystem":FOR A=0 TO 5000:NEXT :CLS :FOR A=0 TO 1000:NEXT :LINE (132,1)-(7,1):LINE -(7,42):LINE (11,5)-(136,46),B
30LINE (8,2)-(10,4):LINE (8,43)-(10,45):LINE (133,2)-(135,4):LOCATE 3,1:PRINT "operating system":LOCATE 6,2:PRINT "Powers CE 5.8":LOCATE 4,3:PRINT "active 6ic manager":LOCATE 6,4:PRINT "trial version"
40FOR AA=135 TO 12 STEP -.5:PSET (AA,23):PSET (147-AA,15):IF AA<116 LINE (AA+20,23)-(AA+20,23),R:LINE (128-AA,15)-(128-AA,15),R
50FOR A=0 TO 10:NEXT :NEXT :FOR A=0 TO 5000:NEXT :CLS :IF FRE <680 GOSUB *MER:GOTO *EX2 ELSE GOSUB *SETL:ZL=0:GOSUB *SETS:ZA=1:CLS :FOR Y=0 TO 4:READ ZB,ZK:GOSUB *BP:NEXT
60CLS :ZA=3:ZB=20:ZK=0:GOSUB *BP:GOSUB *WINDOW:LOCATE 4,1:PRINT "(^_^)ｺﾉｿﾌﾄﾊﾀｲｹﾝﾊﾞ":LOCATE 4,2:PRINT "ﾝﾃﾞｽ｡ｾｲﾋﾝﾊﾞﾝﾉｲﾝｽﾄ":LOCATE 4,3:INPUT "ｰﾙｦｵｽｽﾒｼﾏｽ｡";N$
70CLEAR :USING :GOSUB *SETL:CLS :DIM J$(10,2),V(5):LOCATE 10,5:PRINT "Powers CE 5.8t":LINE (4,6)-(54,40),B:LINE (64,6)-(138,32),B:LOCATE 10,2:PRINT "> <":LINE (59,14)-(64,24),B:LINE (138,14)-(143,24),B:LINE (64,15)-(138,18),R,B
80LINE (64,20)-(138,23),R,B:S=1:V(1)=1:OUT 4
90SWITCH S
100CASE 1:RESTORE 1220
110CASE 2:RESTORE 1230
120CASE 3:RESTORE 1240
130CASE 4:RESTORE 1250
140CASE 5:RESTORE 1260
150CASE 6:RESTORE 1270
160CASE 7:S=2:P=1:RESTORE 1230
170CASE 11:RESTORE 1280
180ENDSWITCH
190READ Q:FOR K=1 TO 10:READ J$(K,1),J$(K,2):NEXT :K=Q
200FOR L=1 TO 3:LOCATE 11,L:PRINT " ":NEXT :FOR L=0 TO 2:LOCATE 11,L+1:IF K+L>Q THEN O=K-Q ELSE O=K
210PRINT J$(O+L,1);J$(O+L,2):NEXT :WHILE INKEY$ :WEND :Z=0
220M= ASC INKEY$ :IF M=0 THEN Z=Z+1:IF Z= INT C*48 GOSUB *WINDOW:LOCATE 4,1:PRINT "(~o~)ｵｰﾄｻｽﾍﾟﾝﾄﾞｷﾉ":LOCATE 4,2:PRINT "ｳｶﾞﾊﾀﾗｷﾏｼﾀ｡":FOR A=0 TO 3000:NEXT :GOTO *EX3 ELSE ELSE 240
230IF ZL=0 IF INP =4 GOSUB *ICC:GOTO 60 ELSE 220 ELSE IF INP =0 THEN AF=0:WHILE INP =0 AND AF<100:AF=AF+1:WEND :IF AF=100 GOSUB *ICO:GOTO 60 ELSE 220 ELSE 220
240SWITCH M
250CASE D:IF K=1 THEN K=Q+1
260K=K-1:ZA=1:ZB=B+10:ZK=0:GOSUB *BP
270CASE F:IF K=Q THEN K=0
280K=K+1:ZA=1:ZB=B+10:ZK=0:GOSUB *BP
290ENDSWITCH
300IF M=I OR M=G AND P>0 THEN ZA=1:ZB=B+5:ZK=0:GOSUB *BP:LOCATE 1,P:PRINT " ":S=V(P):P=P-1:GOTO 90
0101デフォルトの名無しさん
NGNG0102デフォルトの名無しさん
NGNGていうか人のﾌﾟﾛｸﾞﾗﾑ勝手にUPするのはやめとけ。
法律に触れる。
0103デフォルトの名無しさん
NGNG100を擁護するわけじゃないが、こんなのをオペレーティングシステムだと言い張り
違うだろといっても全く聞く耳持たずＯＳと言い張るほうが法律に触れると思う。
0104デフォルトの名無しさん
NGNGそれはどうかな。
OSの定義なんてはっきりしてない。
OSについて書いてある本とかも本によってぜんぜん違うこと書いてあるし。
本によってはあのLinuxをOSではないと書いてある本もあった。
誰もやつが作ったPowersを絶対にOSではないとは言い切れないはず。
0105デフォルトの名無しさん
NGNGPowersを誤解してｲﾝｽﾄｻｰﾋﾞｽを受けることがないようにするために
Patroはわざわざ体験版を配布したのでは？
0107デフォルトの名無しさん
NGNGわざわざ体験版を用意したのは誤解してもらうためだろ。
別に正式版だけでも問題なかったはず。
0108デフォルトの名無しさん
NGNGパトロの超誇大解釈に誰が付き合うかバーカ
はっきりしていないのは認めるがあれがＯＳでないことははっきりしている。
0111デフォルトの名無しさん
NGNGもっとやばいHPいっぱいあるよ。
そういうのあげた方がオモロイ。
0112デフォルトの名無しさん
NGNGあえて晒す必要はないだろ。
＞1 ：デフォルトの名無しさん ：01/11/06 17:16
＞シャープのpc-g850sです。学校で買わされて、basicでもc-言語
＞でもいいので、なにか凄いプログラムを教えてください！
ってあるんだから、有意義なサイト紹介の方向性でさ。
0113誘導
NGNGhttp://www.2ch2.net/bbs/pokecom/index2.html
よって
ｏ
/ ￣￣￣￣￣￣￣￣￣￣ /
/ このスレは無事に /
/ 終了いたしました /
/ ありがとうございました /
/ /
/ モララーより /
/￣￣￣￣￣￣￣￣￣￣￣/
∧＿∧ / /∧＿∧
（ ･∀･） / /（･∀･ ）
（ ）つ ⊂（ ）
｜ ｜ ｜ ｜ ｜ ｜
（_＿）＿） （＿（＿_）
■ このスレッドは過去ログ倉庫に格納されています