.symbol
 fp 30
 sp 29
 retval 28
 rads 27
.code 0
 mov fp #3500
 mov sp #3000
 jal rads main
 trap r0 #0
; fun main pv 0 fs 2
:main
; gnAsg :(#1 0 )
; gnAsg :(#2 (call readport 10 ))
st r1 @1 fp
st r2 @2 fp
st r3 @3 fp
add fp fp #4
st rads @0 fp
mov r1 #0
jmp L102
:L103
mov r3 #10
trap r3 #18
mov r2 r28
trap r2 #1
add r1 r1 #1
:L102
lt r3 r1 #1000
jt r3 L103
:L101
ld rads @0 fp
sub fp fp #4
ld r3 @3 fp
ld r2 @2 fp
ld r1 @1 fp
ret rads
.data 200
.end
