10000 ! ********************************
10010 ! *                              *
10020 ! *      E X T B A S I C         *
10030 ! *                              *
10040 ! ********************************
10050 ! 
10060 ! L{nkningsprpgram f|r utvidgad BASIC, NANCO Elektronik, 821110.
10065 ! Inknappad enligt sid 152 i Bit f|r Bit.
10070 ! 
10075 INTEGER : NO EXTEND 
10080 ! H|jer botten p} BASIC-minnet
10090 POKE 65292,0,129
10100 POKE 65328,0,129
10110 ! 
10120 ! De nya funktionerna/instruktionerna
10130 POKE 32768,0,0,208,2,36,128,40,128,56,128
10140 POKE 32778,0,0,208,1,20,128,22,128,31,128
10150 POKE 32788,89,128,128,71,69,84,73,84,69,77
10160 POKE 32798,255,128,2,2,33,255,65,128,67,128
10170 POKE 32808,128,80,82,79,67,69,68,85,82,69
10180 POKE 32818,129,87,65,73,84,255,60,128,60,128
10190 POKE 32828,6,1,195,29,0,231,201,231,175,50
10200 POKE 32838,245,255,58,244,255,79,124,181,200,58
10210 POKE 32848,244,255,185,40,247,79,43,24,243,225
10220 POKE 32858,221,33,0,0,221,57,213,235,205,154
10230 POKE 32868,128,33,3,0,175,237,66,48,37,205
10240 POKE 32878,161,128,126,35,102,111,175,237,82,56
10250 POKE 32888,25,205,161,128,35,35,27,123,178,78
10260 POKE 32898,6,0,35,40,3,9,24,244,205,175
10270 POKE 32908,128,205,168,128,24,6,1,0,0,205
10280 POKE 32918,168,128,209,239,221,78,4,221,70,5
10290 POKE 32928,201,221,110,2,221,102,3,201,221,113
10300 POKE 32938,4,221,112,5,201,221,117,2,221,116
10310 POKE 32948,3,201
10320 ! 
10330 ! Inl{nkning av de nya instruktionerna
10340 POKE 32768,PEEK(65405),PEEK(65406)
10350 POKE 65405,0,128
10360 ! 
10370 ! Inl{nkning av den nya funktionen
10380 POKE 32778,PEEK(65407),PEEK(65408)
10390 POKE 65407,10,128
10400 CHAIN 'NUL:'