10 print chr$(14) 20 print"please wait...":print 30 d=3328:s=184:c=0:l=1000:m=0 40 for i=0 to s-1:for k=0 to 7 50 read v:poke d+i+k,v:c=c+v:next k 60 read v:if c<>v then print"data checksum error on line";l:end 70 c=0:l=l+1:i=i+7:nexti 80 print"on your pc, please run":print 90 print"xlink server -M c128 xlink.prg" 100 print"xlink load -M c128 -f xlink.prg":print 110 print"then save the server:":print 120 print"dsave"chr$(34)"xlink"chr$(34)""chr$(145) 130 sys 3328 140 end 1000 data 76,58,13,173,13,221,41,16,611 1001 data 240,249,174,1,221,173,0,221,1279 1002 data 73,4,141,0,221,96,141,1,677 1003 data 221,173,0,221,73,4,141,0,833 1004 data 221,173,13,221,41,16,240,249,1174 1005 data 96,173,0,221,73,4,141,0,708 1006 data 221,96,173,13,221,41,16,240,1021 1007 data 249,96,169,0,141,3,221,173,1052 1008 data 2,221,9,4,141,2,221,173,773 1009 data 13,221,120,32,50,13,172,1,622 1010 data 221,32,41,13,192,1,208,243,951 1011 data 32,95,13,88,76,166,90,169,729 1012 data 11,141,17,208,32,150,13,160,732 1013 data 0,32,50,13,173,1,221,145,635 1014 data 193,32,41,13,230,193,208,2,912 1015 data 230,194,165,194,197,254,208,233,1675 1016 data 165,193,197,253,208,227,165,253,1661 1017 data 141,16,18,165,254,141,17,18,770 1018 data 169,27,141,17,208,96,32,3,693 1019 data 13,134,251,32,3,13,134,252,832 1020 data 32,3,13,134,193,32,3,13,423 1021 data 134,194,32,3,13,134,253,32,795 1022 data 3,13,134,254,96,0,0,0,500