Steamをインストール
ログイン
|
言語
简体中文(簡体字中国語)
繁體中文(繁体字中国語)
한국어 (韓国語)
ไทย (タイ語)
български (ブルガリア語)
Čeština(チェコ語)
Dansk (デンマーク語)
Deutsch (ドイツ語)
English (英語)
Español - España (スペイン語 - スペイン)
Español - Latinoamérica (スペイン語 - ラテンアメリカ)
Ελληνικά (ギリシャ語)
Français (フランス語)
Italiano (イタリア語)
Bahasa Indonesia(インドネシア語)
Magyar(ハンガリー語)
Nederlands (オランダ語)
Norsk (ノルウェー語)
Polski (ポーランド語)
Português(ポルトガル語-ポルトガル)
Português - Brasil (ポルトガル語 - ブラジル)
Română(ルーマニア語)
Русский (ロシア語)
Suomi (フィンランド語)
Svenska (スウェーデン語)
Türkçe (トルコ語)
Tiếng Việt (ベトナム語)
Українська (ウクライナ語)
翻訳の問題を報告









My solution with one EXA (no SWIZ) - 579/45/4
MAKE
@REP 4
COPY 0 F
@END
LINK 800
MARK CODE
COPY #OUTP X
SEEK -9999
@REP 4
COPY F #PASS
@END
@REP 4
TEST #OUTP = X
TJMP DIGIT@{0,1}
@END
WIPE
LINK 800
GRAB 267
LINK -1
LINK -1
HALT
@REP 4
MARK DIGIT@{0,1}
COPY @{-4,1} X
JUMP INCREASE
@END
MARK INCREASE
SEEK X
COPY F X
SEEK -1
ADDI X 1 F
JUMP CODE
⣿⣿⣿⣿⠀⠀⠸⠿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿
⣿⣿⣿⠃⠀⣠⣾⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿
⣿⡿⠃⠀⢰⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿
⣿⠃⠀⠀⣾⣿⣿⣿⣿⣿⣦⠀⠈⠻⣿⣿⣿⣿
⣿⠀⠀⠀⣿⣿⣿⠟⠉⠉⠉⢃⣤⠀⠈⢿⣿⣿
⣿⠀⠀⠀⢸⣿⡟⠀⠀⠀⠀⢹⣿⣧⠀⠀⠙⣿
⣿⡆⠀⠀⠈⠻⡅⠀⠀⠀⠀⣸⣿⠿⠇⠀⠀⢸
⣿⣿⠀⠀⠀⠀⠀⠀⠀⠀⠔⠛⠁⠀⠀⠀⣠⣿
⣿⣿⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⢀⣴⣿⣿
⣿⣿⠃⠀⠀⠀⠀⠀⠀⠀⠀⠀⣠⣾⣿⣿⣿⣿
⣿⣿⡇⠀⠀⠀⠀⠀⠀⠀⠀⣠⣿⣿⣿⣿⣿⣿
⣿⣿⡇⠀⠀⠀⠀⠀⠀⠀⢰⣿⣿⣿⣿⣿⣿⣿
⣿⣿⣿⠀⠀⠀⠀⠀⠀⠀⢸⣿⣿⣿⣿⣿⣿⣿
⣿⣿⣿⠀⠀⠀⠀⠀⠀⠀⠘⣿⣿⣿⣿⣿⣿⣿
⣿⣿⠁⠀⠀⠀⠀⠀⠀⠀⠀⢹⣿⣿⣿⣿⣿⣿
⣿⠟⠀⠀⠀⠀⠀⠀⠀⠀⠀⢠⣿⣿⣿⣿⣿⣿
⡟⠁⠀⠀⠀⠀⠀⠀⠀⠀⠀⢸⣿⣿⣿⣿⣿⣿
The
COPY F #PASS
COPY F #PASS
COPY F #PASS
COPY F #PASS
on ENTER is not needed, I didn't thought that the last try have to be correct, therefore, it will be opened :)
Here is my solution:
LINK 800
MAKE
;0: ADD VALUE
COPY 1000 F
;1: RESULT POINTER
COPY 2 F
;2: SWIZ POINTER
COPY 4 F
;3: WAIT WORD
COPY #OUTP F
MARK LOOP
SWIZ X 4 #PASS
SWIZ X 3 #PASS
SWIZ X 2 #PASS
SWIZ X 1 #PASS
COPY #OUTP F
NOOP
COPY #OUTP F
NOOP
COPY #OUTP F
NOOP
COPY #OUTP F
NOOP
SEEK -9999
SEEK 1
SEEK F
COPY F T
SEEK -9999
SEEK 3
TEST F = T
FJMP CORRECT
SEEK -9999
ADDI X F X
SEEK 3
JUMP LOOP
MARK RET
SEEK -9999
SEEK 1
TEST F = 6
TJMP ENTER
SEEK 2
JUMP LOOP
MARK CORRECT
SEEK -9999
SEEK 2
COPY F T
SEEK 9999
SWIZ X T F
SEEK -9999
DIVI F 10 T
SEEK -1
COPY T F
ADDI F 1 T
SEEK -1
COPY T F
SUBI F 1 T
SEEK -1
COPY T F
JUMP RET
MARK ENTER
SEEK 9999
SEEK -4
COPY F #PASS
COPY F #PASS
COPY F #PASS
COPY F #PASS
WIPE
LINK 800
GRAB 267
LINK -1
LINK -1
HALT
// Output: CHK CHK CHK CHK CHK CHK WAI WAI
// ERROR: Comment appears to contain incorrect number.
405/32/5
LINK 800
MARK BRUTE
SWIZ X 4 #PASS
SWIZ X 3 #PASS
SWIZ X 2 #PASS
SWIZ X 1 #PASS
REPL CHECK
COPY X M
LINK 800
GRAB 267
LINK -1
KILL
LINK -1
MARK CHECK
COPY #OUTP X
TEST X = #OUTP
FJMP WRG2
TEST X = #OUTP
FJMP WRG3
TEST X = #OUTP
FJMP WRG4
ADDI 1000 M X
JUMP BRUTE
MARK WRG2
ADDI 100 M X
JUMP BRUTE
MARK WRG3
ADDI 10 M X
JUMP BRUTE
MARK WRG4
ADDI 1 M X
JUMP BRUTE