ZXTape! VIDEOBASIC>+A(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0:   EDICOES LATINAS " *317997|:7:7:7: Mn=09 :n,0;" ":n Cn=16:n,4;" ":n (>n=35:n,10 ;" ":n 216,23;" ";17,21;" ";18,21;" ";19,20;" ";20,20;" " 3 ? '#+563p?`@###133b~  qw{<?  000000000000000000000000000000000000000000000000000000000000000000000000000100000001111022200000000000000211000000011112222000000000000002222200022222222220000000000000020200000002222222200000000000000000000000000000000000000666666666000000000066000000000006660088888888888888888880666660000000888===============8000000088888888?===============8888888888888888?<<<<<<<<<<<<<<<8888888888888888?;;;;;;;;;;;;;;;8888888888888888?;;;;;;;;;;;;;;;8888888888888888?:::::::::::::::8888888888888888?:::::::::::::::8888888888???888888888888888888:8888888888???8888????88?????::::8888888888???????889999999999:::888888888?88888888888888889999998888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888VIDEOLIST G.   EDICOES LATINAS  f(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0 317997|:0:0:0:0:23658j\,8:236099\,20:20,0;:""318008|:236066\,86V:236077\,123{ 23675{\,88X:23676|\,127:7:7:1::#0;0,0; " PARA O GRAVADOR " (Cn=1502:.01z# =,*60<:n:490:600X F SUMARIO P,:AA=1:690:.6,21 d;K=6:p$="VIDEOHARDWARE: ":0710 n/p$="O computador do futuro ":0710 xp$="":0710 =K=K+1:p$="VIDEOBASIC-A LINGUAGEM: ":0710 /p$="Viajem ao interior ":0710 .p$="do Sistema Operativo ":0710 p$="":0710 =K=K+1:p$="VIDEOBREAK: ":0710 /p$="Ate a proxima ":0710 =K=K+1:p$="VIDEOBASIC-A PROGRAMACAO: ":0710 /p$="Aproveitemo-nos do Sistema ":0710 .p$="Operativo ":0710 90490::AA=2:0690:.6,18 ;K=8:p$="VIDEOTEST: ":0710 /p$="Jogo de adivinhas sobre ":0710 .p$="os temas da licao ":0710 =K=K+1:p$="VIDEO-JOGO: ":0710 /p$="O rei dos negocios ":0710 =K=K+1:p$="VIDEOFIM : ":0710 /p$="E para terminar... ":0710 #0490:1::0630v "REGISTO DO NOME , 612:AA,BB,CC,DD,EE:aa=-2330J @"AA,BB:CC-AA,DD-BB,EE:3106 J60<,65A:-30,-19:8,18:1:9 ,7;"ESCREVE O TEU NOME";10 ,11 ;"NO TECLADO";11 ,9 ;"E PRIME ":n$ Tq9 ,7;" ";10 ,9 ;" ";11 ,8;" " ^K10 ,7;"ESTA BEM ESCRITO ? ";11 ,7;N$;" (S/N)" r="S"400 |c="N"10 ,7;" ";11 ,7;" ":330J  360h NN=1̱N$:N+23296[,N$(N):N:N+23296[,"":23296[,""  0530 38&,64@,38&,79O,-2,38&,79O,38&,100d,-1,38&,100d,44,,112p,-2,44,,112p,72H,114r,-1 72H,114r,94^,118v,-2,94^,118v,134,110n,-1,134,110n,165,116t,-2 165,116t,197,111o,-1,197,111o,222,107k,-2,222,107k,220,90Z,-1 Ž220,90Z,215,70F,-1,215,70F,190,63?,-2,190,63?,160,65A,-2 ̺160,65A,130,60<,-2,130,60<,115s,63?,-2,115s,63?,90Z,59;,-2,90Z,59;,60<,65A,-2 *-2,0,0,0,0 3150:Y$="*PRIME UMA TECLA PARA CONTINUAR *" e#0;1,0;1;5;1;Y$(32 ):.001wn,30:"""": TY$=Y$(2)+Y$(1):.0004uQX,45-:.0006vIQ,557:495  TEXTO :0630v:13 ,13 :22,0:0,30:-22,0:0,-30:11 ,0;" Poe em marcha o gravador " I=116:.04|# =,36$-I:I:150:11 ,0;" ":10 ,0;" estou carregando "''" VIDEOHARDWARE ":7:236066\,0:236077\,60<:0,0;"":"" NLE OS UDG X4:0610b:N=063?:A:"A"+N,A:N: b00,31,16,16,18,16,16,491,0,240,8,8,72H,8,8,204,80P,144,63?,32 ,63?,2,2,2,10 ,9 ,252,4,252,64@,64@,64@,2,4,4,8,8,568,121y,1,64@,64@,64@,64@,64@,64@,192,192,2,2,2,2,2,2,14,62>,64@,64@,124|,12 ,12 ,4,4,0 lHOMENZINHO v&N=302-1:8 t(N/2)=(N/2)17,N;" ";18,N;" ";19,N;" ":.01z# =,30:N:0660 Z17,N;" ";18,N;" ";19,N;" ":.01z# =,40(:N:0660  ENQUADRO 1000:AA,BB;P$:AA=(21-AA)*8-2:BB=BB*8-2:CC=P$*8+4:BB,AA:CC,0:0,12 :-CC,0:0,-12 :BB+1,AA-1:CC,0:0,12 : +BB=11 :P$="VIDEOLIST":0680: ON=1̱P$:K,31-N;P$(N):.002xn,K*N/8:N:K=K+1: a0,0:255,0:0,175:-255,0:0,-174: aVLkY!*PRIME UMA TECLA PARA CONTINUAR *PE para terminar... CAR LIST 8|Gр'#$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >\),0:(23613=\+256*23614>\+1),0 y23658j\,8:236099\,1:9999':0:0:0:0:0:0:317997| >n$="":a=23297[23317[:a=127n$=n$+¾a:a u=5000:z=7000X ""318008|:""16384@ 23:9998':S=0:A=140(:S=S+254-191:0.002xn,A:#1;1;1,0;" PARA O GRAVADOR ":A/502 <A:S>0502 Fg3:S$=" ":0:A=1421:A,0;"";S$:A PJ0,64@:255,0:0,65A:255,0 Ua"":3,3:249,0:0,579:-249,0:0,-579 dٰ"7":M=1:u:AT=15:P=1:L$="COM CERTEZA QUE OS COMPUTADO-RES DO FUTURO TERAO COMPONEN-TES SUPER-CONDUTORES:ESTES AL-CANCARAO TEMPOS DE RESOLUCAOMUITO MENORES DO QUE OSACTUAIS CIRCUITOS INTEGRADOS." ez:6000p ȫ u:AT=15:L$="O TEMPO DE COMUTACAO REPRE-SENTA A CAPACIDADE DE UM COM-PONENTE PARA MUDAR DE ESTADO,QUER DIZER, PARA PASSAR DOVALOR ""1"" AO VALOR ""0""." z 6000p ,AT=15:u:L$="A MAXIMA VELOCIDADE OPERATIVADUM MICROPROCESSADOR ESTA LI-MITADA PRECISAMENTE PELO TEM-PO DE COMUTACAO DOS SEUS MI-LHARES DE COMPONENTES INTERNOS" 6z  6000p U:AT=15:L$="PORTANTO, UM MICROPROCESSADORCONSTRUIDO COM SUPERCONDUTORESSERIA MUITO MAIS RAPIDO, O QUEPERMITIRIA ELIMINAR ALGUMASDAS SUAS ACTUAIS LIMITACOES." z  6000p AT=15:u:l$="O SUPERCONDUTOR E CONSTITUIDOPOR UMA LIGA ESPECIAL,CAPAZ DEPROPORCIONAR MELHORES RESULTA-DOS A UMA TEMPERATURA DE -150C" z N 6000p XAT=15:u:L$="ISTO IMPLICA UMA TECNOLOGIAMUITO CARA PARA MANTER UMATEMPERATURA TAO BAIXA, JA QUESAO NECESSARIAS UMAS INSTALA-COES ESPECIAIS." bz  6000p AT=15:u:L$="TODAVIA, AS OPTIMOS RESUL-TADOS DOS CHIPS COM SUPER-CONDUTORES ESTAO GANHANDO PO-PULARIDADE E A ATENCAO DOS IN-VESTIGADORES." z  6000p *u:L$="OUTRO CAMINHO SEGUIDO PARA AL-CANCAR MAIORES VELOCIDADES EO DAS CPU EM PARALELO. VARIOSMICROPROCESSADORES TRABALHAMSIMULTANEAMENTE EM DIFERENTESPARTES DO MESMO PROGRAMA." 4 AT=15:z:6000p AT=15:u:P=11 :L$="O PROBLEMA DOS COMPUTADORES EMPARALELO E O SOFTWARE. OS RE-SULTADOS DAS INVESTIGACOES QUESE TEM FEITO SAO NOVAS INSTRU-COES E SISTEMAS OPERATIVOS." Z:6000p x0:5000:L$="BEM "+N$+",":7000X:AT=16:L$="QUERES VER DE NOVO ESTA LICAO? (S/N) ":7000X .1:0:="S"P=1:70F 0="N"0:4:0::1500  1450 Z4:8000@::1''''" POE EM MARCHA O GRAVADOR ":40(:4 "" @4:1:A=1520:A,1;S$("3"):A  01;6,A;" ";7,A;" ": zl#1;0,0;" ""5"" PAGINA ANTERIOR   ""8"" PAGINA SEGUINTE" (9999':10 :""6100 l#1;0,0;" ""5"" PAGINA ANTERIOR   ""8"" PAGINA SEGUINTE" I236066\,85U:236077\,123{:10 :""6100  6000p 19998':="8"P=P+1:"":P*100d 8#="5"P=P-(P>M):"":P*100d  6000p btA=1̱L$:AT+((A-1)/30),1+(((A-1)/30)-((A-1)/30))*30;L$(A) l&0.002xn*(l$(a)" "),1:A: @( A=110 :0.05|L,A:A: !K"29","28","11","-62","-11","34","-6","-60","6","23","11","-46","-11","25" !Y8605!:223,129:A=17:L$:0,l$:l$:l$,0:A #'>9999':1,18;1;"drive printer": '/236066\,86V:236077\,123{: '-236066\,0:236077\,60<: NbuzXsS mpLO TEMPO DE COMUTACAO REPRE-SENTA A CAPACIDADE DE UM COM-PONENTE PARA MUDAR DE ESTADO,QUER DIZER, PARA PASSAR DOVALOR "1" AO VALOR "0".CAR HARD 8|eJ$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >x~<w|<<><1/   BD@BwTBB@B#O@@@BB|BU|B<@ϟ>|ϟGBB@B B~@ϟ>|ϟ>$D@B?BBBB?ϟ>|ϟ>>x~<??|B<><?xϟ>|ϟ>>|ϟ>|ϟ>|ϟ>|ϟ>|ϟ>|Ͽ##>|ϟ>|GG>|ϟ>|?>|ϟ>|`??`ϟ>|     \\XXxxxxxxxX \\XXxzy|{zzX \\XXxxxxxxzX __XXx|z{yzzX __XXxxxxxxxX XX_XXXXXXXXX 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888dLINGUAGEM1Z_  EDICOES LATINAS  Zf(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0 _"31969":z=ç:u=::"23609","20":"23658","8":"""31970":""f$():"23606",z:"23607","124":ڰ"7":z::ڰ"8":u;"10",z;" PARA O GRAVADOR ":I=Z̰"10":װ".01","I*5":I dF"23675","66":"23676","124":ٰ"9":CEN=Z:OP=U:"100":a="127" i"23296"=a"160" n:"10","5";"ESCREVE O TEU NOME NO TECLADO E PRIME ":n$::"10","4";"ESTA BEM ESCRITO ? (S/N)";"6","15-N$/2";U;" ";N$;" " ="N""110" "S"130 .i=u̱n$+u+u:23295Z+i,(a+n$+a)(i):i .n$="":i="23297"̰"1e6":ian$=n$+¾i:i ^ٰ"9":b$=" ":U="1":Z=U-U:RR="8150":TX="8330":IN="8400" 1I=Ṵ"8":32031}+i,"((LP8(("(I)-"40":i Dlm=u:A$=" O SISTEMA OPERATIVO":"8410":RC=U:ڰ"8":"8300":rr kIN:U,U;U;" Acesso ao Sistema Operativo "::t$=" ":xl="94":yl="30":i=zu+u:"9000":i 2"9","14";"$";"16","14";"$";"18","8";">" n"66","27":"-20",z:z,"115":"21",z:"115","102":z,"23":"115","46":z,"23":rr:in:"8300":rr v"935","945 PROGRAMA","955","","9:3INTERPRETE","9;3","9<3 B A S I C","","9A1","9A1 SISTEMA","9B1","9C1 OPERATIVO","" ;:i=ṵ"20":i,u;i=u;ڰ"7355555222222222222222"(i),,:i T"2050":a="4":n="247":i=ṵ"3":j,b:a,j:u;n,z:u;z,b:u;-n,z:u;z,-b:i 4&"156","15","108","39","4","95" Mܰ"8":"3000":i=ṵ"6":j=ṵ"20":j,u;j="2"j="3"j="8"j="9";b$:j Zt$:u,u;:lm="16-t$/2":tx:lm="3":t$:"5",u;:tx:lm=u:t$:"12",u;:tx:rr:i "ASSIGNACAO DE CANAL (1601)","N canal (0,1,2,3) --> A","Abre o canal ao qual sao en-viados para a saida todos osdados. E bastante parecido a em BASIC." "OUTPUT DE 1 CARACTER (10)"," Codigo caracter ---> A","Envia o caracter presente noregisto ao canal activonesse momento." "IMPRESSAO MULTIPLA(203C)","Ind. caracteres ---> DE Quantos caract. ---> BC","Imprime o numero de caracte-res contidos em ,localiza-dos a partir da direccao con-tida em ." d"APAGA LINHAS (OE44)","Linhas a apagar ---> B","Apaga linhas do ecran par-tindo de baixo." y"PLOT (22E5)"," X -->reg. B Y--> reg. C","E identica a em BASIC.Oponto situar-se-a nas coorde-nadas B e C." " DRAW (24BA)","X ------> B Y ------> C dir. X--> D dir. Y--> E","Traca uma linha a uma distan-cia B,C desde a actual posi-cao do plot. A direccao e dadapor <1>:positiva; <255>:nega-tiva." IN:T$="...e aqui como se realiza oprocesso...":"10",z;:tx:rr:in:i=ṵ"20":i,u;ڰ"33315555355555122222"(i)," ":i y"4",U;" - M E M O R I A R A M - ";"9",U;" RAMTOP . . . . . . . . . . ";"15",U;" - M E M O R I A R O M -" ;"5020":i="6"̰"20":t$:i,u;t$:"100"Ű"i=8i=14":i X"30000 06 65 LD A,65","30002 D7 RST 16","30004 201 RET" A"","","10 LET X=.....","20 RANDOMIZE USR 30000","30 FOR A=...." "","","0032 ..............","0024 ROTINA DE FECHO","0016 ROTINA DE IMPRESSAO","0008 ROTINA DE ERROR","0000 ROTINA DE INICIALIZACAO" Ăer="157":a=u+u:j="16"̰"22"Ͱ"6":"123"-j/a,er+j/a*".7":j,z:a,-a:z,-j*.73333:-a,-a:-j,z:-a,a:z,j*.73333:a,a:j "5070":rr:"7950":"7950" "11",u,"18","12",u,n Ba,n;u;" ":u,u:"50":"6",u;u;" ":u,u:"100":rr T "7950":"7950":"7","21";u;" ";"18",u," ":rr:"7950" C"6","7","14","7",j,n,"18",j,"30","8",j,"14","13",u,"18" Ai=ṵ"15":u+u,i;"A":װ".1",i:u+u,i;i="15";iɰ"15";"A":i  rr:"7950":"7950" RR:IN:"8070":"1000" l"50":ڰ"8":u:i=z̰"21":i,z,,:i:a,j,n:i=jn:a,i;u;" ":װ".1","*30":"6":a,i;u;" ":i: @2Z:A$=" POE EM MARCHA O GRAVADOR ":"7":ڰ"7": JN=Z̰"29":װ".05","2*N" T2ٰ"4";"8",N;" @";"9",N;" ~|";"10",N;" \]" ^0N>"2"N<"29"1;"8",N;A$(N-2) hN r5"8","30";" ";"9","30";" ";"10","30";" " | ٰ"7":"" +"7",U;:T$=" ESCOLHE, "+n$+":":"8330" |"11","6";"F FIM";"13","6";"I VOLTA AO PRINCIPIO";"15","6";"C PASSAR A PARTE";"16","6";" SEGUINTE" t$=:t$="F"  t$="I" t$="C""8000"  "8090" 't$=" PRIME UMA TECLA PARA CONTINUAR " /#Z;ڰ"6";U+U;U;U,Z;t$:.001wn,30 Ot$=t$(2)+t$(U):.0004uQX,45-:.0006vIQ,557:"""":  8160 lUA=Z:J=rc̰"9999":F$(J,"30")"%"F$(J,"30")"#"A=A+U+("2"F$(J,"30")="&"):J mVC"10-a/2",U; n T$=F$(rc) v1"8330":T$="30"T$(30)="#"rc=rc+u: {'F$(rc,30)="%"rc=rc+u:"8300" rc=rc+u:"8302" ڰ"8":U;lm;:c=lm-u:N=U̱t$ (T$(N)="%"8150:"8400":vc=u: T$(N)="#"P="8": +T$(N);:OPT$(N)" ".001wn,40( +OPT$(N)=".".1}L,30:20 $c=c+u:c=30c=lm-u:U;lm; N: ta=4:XL=248:YL=169:2::U+U,U;:3,3:a;XL,Z:a;Z,YL:a;-XL,Z:a;Z,-YL: ڌVC=Z:"8400":"3","15-A$/2";A$:YL="11":XL="8*A$+16":"126-XL/2","142":XL,Z:Z,YL:-XL,Z:Z,-YL:U,-U:XL,Z:Z,YL:"13",U;: #(`a$:a$x="A$(u)-48":y="A$(u+u)-48":b=A$("3"):t$()=a$(4):y,x;B;t$:"9000" #<xl #F;x="x*8-3":y="165-y*8":x,y:xl,z:z,yl:-xl,z:z,-yl: zuI>TEMOS VISTO ANTERIORMENTE, CO-MO O SISTEMA OPERATIVO DO (E DA MAIORIA DEDOS COMPUTADORES DOMESTICOS)ESTA CONSTITUIDO POR UM GRANDENUMERO DE ROTINAS EM C/M IN-DISPENSAVEIS PARA UMA UTILIZA-CAO PRATICA DO COMPUTADOR.%%NORMALMENTE E O INTERPRETEBASIC QUEM UTILIZA ESTAS RO-TINAS; DE TODOS MODOS NADA IM-PIDE AO PROGRAMADOR SUBSTITU-IR O INTERPRETE PARA COMUNICARDIRECTAMENTE COM O SISTEMAOPERATIVO.% %DO MESMO MODO QUE NO BASICCOM , E POSSIVEL CHAMARUMA ROTINA DO SISTEMA OPE-RATIVO UTILIZANDO A FUNCAO, OU NUM PROGRAMA EM C/MCOM UM OU. CUIDADOCOM ESTE ULTIMO, JA QUE TEMUM NUMERO LIMITADO DE DIREC-COES MUITO IMPORTANTES.% % ASSIM OU PRO-DUZEM EXACTAMENTE O MESMO E-FEITO, CHAMANDO A ROTINAQUE SE ENCONTRA NA DIREC-CAO DE MEMORIA <16>, JA QUESE TERMINAR COM UM , DE-VOLTARA O CONTROLO AO PROGRAMAPRINCIPAL.# #OS PARAMETROS EVENTUAIS PODEMPASSAR-SE A ROTINAS DEFORMAS DIFERENTES: UTILIZANDOOS REGISTOS DO , O, ESCREVENDO-LOS A CON-TINUACAO DE , OU NUMAPOSICAO DE MEMORIA PREDEFINI-DA. EM QUASE TODOS OS CASOS EINDISPENSAVEL UM PROGRAMA CUR-TO EM C/M PARA A GESTAO DOINTERCAMBIO DE DADOS.% % POR TANTO ANTES DA CHAMADATERAS QUE PREOCUPARTE DE SA-BER QUE PARAMETROS SE NECESSI-TAO, E COMO PASSA-LOS. PARA ASFUNCOES DE USO MAIS COMUM QUEVEREMOS JUNTOS,ENTAO EU DOU-TEESTAS INDICACOES; PARA MAISOUTRAS PRESTACOES PODES CON-SULTAR ALGUM LIVRO SOBRE A DO SPECTRUM, OU SOBRE OUSO DO CODIGO MAQUINA. AQUI A CONTINUACAO ALGUNASROTINAS QUE PODERAS UTILIZARDIRECTAMENTE. A DIRECCAO DA--SE ENTRE PARANTESIS EM HEXA-DECIMAL.# # eaNB  A O SISTEMA OPERATIVO 'l c TNORMALMENTE E O INTERPRETECAR LING 1 |؀"$$$~$$~$$$~$$~$$(bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >TEMOS VISTO ANTERIORMENTE, CO-MO O SISTEMA OPERATIVO DO (E DA MAIORIA DEDOS COMPUTADORES DOMESTICOS)ESTA CONSTITUIDO POR UM GRANDENUMERO DE ROTINAS EM C/M IN-DISPENSAVEIS PARA UMA UTILIZA-CAO PRATICA DO COMPUTADOR.%%NORMALMENTE E O INTERPRETEBASIC QUEM UTILIZA ESTAS RO-TINAS; DE QUALQUER MODO NADAIMPEDE QUE O PROGRAMADOR SUBS-TITUA O INTERPRETE DE COMUNI-CAR DIRECTAMENTE COM O SISTEMAOPERATIVO.% %DO MESMO MODO QUE NO BASICCOM , E POSSIVEL CHAMARUMA ROTINA DO SISTEMA OPE-RATIVO UTILIZANDO A FUNCAO, OU NUM PROGRAMA EM C/MCOM UM OU. CUIDADOCOM ESTE ULTIMO, JA QUE TEMUM NUMERO LIMITADO DE DIREC-COES MUITO IMPORTANTES.% % ASSIM OU PRO-DUZEM EXACTAMENTE O MESMO E-FEITO, CHAMANDO A ROTINAQUE SE ENCONTRA NA DIREC-CAO DE MEMORIA <16>, JA QUESE TERMINAR COM UM , DE-VOLVERA O CONTROLO AO PROGRAMAPRINCIPAL.# #OS PARAMETROS EVENTUAIS PODEMPASSAR-SE A ROTINAS DEFORMAS DIFERENTES: UTILIZANDOOS REGISTOS DO , O, ESCREVENDO-OS NA CON-TINUACAO DE , OU NUMAPOSICAO DE MEMORIA PREDEFINI-DA. EM QUASE TODOS OS CASOS EINDISPENSAVEL UM PROGRAMA CUR-TO EM C/M PARA A GESTAO DOINTERCAMBIO DE DADOS.% % PORTANTO, ANTES DA CHAMADA,TERAS QUE TE PREOCUPAR EM SA-BER OS PARAMETROS SE NECESSA-RIOS E COMO PASSAR. PARA ASFUNCOES DE USO MAIS COMUM QUEVEREMOS JUNTOS,ENTAO EU DOU-TEESTAS INDICACOES; PARA OU-TROS USOS, PODES CON-SULTAR ALGUM LIVRO SOBRE A DO SPECTRUM, OU SOBRE AUTILIZACAO DO CODIGO MAQUINA. VERAS A SEGUIR ALGUMASROTINAS QUE PODERAS UTILIZARDIRECTAMENTE. A DIRECCAO DA--SE ENTRE PARANTESIS EM HEXA-DECIMAL.# #LINGUAGEM2%Z '  EDICOES LATINAS  Zf(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0 _"31969":z=ç:u=::"23609","20":"23658","8":"""31970":"23606",z:"23607","124":ڰ"7":z::ڰ"8":u;"10",z;" PARA O GRAVADOR ":I=Z̰"10":װ".01","I*5":I dF"23675","66":"23676","124":ٰ"9":CEN=Z:OP=U:"100":a="127" i"23296"=a"160" n:"10","3";"ESCREVE O TEU NOME NO TECLADO E PRIME":n$::"10","4";"ESTA BEM ESCRITO ? (S/N)";"6","15-N$/2";U;" ";N$;" " ="N""110" "S"130 .i=u̱n$+u+u:23295Z+i,(a+n$+a)(i):i .n$="":i="23297"̰"1e6":ian$=n$+¾i:i ^ٰ"9":b$=" ":U="1":Z=U-U:RR="8150":TX="8330":IN="8400" 'lm=u:A$=" ALGUNS TRUQUES !":"8410" KT$="E AQUI ALGUNS TRUQUES SECRETOSQUE NAO SE EXPLICAM NO MANUAL!":TX:RR ;:i=ṵ"20":i,u;i=u;ڰ"7355555222222222222222"(i),,:i M:a="4":n="247":i=ṵ"3":j,b:a,j:u;n,z:u;z,b:u;-n,z:u;z,-b:i 4&"156","15","108","39","4","95" Mܰ"8":"3000":i=ṵ"7":j=ṵ"20":j,u;j="2"j="3"j="8"j="9";b$:j Qt$:u,u;:lm="16-t$/2":tx:lm=u:t$:"5",u;:tx:t$:"12",u;:tx:rr:i "LINHAS INVISIVEIS","A linha nao aparece com ainda que permaneca operativa.","- Chama com a linha;- Colora-a (ex.Modo estendido+4);- Prime 1 vez;- prime <> em modo grafico eprime ." "BLOQUEIO","Realizando um (Capsshift+Space) bloqueia o Spec-trum.","- Executa .Deste modo acabas com a visua-lizacao das informacoes doprograma." H"C/M DENTRO DO PROGRAMA BASIC","Um breve programa em C/M comoparte integrante do BASIC","-Prepara como primeira instru-cao uma linha REM formada portantos pontos como os bytesnecessarios ao C/M. -Mediante POKE, substituem-seos pontos pelos codigos: A direccao inicial e dada por:PEEK23635+256*PEEK23636+5." "BLOQUEIO AUTOSTART","Evita o arranque automaticode programas gravados median-te LINE.","(O metodo so e valido carre-gando o programa): Usa-se MERGE... em vez de LOAD..." -"INICIO TOTAL","Ha varias formas de limpara memoria ao Spectrum. ",", afecta unicamente o BA-SIC restando a area de memoriaRAMTOP ( Codigo Maquina e UserDefined Graphics). Podes usar entao PRINT USR 0,direccao em que reside a roti-na de inicializacao geral." "CODIGOS INKEY$","Mais alguns codigos que naovem indicados no manual","CAP.SHIFT+...2 = cod. <6>3 = cod. <4>9 = cod. <15>. Podes por exemplo usa-los com LET B=INKEY$" "DESLOCAMENTOS DE LINHAS","Uma linha pode sercopiada ou deslocada.","Para modificar o numero de umalinha, chama-a com ,produzindo outra nova e iden-tica.Apagando depois a antiga,obteremos o resultado da novalinha." IN:"8070":"1000" @2Z:A$=" POE O GRAVADOR EM MARCHA ":"7":ڰ"7": JN=Z̰"29":װ".05","2*N" T2ٰ"4";"8",N;" @";"9",N;" ~|";"10",N;" \]" ^0N>"2"N<"29"1;"8",N;A$(N-2) hN rG8,30;" ";9 ,30;" ";10 ,30;" " | 7:"" *"7",U;:T$="ESCOLHE, "+n$+":":"8330" }"11","6";"F FIM";"13","6";"I VOLTA AO PRINCIPIO";"15","6";"C PASSO P/A PARTE";"16","6";" SEGUINTE" t$=:t$="F"  t$="I" t$="C""8000"  "8090" 't$=" PRIME UMA TECLA PARA CONTINUAR " /#Z;ڰ"6";U+U;U;U,Z;t$:.001wn,30 Ot$=t$(2)+t$(U):.0004uQX,45-:.0006vIQ,557:"""":  8160 ldA=Z:J=rc9999':F$(J,30)"%"F$(J,30)"#"A=A+U+(2F$(J,30)="&"):J mVC"10-a/2",U; n T$=F$(rc) v1"8330":T$="30"T$(30)="#"rc=rc+u: {'F$(rc,30)="%"rc=rc+u:"8300" rc=rc+u:"8302" ڰ"8":U;lm;:c=lm-u:N=U̱t$ T$(N)=""c=29:"8385" T$(N)="`"N$: T$(N)="&"'U''" ";: T$(N)="#"P="8": +T$(N);:OPT$(N)" ".001wn,40( +OPT$(N)=".".1}L,30:20 $c=c+u:c=30c=lm-u:U;lm; N: ta=4:XL=248:YL=169:2::U+U,U;:3,3:a;XL,Z:a;Z,YL:a;-XL,Z:a;Z,-YL: ڌVC=Z:"8400":"3","15-A$/2";A$:YL="11":XL="8*A$+16":"126-XL/2","142":XL,Z:Z,YL:-XL,Z:Z,-YL:U,-U:XL,Z:Z,YL:"13",U;: zu ea  c9  b_NB A ALGUNS TRUQUES !T- Chama com a linha;- Colora-a (ex.Modo estendido+4);- Prime 1 vez;- prime <> em modo grafico eprime .dCAR LING 2 |ŀ#$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >