トップページ⇒tech
114コメント27KB

ポケコンで・・・

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさんNGNG
シャープのpc-g850sです。学校で買わされて、basicでもc-言語
でもいいので、なにか凄いプログラムを教えてください！
007046NGNG
>>69
（デルタ）=0の判定って何ですか？
0071デフォルトの名無しさんNGNG
>>68
俺も去年工高卒したが、確かにポケコンは役に立つ。
電気工事士とか取りたかったが、結局乙四危険物だけ。
この資格、今だに役に立たない…
0072デフォルトの名無しさんNGNG
漏れなんか乙全類取ったぞ。
…1類たった10問に数千円＋手数料って、物凄い無駄金かけて。
他の人と同様全く役に立ってない。
0073デフォルトの名無しさんNGNG
>1 ﾎﾟｹｺﾝﾎｽｨ
　　幾らだったの？
0074東条上等兵NGNG
今、最も高性能のポケコンってやっぱＺ１？
0075デフォルトの名無しさんNGNG
ポケコンで多元の連立方程式はもとより、常微分方程式もいけるよ
TI-92plusに買い替えればよいのだ
0076デフォルトの名無しさんNGNG
ポケコンといえば PB-100 に限りますが何か？
0077デフォルトの名無しさんNGNG
　
0078デフォルトの名無しさんNGNG
ポケットコンピュータ（PC-G850）用ソフトウェア注文製作

こんなサービスはじめちゃったよ　だれか注文してみて

http://www53.tok2.com/home/patrosystem/service.htm
0079デフォルトの名無しさんNGNG
テスト中にカンニングできるのが最大の魅力
0080デフォルトの名無しさんNGNG
しかしポケコンって壊れやすいよな。
0081デフォルトの名無しさんNGNG
PC-E650が最強だ。
ったらいいのに。
0082デフォルトの名無しさんNGNG
>>79
ほとんどの携帯電話には、電卓が付属していると思われ。
0083デフォルトの名無しさんNGNG
>>82
テスト中に携帯ちょしたら捕まるって
0084デフォルトの名無しさんNGNG
質問です！
ベーシックでキャラクターのスクロールの仕方を教えてください。→のキーを押したときに
Ｘ座標に＋して表示すると前のキャラクターが残っているので消すためにＣＬＳを使ってるんですけど、
そうするとすべての表示が消えてしまうので、そのキャラクターにビームを発射させようとするとビームだけが表示されて（スクロールはできている）
発射したキャラクターが消えてしまいます。
一部を消す関数みたいなのはないのでしょうか？
やりかたを教えてください。
0085デフォルトの名無しさんNGNG
仮想VRAM
0086マリモーマNGNG
ここも　ポケコンスレが　あるが　立てるときに　見てないのか？

