TOP カテ一覧 スレ一覧 100～終まで 2ch元 削除依頼
パソ通か…何もかもみな懐かしい…
中古PCのためのドライバ提供スレ
【IDなし】MSXスレッド Part 46【安全】
栄光の30年 疾走する知性 聖女東瑠利子の世界 Ⅱ
ビルゲイツに挑戦
懐モバ（懐かしのモバイル）を語ろう！
さよならハドソン
PC-6001/mkII/6601/SR★おれたちP6系 Part23
オールドPCの修理
MZ-80B/2000/2200 Part.2
【友好数探し】ベンチスレ＠昔のPC板
- 1 ：2005/06/27 ～ 最終レス ：2018/09/24
-
↓68030
∧＿∧
（ ・∀・）つ
⊂ ノ
（＿） ノ ∧＿∧
（＿） （´∀｀ ）
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''｀｀｀｀｀
｀''''''''''''''''''
↑Z80
昔のPCさえあれば、何もいらない。
というわけでもありませんが、お前らの愛機の実力を教えてください。
（友好数とは）そのすべての約数（自分自身を除く）の和が、
互いに相手の数と等しくなるような数のペアのことです。
(測定方法）プログラム実行とともにストップウォッチで秒数を測定
（小数点以下切り捨て）
- 2 ：
- ソース（MSX C入門より）
以下のプログラムを自分の機種用にアレンジしてください。
算術演算子”MOD(剰余）”がない機種はちょっと厳しいかも。
（MSX-BASIC）
100 DEFINT A-Z
110 FOR J=2 TO 1000
120 N=J: GOSUB 180: IF S<=J THEN 150
130 N=S: GOSUB 180: IF S<>J THEN 150
140 PRINT J;N
150 NEXT J
160 END
170 '
180 S=0
190 FOR I=N/2 TO 1 STEP -1
200 IF (N MOD I)=0 THEN S=S+I
210 NEXT I
220 RETURN
- 3 ：
- （C言語）
#include <stdio.h>
main()
{
int j, s, sum();
for ( j = 2; j <= 10000; ++j ) {
s = sum( j );
if ( s > j && sum( s ) == j )
printf( "%d %d\n", j, s );
}
}
sum( n )
int n;
{
int i, s;
s = 0;
for ( i = n/2; i >= 1; --i )
if ( (n % i) == 0 ) s += i;
return s;
}
- 4 ：
- テンプレ
【.メーカー.】
【..機種名....】
【...CPU...... 】
【クロック数】
【.....メモリ.. 】
【.言語 】
【プログラム変更点】
▼スコア
【 220,284 】
【 1184,1210 】
- 5 ：
- 【.メーカー.】CASIO
【機種名】FX-870P
【.CPU 】???
【クロック数】???
【.メモリ 】32kB
【.言語 】BASIC
【プログラム変更点】行番号100を削除した。
▼スコア
【 220,284 】7分56秒
【 1184,1210 】
ｏｒｚ ポケコンは厳しい。。。
- 6 ：
- 実行してやってもいいが、この板で最速だとおもうぜ。
- 7 ：
- 486系なら、DX4を積んだTOWNSかPC-98が最速？
- 8 ：
- 最速バトルも良いけど、クラシックレースも気になるな。
マシンそのものとプログラム環境が残ってるかどうか厳しいだろうけど。
俺はMSXとかﾌｧﾐﾘｰﾍﾞｰｼｯｸとかｼｮﾎﾞｲのしかできないけどな。
- 9 ：
- しょぼくてもいいんでない？昔のPCスレだし
ミッレミリアみたいにﾏﾀｰﾘといくｻﾞﾝｽ
- 10 ：
- 機種毎のリストがあれば嬉しい
- 11 ：
- >>6
て言うか多分、たかがこれだけをどれだけ遅く実行するか
のコンペになりそうな予感
- 12 ：
- ( ´･ω･)
プログラム間違えた。。。
>2の110行目は、
× 110 FOR J=2 TO 1000
○ 110 FOR J=2 TO 10000
だった。じゃなきゃ【 1184,1210 】なんて出るわきゃーない。orz
今MSX２＋で30分も計算してたのに、パーんなってもうた。
- 13 ：
-
>9 おっさんくす。
俺も乗ってみるわ。
- 14 ：
- 気を取り直して再チャレンジ
【.メーカー.】 Panasonic
【..機種名....】 FS-A1WX
【...CPU...... 】 Z80A相当
【クロック数】 3.579545MHｚ
【.....メモリ.. 】 メインRAM 64KB
【.言語 】 MSX-BASIC ver3.0
【プログラム変更点】 110行目の「FOR J=2 TO 1000」は、
「FOR J=2 TO 10000」の間違いですた。
▼スコア
【 220,284 】 1分36秒
【 1184,1210 】 44分12秒
まぁこんなものだ罠
- 15 ：
- おいらP6だけど，MODないよ～
ちなみにMODのない機種は，MODのところを
N MOD I → N - INT( N / I ) ＊ I
に変更する．
- 16 ：
- >15
おっさんくす。パピコンの挑戦待ってるぜ！
- 17 ：
- 穂っ主
- 18 ：
- >>17
この板は絶対に落ちないので不要です。
- 19 ：
- 名機ポケコンを発掘して>15に倣ってみますた。
【.メーカー.】CASIO
【機種名】PB-100
【.CPU 】???
【クロック数】???
【.メモリ 】2kB （1kb増設済み）
【.言語 】BASIC
【プログラム変更点】
・行番号100、170を削除した。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・200行目、（N MOD I） → （N - INT( N / I ) ＊ I） に変更する
▼スコア
【 220,284 】（約）17分30秒
【 1184,1210 】
ｏｒｚ
- 20 ：
- Ｘ６８０００でＣコンパイラでやってみた
[6232,6368]１１分３０秒
今のパソコンでやったら数秒かな
- 21 ：
- >>20乙。
(´ω`)やっぱりコンパイラは早えーな。。。
もちろん今のパソコンだと９９BASICでも数秒ですが。
- 22 ：
- 【.メーカー.】 任天堂
【..機種名....】 ファミリーコンピュータ
【...CPU...... 】 6502カスタム
【クロック数】 ???MHｚ
【.....メモリ.. 】 2KB
【.言語 】 NS-HUBASIC V2.1A
【プログラム変更点】
100行 不要
110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
150、210行の変数（I、J)不要
▼スコア
【 220,284 】 50秒
【 1184,1210 】 21分49秒
MSX２に勝ったぜベイビー
- 23 ：
- ＞MSX２に勝ったぜベイビー
まったりとコメントでよろし．しかし若干加齢臭も感じる‥‥
コンパイラでもOKなら，うちにP6用のEXASコンパイラがあったな‥‥
- 24 ：
- もちろんプログラムのフローが同じなら、コンパイラでもおｋ
- 25 ：
- 個々にチューニングするのはokな訳ですね．
よーし，DMA切ったる！
しまった，画面が見えない (涙
- 26 ：
- 【.メーカー】EPSON
【機種名】PC-286C
【.CPU 】i80286
【クロック数】10MHz
【.メモリ 】640KB
【.言語 】N88日本語BASIC(86) Ver5.0
【プログラム変更点】
110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
▼スコア
【 220,284 】11秒
【 1184,1210 】 5分01秒
こんなもんかね・・・
- 27 ：
- (´ω`)
- 28 ：
- (´ω`).｡ｏO(ヤッパリぴゅう太は速いのかな・・・・・・・・・)
- 29 ：
- >お前らの愛機の実力を教えてください。
BASICで実力？
機械語じゃねーと意味ねーだろ。
- 30 ：
- だったら機械語でかけば？
フローが同じならプログラムに変更加えてもいいわけですから．
(車がクラシックカーだったらチューニングは自由というのと同じ)
- 31 ：
- - 終了 -
- 32 ：
- (´ω`)ハンドアセンブルは時間が掛かるからな。。。
止めはしませんが、プログラミングに何時間も掛けるのは本末転倒かも。
- 33 ：
- ぴゅう太とＳ１が気になる。。。
- 34 ：
- 日本語BASICのプログラムも載せておかないとダメなんじゃない？
50 ﾓｼ A=1 ﾅﾗﾊﾞ ｿﾚｶﾗ 100ﾆｲｹ
- 35 ：
- (´ω`)自分の持ってるPCへの移植ぐらい自分でしてもらわんと。
- 36 ：
-
- 37 ：
- あげ忘れた。。。
- 38 ：
- >>33
会吸わんは速そうだ。
- 39 ：
- 起きたらでけてた。
【.メーカー.】EPSON
【機種名】HC-20
【.CPU 】6301×2
【クロック数】641kHz?
【.メモリ 】16KB
【.言語 】BASIC
【プログラム変更点】
・90行目に「PRINT TIME$」を追加しますた。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・140行目「PRINT J; N」のお尻に「; TIME$」を追加しますた。
・150、210行目の変数(I、J)不要
・その他、各予約語の後ろの空白を可能なものにつき削りますた。行頭の字下
げはそのまま。
▼スコア
【 220,284 】00:03:10
【 1184,1210 】01:24:21
【処理時間(秒)×Clock周波数】
◎ 220,284 (3*60+10)*641*1000=121,790,000
◎ 1184,1210 (1*3600+24*60+21)*641*1000=3,244,101,000
クロック数が低い割に検討してます。
- 40 ：
- ×検討
○健闘
orz
- 41 ：
- >>39
久々の参入Ｚ。
- 42 ：
- >>41
㌧。他にも現れないかな。
- 43 ：
- 【.メーカー.】富士通
【..機種名....】FM-NEW7
【...CPU...... 】68B09×2
【クロック数】2MHz
【.....メモリ.. 】32KB/64KB
【.言語 】F-BASIC 3.0
【プログラム変更点】
・90行目に「TIME$="00:00:00"」を追加しますた。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・140行目「PRINT J; N」のお尻に「; TIME$」を追加しますた。
▼スコア
【 220,284 】1分15秒
【 1184,1210 】34分17秒
ファミコンに勝てなかった。
- 44 ：
- ６８０９でも勝てないのか・・・
- 45 ：
- クロックが速いのにそんなに遅いかな?
うちでも試してみるYO!
あ、BASICが遅い可能性大だな。
- 46 ：
- FM-7のBASICはそこそこ早かったような気がするけど‥‥
PAINTが早かっただけかな？
- 47 ：
- NEW7よりちょっと速いが、、、、ファミリーベーシック恐るべし。整数型なの
かな?
【.メーカー.】富士通
【..機種名....】FM77AV
【...CPU...... 】68B09E×2
【クロック数】2MHz
【.....メモリ.. 】32KB/64KB
【.言語 】F-BASIC 3.0 (disk版)
【プログラム変更点】
・90行目に「TIME$="00:00:00"」を追加しますた。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・140行目「PRINT J; N」のお尻に「; TIME$」を追加しますた。
・その他、各予約語の後ろの空白を可能なものにつき削りますた。行頭の字下
げはそのまま。
▼スコア
【 220,284 】1分05秒
【 1184,1210 】29分36秒
F-BASIC 3.3L10でやったら最初のが1分22秒だったので、途中で止めました。
いくらなんでも遅過ぎ。
こんどはAppleIIeでやってみるかな。
- 48 ：
- FMシリーズｷﾀ━━━━━(ﾟ∀ﾟ)━━━━━ !!!!!
ファミコンはゲームに最適化したから計算も速いとか。
なんにしてもﾒﾓﾘが少ないからおよそパソコンとしてはアレですが。
- 49 ：
- Ｘ６８０００で１０ＭＨｚでＸ－ＢＡＳＩＣでやってみたらファミコンと
同じような結果でした
ファミコン速いなあ
- 50 ：
- それはX-BASICが遅いだけじゃないかい?
上のPC-286Cに大差で負けてるよ。
- 51 ：
- 【.メーカー.】SHARP
【機種名】X68000XVI('91)
【.CPU 】68000
【クロック数】16/10MHz(10MHzで実行)
【.メモリ 】8MB
【.言語 】X-BASIC
【プログラム変更点】X-BASIC風にかなり改悪
▼スコア
【 220,284 】51秒
【 1184,1210 】22分51秒
PCMやMOUSE等の設定を外したけどあまり速くならなかった
10MHzだとファミコンにも負ける・・・
- 52 ：
- なんだかんだ言ってこのスレの最強のハードはファミコンなのか?!
- 53 ：
- X68で、ぺけBASICでキボン
- 54 ：
- 盛り上がってまいりました
- 55 ：
- 【.メーカー.】シャープ
【..機種名....】X1
【...CPU...... 】Z80A
【クロック数】4MHz
【.....メモリ.. 】64KB
【.言語 】dB-IBASIC 1.0
【プログラム変更点】
・行番号100を削除。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。▼スコア
【 220,284 】44秒
【 1184,1210 】20分15秒
- 56 ：
- 10台エントリーされたので、集計しますた。
なるべく窓を大きくして見てくださいです。
ずれてて見づらいのはｽﾏｿ。
【機種名】..........【ｸﾛｯｸ】....... 【ﾒﾓﾘ】.... 【言語】.............. 【220'284】.... 【1184'1210】
PC-286C 10MHz 640KB N88日本語BASIC(86) Ver5.0 11秒 5分01秒
X1............ 4MHz... 64KB dB-IBASIC 1.0........ 44秒 20分15秒
ﾌｧﾐﾘｰｺﾝﾋﾟｭｰﾀ ???MHz... 2KB NS-HUBASIC V2.1A. 50秒 21分49秒
X68000XVI('91) 10MHz.. 8MB X-BASIC.......... 51秒 22分51秒
FM77AV....... 2MHz 32KB/64KB F-BASIC 3.0 (disk版).............. 1分05秒 29分36秒
FM-NEW7....... 2MHz 32KB/64KB F-BASIC 3.0... 1分15秒 34分17秒
FS-A1WX.... 3.6MHｚ 64KB MSX-BASIC ver3.0. 1分36秒.... 44分12秒
HC-20........ 641kHz?.. 16KB BASIC........ 3分10秒 1時間24分21秒
FX-870P... ???....... 32KB BASIC........ 7分56秒
PB-100...... ???...... 2KB BASIC......... 17分30秒
- 57 ：
- 【.メーカー.】シャープ
【..機種名....】X1
【...CPU...... 】Z80A
【クロック数】4MHz
【.....メモリ.. 】64KB
【.言語 】CZ-8CB01(HuBASIC) 1.0
【プログラム変更点】
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・90行にTIME$="00:00:00"、140行に;TIME$を追加
▼スコア
【 220,284 】1分06秒
【 1184,1210 】29分46秒
【 2620,2924 】2時間24分24秒
- 58 ：
- 普通ＮＥＷＢＡＳＩＣでないのん？
- 59 ：
- ぬーべーしっくでこういう計算変わるかな～？
- 60 ：
- お、ついにファミコン超えたね。
やっぱ整数に特化ってのが効くのか。
- 61 ：
- >52
また一つ伝説がｗ
>54
あれ、嬉しいねえ。
>56
乙彼～
>59
変わると思う。
- 62 ：
- 掛かった時間とクロック周波数を掛けてみた。ファミコンのクロックは1.79MHzだた。
表の見方は、数字が小さいほど速い。
【機種名】 【ｸﾛｯｸ】 【220'284】 【1184'1210】（秒数×クロックMHz）
PC-286C. 10MHz. 110. 3010
X1... 4MHz... 176. 4860
ﾌｧﾐﾘｰｺﾝﾋﾟｭｰﾀ. 1.79MHz.. 89.5.. 2343
X68000XVI('91) 10MHz... 510.. 13710
FM77AV 2MHz.. 130.. 3552
FM-NEW7 2MHz.. 150.. 4114
FS-A1WX 3.6MHｚ... 345.6. 9547
HC-20 641kHz?..... 121.79.. 3244
FX-870P.. ???....... 7分56秒
PB-100. ???...... 17分30秒
○やはりファミコンがずば抜けて速い。クロック周波数勘案でその次に速いの
はなんとHC-20ｗ
○X-BASICはなぜこんなに遅いのか?
- 63 ：
- X-BASICはC言語モドキで他機種とは全く構造違うからじゃね？
- 64 ：
- コンパイル前提だったんじゃないかな。
中間コードに変換とかしてたっけ?
- 65 ：
- そういえば、大昔、BASICインタプリタのベンチマーク競争が結構盛んだった
頃があったな。AppleIIの整数BASICとTRS-80のLevel2 BASICとどっちが速いみたいな。
ああいうベンチマーク競争っていつ頃、どうして終焉したんだろう？ よく憶えていない。
ま、右を見ても、左を見ても、MS製のインタプリタばかりで面白くなくなったからとか、
MSがベンチマークコードに最適化かけたからとか、そうしたことが原因なんだろうけど。
- 66 ：
- M5のBASIC-Gって期待できそ。
>>64
んだんだ
- 67 ：
- >>64
あ、BASIC→Cのソースに変換
- 68 ：
- Cにしてコンパイルした結果規模ン
- 69 ：
- >>20 にあるがね
>>62
6809は内部2倍でなかったっけ
- 70 ：
- >>67
そうだった、Cコンパイラに付属だったんだ。たしか。
>>69
FM-7のは8MHzを分周して2MHz動作だったはず。
AVのは違うかも。
- 71 ：
- >>69
>>20
ホントだ…何度も見たのに忘れていた。
68系は(8080も確か)二相クロックなので倍クロック相当といえるが、内部での
逓倍はしていないはず。ちなみにZ80は二相クロックを止めて内部回路を単純
化した結果、高速にできたそうだ。外部バスのタイミングに余裕がなくなった
みたいだけど。
- 72 ：
- 【.メーカー.】SHARP
【..機種名....】PC-E500
【...CPU...... 】SC62015
【クロック数】2.3MHz ?
【.....メモリ.. 】64k(増設)
【.言語 】BASIC
【プログラム変更点】
・行番号100を削除
・MOD判定を「N=INT(N/I)*I」に変更
・NEXTの変数削除
▼スコア
【 220,284 】3分58秒
【 1184,1210 】 (まだ計算中)
ポケコンなめんな。でもクロックの割に遅いような。
しかしTIME$のあるマシンがうらやましい。
ちなみにNEXTの変数を残したら4'09
- 73 ：
- 途中でねちまった。
もいちど計算だ。
- 74 ：
- 【.メーカー.】 NEC
【..機種名....】 PC-98DO
【...CPU...... 】 V30 / μPD70008AC-8
【クロック数】 10MHz / 8MHz
【.....メモリ.. 】 640KB / 192KB
【.言語 】 N88-BASIC(86) Ver2.0 / N88-BASIC Ver2.3
【プログラム変更点】
・90行目に「TIME$="00:00:00"」を追加しますた。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・140行目「PRINT J; N」のお尻に「; TIME$」を追加しますた。
▼スコア
【 220,284 】 00:00:22 / 00:00:45
【 1184,1210 】 00:09:56 / 00:20:37
- 75 ：
- Ｖ３０ｷﾀ━━━━━(ﾟ∀ﾟ)━━━━━ !!!!!
10Mと8Mで偉く速度が違う…ってV30とZ80H相当なのね。
乙>>72,73
matahritoマテルヨ
- 76 ：
- どうせだからマシン語でやろうかとも思ったのだが、最近そんな元気がでない。
みんな、ちょっとずつでいいからオラに元気を
- 77 ：
- いまだマシン語でやろうとするアンタはすごすぎ
- 78 ：
- >>76
機種は何よ?
- 79 ：
- 上で書いたとおり、10数年前のSHARPのポケコン。
実際のところ、MODの計算を除けばループと数値判定くらいだし、
変数も4つしかでてこないしで、なんとかなるんじゃないかなあ
くらいに思ってるところ。
- 80 ：
- >>79
メール欄見落としていた。素満。SC62015って面白いCPUだね。6809に似ている
と思った。それではとっておきを
つ【始原の混沌の気】
- 81 ：
- すこしずつ元気がたまってきました。
これはがんばるしか!?
と思ったけどニーモニック表がない。活研(E500シリーズのバイブル)は実家だし。
みんな、ちょっとずつでいいからオラに資料を orz
- 82 ：
- >>81
http://web.archive.org/web/20031007214858/www.hepl.phys.nagoya-u.ac.jp/~mitsuru/urawaza.txt
>第３章 ＰＣ－Ｅ５００シリーズマシン語講座
- 83 ：
- >>82
おおおっ
あついぜ、なつかしいぜ、ちゃんとサイクル数までのってるぜ。
これでもう逃げられないぜ。いやまだ逃げれるかもだぜ。
ていうか、r2～r4の指定とか、TEST命令とか、もういろんなことを忘れている
ことを再認識したさ。
仕様どおりに動くものは作れても、もうまともなマシン語プログラムは作れない予感。
- 84 ：
- 一度自転車に乗れるようになった奴が乗れなくなるとでも?ｗ
- 85 ：
- そうだ、おれはチャリに乗ったことがあるんだ！
(乗り回していたんだといいきれないむなしさ)
今回のはMOD判定がキモだろうから、とりあえずそこを考えてみた。
BASICでいうとこんな感じかなあ。
1100 *MOD REM IF (N MOD I)=0 THEN S=S+I
1110 M=N
1200 IF I AND 128 THEN 1280
1201 I=I+I:IF I AND 128 THEN 1270
1202 I=I+I:IF I AND 128 THEN 1260
1203 I=I+I:IF I AND 128 THEN 1250
1204 I=I+I:IF I AND 128 THEN 1240
1205 I=I+I:IF I AND 128 THEN 1230
1206 I=I+I:IF I AND 128 THEN 1220
1207 I=I+I
1210 IF M>=I THEN M=M-I
1215 I=I/2
1220 IF M>=I THEN M=M-I
1225 I=I/2
1230 IF M>=I THEN M=M-I
1235 I=I/2
1240 IF M>=I THEN M=M-I
1245 I=I/2
1250 IF M>=I THEN M=M-I
1255 I=I/2
1260 IF M>=I THEN M=M-I
1265 I=I/2
1270 IF M>=I THEN M=M-I
1275 I=I/2
1280 IF M>=I THEN M=M-I
1300 IF M=0 THEN S=S+I
1399 RETURN
- 86 ：
- 於津>>85
ポケコンは知らない素人だけど、2点気になった。
・乗除算ってそこまで遅いのかな?
・8ビット分だけで足りる?
- 87 ：
- というか，乗除算ってあるの？
Z80にはないけど
- 88 ：
- >>87
スマン惚けていた。忘れてくだされ
- 89 ：
- そうか、最初に見つかるJが220だからと油断していた。
そのときのNは280ですでに9bit目に突入していたのだな。
2Bytes用に組むとなると、急にメンクサ度がアップだな
- 90 ：
- まあ8bit機じゃねぇ
- 91 ：
- 今日ようやっと時間ができたのでやってみた
【.メーカー.】 NEC
【..機種名....】 PC-6001
【...CPU...... 】 Z80Aコンパチ(μPD780C-1)
【クロック数】 4MHz
【.....メモリ.. 】 32KB
【.言語 】 N60-BASIC Page数 4
【プログラム変更点】
・100行目を削除した。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・170行目の「'」は「REM」にした。
・200行目の（N MOD I）は（N - INT(N/I) * I)に変更した。
▼スコア
【 220,284 】 12分16秒
【 1184,1210 】
同じCPU、クロックのX1にも遠く及ばない ＿|￣|○
ライバル？MSXにも遙かに劣っている ＿|￣|○
BASICが整数型じゃないし、MODもないからなぁ
- 92 ：
- このままでは収まらないので、掟破りのBASIC Compilerを使ってみた
ニトロ噴射する気分だな～
【.メーカー.】 NEC
【..機種名....】 PC-6001
【...CPU...... 】 Z80Aコンパチ(μPD780C-1)
【クロック数】 4MHz
【.....メモリ.. 】 32KB
【.言語 】 N60-BASIC＋EXAS BASIC Compiler Page数 4
【プログラム変更点】
・100行目を削除した。
・110行目の「FOR J=2 TO 1000」は、 「FOR J=2 TO 10000」の間違いですた。
・170行目の「'」は「REM」にした。
・200行目の（N MOD I）は（N - INT(N/I) * I)に変更した。
・実行前にコンパイルした。
▼スコア
【 220,284 】 0分20秒
【 1184,1210 】 9分41秒
EXAS Compiler自体が整数型BASICのせいか、思っていたよりずっと早くなった。
PC-6001mkIIも引っ張り出そうと思ったけど、あまりに時間がかかるのでまた次回。
- 93 ：
- >>91,92
GJ!!!
>>92
ﾍﾞｰｼｯｸｺﾝﾊﾟｲﾗｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!!!!
- 94 ：
- 【.メーカー.】シャープ
【..機種名....】PC-G850V
【...CPU...... 】Z80相当 CMOS品
【クロック数】4MHz?（←誰か教えてください）
【.....メモリ.. 】32KB
【.言語 】内蔵C言語/BASIC
【プログラム変更点】
・C言語は，#include分の除去と行番号を各ラインに付与。
・BASICは，190行目の"N/2"を"INT(N/2)"に変更。
【 220,284 】 16秒/ 196秒
【 1184,1210 】481秒/未計測
PC-G850V，PC-E650, FX-890PのBASICは，整数型変数がなく，実数で計算するので，
整数演算に不利。セミコンパイラー＆整数演算のCは，やはり高速。
- 95 ：
- BASICではありませんが、GBで挑戦してみました。
【.メーカー.】 任天堂
【..機種名....】 ゲームボーイ
【...CPU...... 】 Z80カスタム
【クロック数】 4MHｚ
【.....メモリ.. 】 32KB ROM
【.言語 】 機械語（アセンブラ）
【プログラム変更点】
110行目の「FOR J=2 TO 1000」を、 「FOR J=2 TO 10000」相当に修正。
▼スコア
【 220,284 】 4秒6
【 1184,1210 】 2分14秒8
ソースリストは以下にあります。
http://www.geocities.jp/submarine600/html/number.html
- 96 ：
- >>95
マジＺ。普通のＰＣでのマシン語じゃないところが
マニアックでいいでつな。
- 97 ：
- Z80カスタム？？？
自分も６８０００でガンバルか
そういえばＺ８０しかアセンブラ経験ねえや。。。
- 98 ：
- >>95
おつかれ
ゲームボーイってZ80のカスタムだったのね
知らんかった
- 99 ：
- >>95に触発されてやってみた
レトロじゃないけど番外編ってことで怒らないでね
【.メーカー.】 任天堂
【..機種名....】 ゲームボーイアドバンス
【...CPU...... 】 ARM7TDMI
【クロック数】 16MHz
【.....メモリ.. 】 32KB+256KB
【.言語 】 C+アセンブリ
【プログラム変更点】
秒間約60フレームとしてVSYNC割り込みでフレーム数を計測
剰余はBIOS命令で代用し、コードをメモリに置いてフルに回した
▼スコア
【 220,284 】 0秒11 =7f
【 1184,1210 】 3秒5 =208f
【 2620,2924 】 17秒0 =1022f
【 5020,5564 】 62秒5 =3751f
【 6232,6368 】 96秒4 =5784f
- 100 ：
- >>95, >>99に触発されて，WonderSwanで計算しました。
【.メーカー.】 バンダイ
【..機種名....】 WonderSwan
【...CPU...... 】80186バイナリ互換
【クロック数】 3.072MHz
【.....メモリ.. 】 16KB(本体)+256KB(WonderWitchカートリッジSRAM)+512KB(WonderWitchカートリッジROM)
【.言語 】 LSI-C86 for WonderWitch
【プログラム変更点】
WonderWitchのOS FreyaのシステムBIOS関数 sys_get_tick_countを用いて，
時間を計測。これも，>>99 と同じで，VSYNC(VBLANK)を使用した計測。
あとRTCで秒単位でも計測。
▼スコア
【 220,284 】 0秒27 = 20 tick
【 1184,1210 】 7秒36 = 552 tick
【 2620,2924 】 35秒95 = 2696 tick
【 5020,5564 】131秒73 = 9880 tick
【 6232,6368 】203秒07 =15230 tick
>>95,>>99と比較すると，周波数の割りに高速。
WonderWitchの資料によれば，1クロック/1バスサイクル，内部パイプライン化されていて，
オリジナルの80186より優秀そう。
100～のスレッドの続きを読む
Ａｈ！Ｓｋｉ の想い出
Yoのけそうぶみ
◆◇◆ 月刊マイコン ◆◇◆
シグマOSを語れ
ATARI ｖｓ ＡＭＩＧＡ
きょうはじめてぼくんちにぱそこんがやってきました
(ﾜなし)【富士通】FM TOWNS 19代目【FUJITSU】
究極の16bitゲーミングPCを妄想するスレ part 01
【なんでも】タイニーゼビウス【出来るさ】
ライフゲームだｺﾞﾙｧ!!
--------------------
水道水のみますか？
50代の奥様(ID梨) part372
KBTの噂８
【下関北九州道路】北九州市【東九州道】
◎書き込むと癌が消滅、自然に治癒…と噂のスレ◎47
【韓国】反日の新造語、「土着倭寇」で日本叩き 若者の間で盛り上がっていた日本ブームにも冷水浴びせる[7/4]
DTM知識ゼロの中学生だけど作曲したい
自衛隊も攻撃対象・・スンニ派指導者会議が明言
史上最高の和ホラーSIRENが今年で15周年 そろそろ新作か [565311438]
【原発賛成】日本維新の会２００【愛国保守】
ほのかのお🏡pran.38
A.B.C-Z橋本良亮30
【日本】寝しょんべん【地図】
演技が下手糞な癖に演技派扱いされている俳優女優
同人 歳を取ったと思う時＆その対策
【虚言】氷川きよしと松井絵里奈の噂39【顕示欲】
【古豪】大牟田高校駅伝部 part52
【初音ミク・GUMI】VOCALOID総合1348【結月ゆかり・IA他】
【佐賀新聞】韓国語や文化学ぼう 民団がハングル講座受講者を募集 講師の在日韓国人が指導［9/15］
川σヮσﾘ
TOP カテ一覧 スレ一覧 100～終まで 2ch元 削除依頼
