I'm doing my cad work with Solidworks....Posting with Bobcad V5 and trying to send to an Harrison Alpha 400 Plus Lathe. I know I need to copy the code and paste it into the Alpha link software and then send it to the machine but I'm not having any luck finding the correct code. I'am attaching a code that was drawn with the alpha link software and worked in the machine....Thanks for any help

O0001
(AI test1 )
IF[#530EQ1]GOTO#529
IF[#1000EQ1]GOTO[#509*10]
IF[#1001EQ1]GOTO[#509*10]
N10
#501=1
#502=2
#503=7.87
#504=5.91
#507=1
#509=1
#510=0.010
M50
IF[#531EQ1] GOTO 502
M10
M11
G0 X7.874Z5.9055
M12
M11
G0 X3.5433Z0.1969
M12
N502
N20
#500=1
#501=1
#502=2
#503=3.5433
#504=0.1969
#507=14
#508=1
#509=2
#510=0.015
M50
IF[#531EQ2] GOTO 503
M10
M11
G0 X3.2646Z0.0619
M12
M13
G1 X3.1496Z0. F0.0150
G1 X0.Z0.F0.015
G1 X-0.0512Z0.0299F0.015
M14
M11
G0 X3.5433Z0.1969
M12
M15
N503
M50
IF[#531EQ3] GOTO 504
N504
N30
#500=10
#501=1
#502=2
#503=3.5433
#504=0.1969
#507=6
#508=1
#509=3
#510=0.015
M50
IF[#531EQ4] GOTO 505
M10
M11
G0 X3.0433Z0.1969
M12
M13
G1 X3.0433Z-3.11 F0.0150
G1 X3.122Z-3.0706F0.015
M14
M11
G0 X3.122Z0.1969
M12
N505
#501=2
#503=3.122
#504=0.1969
M50
IF[#531EQ5] GOTO 506
M10
M11
G0 X2.8858Z0.1969
M12
M13
G1 X2.8858Z-3.065F0.015
G1 X2.9646Z-3.0256F0.015
M14
M11
G0 X2.9646Z0.1969
M12
N506
#501=3
#503=2.9646
#504=0.1969
M50
IF[#531EQ6] GOTO 507
M10
M11
G0 X2.7283Z0.1969
M12
M13
G1 X2.7283Z-3.02F0.015
G1 X2.8071Z-2.9806F0.015
M14
M11
G0 X2.8071Z0.1969
M12
N507
#501=4
#503=2.8071
#504=0.1969
M50
IF[#531EQ7] GOTO 508
M10
M11
G0 X2.5709Z0.1969
M12
M13
G1 X2.5709Z-2.975F0.015
G1 X2.6496Z-2.9356F0.015
M14
M11
G0 X2.6496Z0.1969
M12
N508
#501=5
#503=2.6496
#504=0.1969
M50
IF[#531EQ8] GOTO 509
M10
M11
G0 X2.4134Z0.1969
M12
M13
G1 X2.4134Z-2.1457F0.015
G1 X2.4921Z-2.1063F0.015
M14
M11
G0 X2.4921Z0.1969
M12
N509
#501=6
#503=2.4921
#504=0.1969
M50
IF[#531EQ9] GOTO 510
M10
M11
G0 X2.2559Z0.1969
M12
M13
G1 X2.2559Z-2.1457F0.015
G1 X2.3346Z-2.1063F0.015
M14
M11
G0 X2.3346Z0.1969
M12
N510
#501=7
#503=2.3346
#504=0.1969
M50
IF[#531EQ10] GOTO 511
M10
M11
G0 X2.0984Z0.1969
M12
M13
G1 X2.0984Z-2.1457F0.015
G1 X2.1772Z-2.1063F0.015
M14
M11
G0 X2.1772Z0.1969
M12
N511
#501=8
#503=2.1772
#504=0.1969
M50
IF[#531EQ11] GOTO 512
M10
M11
G0 X1.9409Z0.1969
M12
M13
G1 X1.9409Z-2.1373F0.015
G1 X2.0197Z-2.098F0.015
M14
M11
G0 X2.0197Z0.1969
M12
N512
#501=9
#503=2.0197
#504=0.1969
M50
IF[#531EQ12] GOTO 513
M10
M11
G0 X1.7835Z0.1969
M12
M13
G1 X1.7835Z-2.0971F0.015
G1 X1.8622Z-2.0577F0.015
M14
M11
G0 X1.8622Z0.1969
M12
N513
#501=10
#503=1.8622
#504=0.1969
M50
IF[#531EQ13] GOTO 514
M10
M11
G0 X1.626Z0.1969
M12
M13
G1 X1.626Z-1.9728F0.015
G1 X1.7047Z-1.9335F0.015
M14
M11
G0 X1.7047Z0.1969
M12
M11
G0 X3.5433Z0.1969
M12
M15
N514
M50
IF[#531EQ14] GOTO 515
N515
N40
#500=1
#501=1
#502=2
#503=3.5433
#504=0.1969
#507=10
#508=1
#509=4
#510=0.015
M50
IF[#531EQ15] GOTO 516
M10
M11
G0 X1.7292Z0.0619
M12
M13
G1 X1.6142Z0.F0.015
G1 X1.6142Z-1.9217F0.015
G02 X2.062Z-2.1457I0.2239K0.F0.015
G1 X2.5Z-2.1457F0.015
G1 X2.5Z-2.9547F0.015
G1 X3.1924Z-3.1525F0.015
G1 X3.2435Z-3.1226F0.015
M14
M11
G0 X3.5433Z0.1969
M12
M15
N516
M50
IF[#531EQ16] GOTO 517
N517
N50
#500=1
#501=1
#502=2
#503=3.5433
#504=0.1969
#507=14
#508=1
#509=5
#510=0.01
M50
IF[#531EQ17] GOTO 518
M10
M11
G0 X1.6898Z0.0619
M12
M13
G1 X1.5748Z0. F0.0100
G1 X1.5748Z-1.9217F0.01
G02 X2.062Z-2.1654I0.2436K0.F0.01
G1 X2.4606Z-2.1654F0.01
G1 X2.4606Z-2.9661F0.01
G1 X3.1728Z-3.1696F0.01
G1 X3.2239Z-3.1396F0.01
M14
M11
G0 X3.5433Z0.1969
M12
M15
N518
M50
IF[#531EQ18] GOTO 519
N519
M16
%