loops - OAM アセンブリー言語の明確化

Question

1 から始まる交互の符号を持つ一連の奇数を生成する OAM プログラムの作成に問題があります。

プログラムを作成しましたが、動作しません。理由がわかりません。これは珍しい言語なので、誰かが私が間違っていることを助けて説明してくれれば、それは素晴らしいことです.

X,NOOP
Y,NOOP 
LDA stdin
loop, SET 1
LDA Y
STA 0
LDA X
DEC
STA X #X = X - 1
LDA X #ACC = X