http://pc.2ch.net/test/read.cgi/tech/1021219939/
0087デフォルトの名無しさんNGNG
>>86
日付の比較もできないバカﾊｹｰﾝ!!
0088デフォルトの名無しさんNGNG
ポケコンと言えば御茶目菜子さんがすごいよマジで
0089デフォルトの名無しさんNGNG
>88
いや、たかじょだろ？
0090デフォルトの名無しさんNGNG
ポケコンと言えばPatrosystemが一番すごいに決まっているだろ
なんせオペレーティングシステムを作ったんだからな。
0091マリモーマNGNG
いや　僕だったりして
0092デフォルトの名無しさんNGNG
いや、猫妖精ことこたちゃんだろう。
いや、VERTEBRAかも知れん。
もしかしたらMORかも知れないし、
実は島崎犬だったのかも知れない。
009392NGNG
追加
実は佐伯氏かも。
0094デフォルトの名無しさんNGNG
>>93
禿同。あの人すげぇよ。
最後の逸材だったね。
0095デフォルトの名無しさんNGNG
ageage
0096デフォルトの名無しさんNGNG
ポケコンを2chの流行語にした加藤勇喜君には感謝します。
0097かおりん祭り ◇KAORinK6NGNG
∋oノハヽo∈　／￣￣￣￣￣￣￣
　 （　＾▽＾） ＜　新スレおめでとうございま−す♪　
= ⊂ 　　）　　 ＼＿＿＿＿＿＿＿
= (__/"(__)　ﾄﾃﾃﾃ　
0098ポケコンスレageまくり連合NGNG



0099デフォルトの名無しさんNGNG
凄いプログラム？わかった！教えるよ。

10 PRINT"ｽｺﾞｲ!":END
0100デフォルトの名無しさんNGNG
10' [product] operating system << Powers CE >> ver. 5.8 lev. 13 trial version ver. 1.0 lev. 4 [copyright] Patrosystem [programer] Yuki Kato
20CLEAR :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デフォルトの名無しさんNGNG
悪い！長すぎてＵＰできん
0102デフォルトの名無しさんNGNG
何やってんの？
ていうか人のﾌﾟﾛｸﾞﾗﾑ勝手にUPするのはやめとけ。
法律に触れる。
0103デフォルトの名無しさんNGNG
>>102
100を擁護するわけじゃないが、こんなのをオペレーティングシステムだと言い張り
違うだろといっても全く聞く耳持たずＯＳと言い張るほうが法律に触れると思う。
0104デフォルトの名無しさんNGNG
>>103
それはどうかな。
OSの定義なんてはっきりしてない。
OSについて書いてある本とかも本によってぜんぜん違うこと書いてあるし。
本によってはあのLinuxをOSではないと書いてある本もあった。
誰もやつが作ったPowersを絶対にOSではないとは言い切れないはず。
0105デフォルトの名無しさんNGNG
>>103
Powersを誤解してｲﾝｽﾄｻｰﾋﾞｽを受けることがないようにするために
Patroはわざわざ体験版を配布したのでは？
0106デフォルトの名無しさんNGNG
>>104
http://pc.2ch.net/test/read.cgi/tech/1022685075/550-553
ｶｺﾜﾙｲ
0107デフォルトの名無しさんNGNG
>>105
わざわざ体験版を用意したのは誤解してもらうためだろ。
別に正式版だけでも問題なかったはず。
0108デフォルトの名無しさんNGNG
>>103
パトロの超誇大解釈に誰が付き合うかバーカ
はっきりしていないのは認めるがあれがＯＳでないことははっきりしている。
0109551NGNG
>>106
漏れは551だが、自己弁護はしていない。
たまたま時間が近かったからって誤解すんな。
0110551NGNG
>>103-108
OSなのか違うのかなんてどうでもいいじゃん。
やつが勝手にやってることなんだから放っておけば？
0111デフォルトの名無しさんNGNG
今のHP見る限りそんなに問題ないみたいだしもうほっといてやろうよ。
もっとやばいHPいっぱいあるよ。
そういうのあげた方がオモロイ。
0112デフォルトの名無しさんNGNG
>>111
あえて晒す必要はないだろ。

＞1 ：デフォルトの名無しさん ：01/11/06 17:16
＞シャープのpc-g850sです。学校で買わされて、basicでもc-言語
＞でもいいので、なにか凄いプログラムを教えてください！

ってあるんだから、有意義なサイト紹介の方向性でさ。
0113誘導NGNG
今後はこちらで↓

http://www.2ch2.net/bbs/pokecom/index2.html

よって

　　　　　　　　　　　　ｏ
　　　　　　　　　　　 /　￣￣￣￣￣￣￣￣￣￣ /
　　　　　　　　　　　/　　　このスレは無事に　　/
　　　　　　　　　　 /　　終了いたしました　　　 /
　　　　　　　　　　/　ありがとうございました　 /
　　　　　　　　　 /　　　　　　　　　　　　　　　　/
　　　　　　　　　/　　　モララーより　　　　　 /
　　　　　　　　 /￣￣￣￣￣￣￣￣￣￣￣/
　 ∧＿∧　　/　　　　　　　　　　　　　　　　/∧＿∧
　（　･∀･）　/　　　　　　　　　　　　　　　　/（･∀･　）
　（　　　　）つ　　　　　　　　　　　　　　　⊂（　　　　）
　｜ ｜ ｜　　　　　　　　　　　　　　　　　　 ｜ ｜ ｜
　（_＿）＿）　　　　　　　　　　　　　　　　　　（＿（＿_）





0114＿NGNG
>>113
なぜsageない？
■ このスレッドは過去ログ倉庫に格納されています