asm 3000 ioc 0,0(0:17)
asm 3001 ent1 -499,0(0:2)
asm 3002 ent2 3,0(0:2)
asm 3003 inc1 1,0(0:0)
asm 3004 st2 499,1(0:5)
asm 3005 j1z 3016,0(0:1)
asm 3006 inc2 2,0(0:0)
asm 3007 ent3 2,0(0:2)
asm 3008 enta 0,0(0:2)
asm 3009 entx 0,2(0:2)
asm 3010 div -1,3(0:5)
asm 3011 jxz 3006,0(0:1)
asm 3012 cmpa -1,3(0:5)
asm 3013 inc3 1,0(0:0)
asm 3014 jg 3008,0(0:6)
asm 3015 jmp 3003,0(0:0)
asm 3016 out 1995,0(0:17)
asm 3017 ent4 2035,0(0:2)
asm 3018 ent5 -50,0(0:2)
asm 3019 inc5 501,0(0:0)
asm 3020 lda -1,5(0:5)
asm 3021 char 0,0(0:1)
asm 3022 stx 0,4(1:4)
asm 3023 dec4 1,0(0:1)
asm 3024 dec5 50,0(0:1)
asm 3025 j5p 3020,0(0:2)
asm 3026 out 0,4(0:17)
asm 3027 ld4 24,4(0:5)
asm 3028 j5n 3019,0(0:0)
asm 3029 hlt 0,0(0:2)
em 0 2
em 1995 103101847
em 1996 1611333
em 1997 2196420
em 1998 320094225
em 1999 321184086
em 2024 2035
em 2049 2010
run 3000 3030 
end