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?`@###133~  qw{>?  000000000000000000000000000000000000000000000000000000000000000000000000000100000001111022200000000000000211000000011112222000000000000002222200022222222220000000000000020200000002222222200000000000000000000000000000000000000666666666000000000066000000000006660088888888888888888880666660000000888===============8000000088888888?===============8888888888888888?<<<<<<<<<<<<<<<8888888888888888?;;;;;;;;;;;;;;;8888888888888888?;;;;;;;;;;;;;;;8888888888888888?:::::::::::::::8888888888888888?:::::::::::::::8888888888???888888888888888888:8888888888???8888????88?????::::8888888888???????889999999999:::888888888?88888888888888889999998888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888-VIDEOLIST b *  EDICOES LATINAS * f(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0 7:7: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=4:p$="VIDEOHARDWARE: ":0710 n/p$="A Placa Grafica ":0710 x.p$="e o Lapis Optico ":0710 =K=K+2:p$="VIDEOBASIC-A LINGUAGEM: ":0710 /p$="PLOT - DRAW ":0710 .p$="CIRCLE - POINT ":0710 =K=K+2:p$="VIDEOBREAK: ":0710 /p$="Qix ":0710 =K=K+2:p$="VIDEOBASIC-A PROGRAMACAO: ":0710 /p$="Tracamos um Grafico ":0710 90490::AA=2:0690:.6,18 :K=6:p$="VIDEOTEST: ":0710 .p$="Jogo de adivinhas sobre ":0710 ,p$="os temas da licao ":0710 <K=K+2:p$="VIDEO-JOGO: ":0710 .p$="O Serpintao ":0710 <K=K+2:p$="VIDEONEXT: ":0710 .p$="No proximo numero... ":0710 #0490:1::0630v "REGISTRO DEL NOMBRE , 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 ,9 ;"NO TECLADO";11 ,8;"E PRIME ":n$ Tn9 ,7;" ";10 ,9 ;" ";11 ,9 ;" " ^L10 ,5;" ESTA BEM ESCRITO, ";11 ,7;N$;" ? (S/N)" r="S"400 |e="N"10 ,5;" ";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 ROTULO ROTATORIO 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 o gravador em marcha " I=116:.04|# =,36$-I:I:150:11 ,0;" ":10 ,0;" estou a carregar "''" VIDEOHARDWARE ":7:236066\,0:236077\,60<:0,0;"":"" NLEE LOS 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 lHOMBRECILLO 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  RECUADRO 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: ROTULOS ENTRANTES 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: va<skPNo proximo numero... ?Y!ME UMA TECLA PARA CONTINUAR **PRICAR LIST 8|b_6#$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >"  0 S5:X=05.5:140+X,60<-X:40(,70F:X 8:1 ڙY=014:7;5,,;#1;1,0;"Y=";Y,"X=";0:.03{u\,Y:Y,0;0;5,,:Y:1,30 #1;0,0;" COORDENADA ENCONTRADA":1,-20:#1;0,0;"PROCURA A COORDENADA "  Y=14 X=018:Y,X;7;5;" ";#1;1,18;X:.03{u\,X:Y,X;0;5;" ":X:1,30 5#1;0,0;" COORDENADAS DO PONTO :"  1:100d &0:7:7:0:  0:  2OP=0:7:0:7::0 MW$="NESTA LICAO FALAREMOS DA PLACAGRAFICA E DO LAPIS OPTICO.":9500% sW$="TRATA-SE DE DOIS DISPOSITIVOS DEENTRADA DE INFORMACOES QUE NAOSE PODEM ENVIAR DESDE O TECLADO.":9500% W$="IMAGINA QUE TENS A NECESSIDADEDE CALCULAR A AREA DE UMA FIGURAMUITO COMPLEXA. O PROBLEMA PRIN-CIPAL CONSISTIRA EM INDICAR OCONTORNO DA FIGURA.":9500% PW$="ESTA SERA A MELHOR SOLUCAO:O LA-PIS OPTICO E A PLACA GRAFICA.":9500%  20:300,:200 $W$="A PLACA E CONSTITUIDA PORUMA BASE SENSIVEL E UMA CANETA.A POSICAO DA CANETA SOBRE A BASEE LIDA E TRANSFORMADA POR DOISCONVERSORES (HORIZONTAL E VER-TICAL) NAS COORDENADAS DO PONTO,E ENVIADA AO SPECTRUM.":9500% . 600X 8pW$="O PROGRAMA SO TEM QUE LER OS VA-LORES E E IMPRIMIR NOECRAN O PONTO CORRESPONDENTE.":9500% BSQ$="PRIME R REPETIR C CONTINUAR ":9005-# L+23560\="R"9200#:1050 V9200#:W$="TAMBEM EXISTE UMA OUTRA PLACAQUE PARA DETECTAR AS COORDENA-DAS DUM PONTO EMPREGA DOIS PO-TENCIOMETROS EM VEZ DA BASE.":9500% `JW$="O LAPIS OPTICO FUNCIONA E USA--SE DE DIFERENTE FORMA.":9500% jW$="E SUFICIENTE O APOIO SOBRE OECRAN, PARA QUE A CANETA SEJACAPAZ DE SABER SE O PONTO ESTAAPAGADO OU ACESO.":9500% tW$="O PROGRAMA FAZ AVANCAR UMASLINHAS LUMINOSAS SOBRE O ECRAN,EMITINDO UM SINAL QUANDO A CANE-TA AS INTRECEPTA, PODENDO LOCA-LIZAR-SE ASSIM TODOS OS PONTOSDO ECRAN.":9500% yBW$="NO EXEMPLO, A BARRA AZUL REPRE-SENTA A CANETA.":9500% ~ 700 SQ$="PRIME R REPETIR C CONTINUAR ":9005-# 23560\="R"1150~ bW$="NATURALMENTE, ESTE TRABALHO REA-LIZA-SE MAIS RAPIDAMENTE E EMALTA RESOLUCAO.":9500% W$="A CANETA LOCALIZA A SUA POSICAONO ECRAN, GRACAS A UM FOTOTRAN-SISTOR SITUADO NO SEU EXTREMO.QUANDO ESTE E GOLPEADO PELA LUZ,GERA UMA CORRENTE QUE O SPECTRUME CAPAZ DE INTERCEPTAR.":9500% }W$="TANTO A PLACA GRAFICA COMOO LAPIS OPTICO, NECESSITAM DESUPORTE SOFTWARE PARA PODEREMFUNCIONAR.":9500% wW$=" PRIME R REPETIR C CONTINUAR ":9500% 24,11 ;4;1;1;" " 26,11 ;2;1;1;" " ="R"1 ="C"2000  "1460" =7::X=07:X+2,0;X;X,,:X QX=29 :X,3;8;9 ;" POE EM MARCHA O GRAVADOR ":X /15,0;:7:7:7 200:31969|:"" #('q$=" PRIME UMA TECLA PARA CONTINUAR " #- u=0 #2l=23624H\ #< 1:"" #F#0;1,0;q$ #K.01z# =,u/20 #Pq$=q$(2)+q$(1) #U.01z# =,u/10 #W u=u+1 #Z=""9030F# #d23624H\,l #n.01z# =,1:"" #x # 0 #gx=11 21:x,0;1;2,,:x:x=11 21:x,0;7,,:x $" $Twx=10 0-1:x,0;1;2,,:x:x=10 0-1:x,0;7,,:x $^`0,172:4;255,0:255,91[:4;-255,0 $h %O=0:P=0 %! 9300T$ %&ST=5-(W$/64@) %+(OP=1ST,0;W$:9595{% %0O=O+ST %NJ=1̱W$ %X W$(J)" ".004yn,30 %b O,P;W$(J) %l1P=P+1:P=32 P=0:O=O+1 %qW$(J)=".".1}L,30 %vJ %{ 9000(# % %x(23613=\+256*23614>\),0:(23613=\+256*23614>\+1),0:32135}:"" % OP=0 %.236077\,124|:236066\,136 %M23676|\,127:23675{\,88X:23658j\,8:0: %3W$=" PARA O GRAVADOR":9500%:1 op T$kjN%ulWjTANTO A PLACA GRAFICA COMOO LAPIS OPTICO, NECESSITAM DESUPORTE SOFTWARE PARA PODEREMFUNCIONAR.Q INUAR PRIME UMA TECLA PARA CONTCAR HARD x}z+{$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >@@| GRAFICOS 1g 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 dCEN=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":U="1":Z=ç:rc=u::RR="8150":TX="8330":IN="8400" 6o="8":T1="7950":A$=" GRAFICOS":"8410":"8300" urr:IN:T$="PARA OS GRAFICOS UTILIZAMOSA PARTE SUPERIOR DO ECRANQUE E FORMADA POR 45056PONTOS.":T1 CI=1̰"100":.005y# =,*30:"*240+8","*90+70":I 4RR:IN:T$="O DIRECCIONAMENTO REALIZA-SEATRAVES DE DUAS COORDENADAS:A PRIMEIRA PODE IR DESDE<0> A <255>, E REPRESENTA AHORIZONTAL.":T1 fRI=o̰"240"o:I,"80":o,z:Z,"4":I:"12",u;" 50 100 150 200 255" [rr:t$="...A SEGUNDA PODE VARIARDESDE <0> A <175>, E REPRESEN-TA A VERTICAL.":T1 Ni="80"̰"160"o:o+o,i:z,o:"4",z:i:i=ṵ"11":i,u;"175 80 0"(i):i ħRR:T$="A COMBINACAO DESTES DOISVALORES ESTABLECE A POSICAODE CADA PONTO (PIXEL), GESTIO-NAVEL MEDIANTE A INSTRUCAO, A USAR NA FORMA:PLOT X,Y":T1 (/"2600":i=ṵ"4":t$:u;u,"10";"PLOT ";t$ P+a,b:j="86"bͰ"3":a,j:װ".01","28":j Z)j="24"aͰ"3":j,b:װ".01",18:j na,b,"4":rr x*j=ṵ"10":j,"3",;" ":j i Ta"25,175","28","160","255,15","240","92","100,80",84T,120x,"180,150","152","146" IN:"8070":I"900" -z:k=zu:"4","67+k":ڰ"4";"246",z:k Hk="14"̰"20":k,U;ڰ"6"," ":k:"15",U;:TX:Z: d"5","29";U;"X";U,"17";"Y":"7",u;"-120";"7","28";"120";u,"14";"80";"12","13";"-80" Bj=o̰"246"Ͱ"4":j,"120":j:j="72"̰"166"Ͱ"4":"129",j:j ذ"129","120","4" " @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:"" /I=Z:"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" Z$=:Z$="F" Z$="I"I=U: Z$="C""8000"  "8090" 1502: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) v&"8330":T$(30)="#"rc=rc+u: {'F$(rc,30)="%"rc=rc+u:"8300" rc=rc+u:"8302" ڰ"8":U:U;:c=Z:N=U̱t$ (T$(N)="%"8150:"8400":vc=u: T$(N)="&"'U''" ";: T$(N)="#"P="8": T$(N);:T$(N)=" "8380 .003xD,27 *OPT$(N)=".".1}L,30:9 "c=c+u:c=30c=Z:U;" "; 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;: &8s="u"+256*("u"+1):s+1,1 &x=s+2818 &a=s+99c & 9914&:21,0; &.("u"+256*("u"+1)+101e) &x:x &+a="u"+256*("u"+1)+2 &9914&:9905& &z$ &"""";z$;"""" & 9905& &a+1,(x/256) &a,x-256*(x/256) & &261479':*"m";1;"toolcode"61480( '<"program to load: ";i$:"mC or tape (M/c) ";w$:w$="t"i$ 'w$"t"*"m";1;i$ '  '61480( zu1OS GRAFICOS CONSTITUEM POISUMA DAS APLICACOESMAIS INTERESSANTES E ESPECTA-CULARES DOS COMPUTADORES.% %OS GRAFICOS ESTABLECEM UMACOMUNICACAO DIRECTA ENTREHOMEM E MAQUINA. INFORMACOESCODIFICADAS POR MEIODE NUMEROS E LETRAS, FICAMPOR VEZES POUCO COMPREENSIVEISE ENTAO, A REPRESENTACAOGRAFICA, FACILITA COMUNICARCONCEITOS (AINDA QUE COM LIMI-TES DEVIDO A UMA ESQUE-MATIZACAO) DE UMA MANEIRA IME-DIATA E FACILMENTE INTERPRE-TAVEL ATE POR PESSOAS CA-RENTES DE UMA PREPARACAO ES-PECIFICA.% %AS APLICACOES DESTE TIPOTOCAM CAMPOS DIVERSOS CO-MO: PROJECTOS MECANICOS E AR-QUITECTONICOS, A OBSERVACAOASTRONOMICA, A SIMULACAO DEANALISES MEDICAS, ETC. TAMBEM PARA OS MICROCOMPUTA-DORES COMECARAM A APARECERSUPORTES DE SOFTWARE, QUE PRO-DUZEM AS VEZES RESULTADOS ES-PECTACULARES COM A COR EAS IMAGENS TRIDIMENSIO-NAIS.% %A UNIDADE DE MEDIDA GRAFICA EO , QUE REPRESENTA OMENOR ELEMENTO GESTIONAVEL PE-LO COMPUTADOR.NO ECRAN ESTACONSTITUIDO PELO PONTO LUMI-NOSO QUE E A BASE DE QUAL-QUER REPRESENTACAO VISUAL. O GRAFICO E DE QUANDO EMPREGA OS CARAC-TERES SEMIGRAFICOS SITUADOSSOBRE A FILA DE NUMEROS; E DE, SE ACTUADIRECTAMENTE SOBRE O PONTOLUMINOSO.# # [t$ea  o'l c NA GRAFICOSTGRAFICA, FACILITA COMUNICARCAR 1 | "$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >, QUE REPRESENTA OMENOR ELEMENTO GESTIONAVEL PE-LO COMPUTADOR.NO ECRAN ESTACONSTITUIDO PELO PONTO LUMI-NOSO QUE E A BASE DE QUAL-QUER REPRESENTACAO VISUAL. O GRAFICO E DE QUANDO EMPREGA OS CARAC-TERES SEMIGRAFICOS SITUADOSSOBRE A FILA DE NUMEROS; E DE, SE ACTUADIRECTAMENTE SOBRE O PONTOLUMINOSO.# # GRAFICOS 2   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 dCEN=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ٰ"9":U="1":Z=U-U:RR="8150":TX="8330":IN="8400" <O="8":T1="7950":A$=" GRAFICOS: DRAW * CIRCLE":"8410" 7,0;:t$="A INSTRUCAO SERVEPARA TRACAR LINHAS NO ECRANMAS NAO UTILIZA COMO RE-FERENCIA OS CANTOS DA PA-GINA, SE NAO NO ULTIMO PONTOINDICADO, VEM DIRECTAMENTEATRAVES DE,OU INDIRECTA-MENTE COM .":TX n:T$="PORTANTO, AS COORDENADASPROPORCIONAM UM DESLOCAMENTORELATIVO, COMO VERAS NA CONTI-NUACAO.":TX prr in:"3500":T$="SUPONHAMOS QUE ACABAMOS DEEXECUTAR A INSTRUCAO NO PONTO INDICADO. ESTE, APARTIR DE AGORA, CONSTITUIRAA REFERENCIA PARA .":T1:"7960" $rr:i=ṵ"8":"7955":"7960":t$ )t1:t$:װ".1","25":u;u,u;"DRAW ";t$ *"100":j=zu:a,b:a,b;u;u;" ":j \װ".1","10":"100":װ".1","15":"129","120":a,b:j=ṵ"35":װ".01","10":"3*a",b:j rr:i <"SE Y=0 O DESLOCAMENTO VER-TICAL E NULO. OBTEREMOS UMALINHA HORIZONTAL PARA A DI-REITA (X POSITIVO)...","120,0","7","27","7","27",u,z FF"...OU PARA A ESQUERDA (X NE-GATIVO).","-120,0","7",U,"7",U,-U,Z Pm"IGUALMENTE SE X=0, GERARA UMALINHA VERTICAL PARA CIMA (YPOSITIVO)...","0,80",U,"13",U,"13",0,U Z?"...OU PARA BAIXO (Y NEGATIVO).","0,-80","12","13",A,B,Z,-U nm"TODAS AS DEMAIS COMBINACOESGERAM LINHAS MAIS OU MENOSINCLINADAS...","120,80",U,"13","7","27",U,U xZ"...SEGUNDO A RELACAO EXISTENTEENTRE E ...","120,-80","12","13","7","27",U,-U Q"...E DIRIGIDAS PARA VARIOSSENTIDOS...","-120,-80","7",U,"12","13",-U,-U S"...E SEGUNDO OS SINAIS DASMESMAS COORDENADAS.","-120,80",U,"13","7",U,-U,U  rr:in:''':t$="PODEMOS USAR UM TERCEIRO PARA-METRO COM A INSTRUCAO ;USA-SE QUANDO E NECESSARIOFAZER UMA ROTACAO DA LINHA.":TX:'':T$="ESTE VALOR EXPRESSA-SE EM RA-DIANOS, E PROVOCA UMA ROTACAOANTIHORARIA SE E POSITIVO, EHORARIA SE E NEGATIVO.":TX B"4500":rr:IN:i=ṵ"5":t$:"7955":"7960":װ".1","25":t1 t$:u,u;u;"DRAW ";t$ \1װ".1","20":a,b,j:"129","120":a,b,j:rr:i "OS PONTOS DO PRINCIPIO E DOFINAL ESTABLECEM-SE SEGUNDO AFORMA HABITUAL; A CURVA-TURA ATRAVES DO TERCEIRO PARA-METRO...","100,0,3.14","80",Z, J"...SERA ANTIHORARIA SE O PA-RAMETRO E POSITIVO...","0,70,1",Z,"40",U 4"...E HORARIA SE E NEGATIVO.","0,80,-1",Z,"40",-U <"MAS PERMANECEM VALIDAS...","-100,-80,2","-80","-40",U+U ;"...TODAS AS COMBINACOES.","100,-80,-2","80","-40",-U-U in:''':t$="EXISTE TAMBEM, UMA INSTRU-CAO PARA TRACAR CIRCULOS; RE-QUERE AS COORDENADAS ABSOLU-TAS DO CENTRO E DO RAIO EX-PRESSAS EM PIXELS.":TX PSRR:in:"5000":I=Ṵ"5":a,b,j:#z;z,z;u;u;"";a;",";b;",";j:a,b,j-o:rr:i 9"127","87","87","127","87","50","80","80","80" '"180","50","20","50","130","20" pqin:t$="TODAS AS INSTRUCOES GRAFI-CAS ACEITAM OS MESMOS ATRIBU-TOS QUE ESTAO A DIPOSICAO DE.":TX ,''':i="217"̰"222":'" ";ڰ"5";i:i 8rr:in:'':t$="MAS E NECESSARIO CONSIDERARQUE , E REFEREM-SE SEMPRE A UM QUA-DRADADO INTEIRO DE 8*8 PIXELS.":TX:T$="PORTANTO OS RESULTADOS NEMSEMPRE SERAO OS DESEJADOS.":'':TX L$''':T$="PLOT INK 4;10,10":TX:'' VqT$="ESTABELECE NAO SOPARA O PIXEL 10,10 MASTAMBEM, PARA OS 63 QUE ORODEIAM.":TX:RR `rIN:T$="AS VEZES ESTE EFEITO PODE SERDESASTROSO!":TX:ڰ"4";"125","61","30":"5",U;U;"4;125,61,30":RR XIN:''':T$=" COMBINA OS PONTOS DETINTA PRESENTES, COM AQUELESGERADOS PELA INSTRUCAO,DA MESMA MANEIRA QUE JA VI-MOS COM .":TX:'':T$="":TX:RR IN:''':T$=" INVERTE O EFEITODA INSTRUCAO GRAFICA, POR-TANTO, QUANDO ESTA ACTIVADOMANCHA O LUGAR DE TODOS OSPONTOS PRODUZIDOS.":TX  T$="A COMBINACAO DEIXA A PAGINA INTACTA, MASPERMITE ESTABELECER A POSICAODE PARA UM SUCESSIVO.":'':TX |RR:IN:'':T$="EXISTE A POSSIBILIDADE DE CO-NHECER A SITUACAO EXISTENTE NOECRAN COM A FUNCAO:":TX:'''" POINT (X,Y)"''' T$="DEVOLVE <1>, SE O PIXEL DI-RECCIONADO CONTEM TINTA; <0>NO CASO CONTRARIO (ASCOORDENADAS DEVEM COLOCAR-SEENTRE PARENTISIS E DEVEM PRO-PORCIONAR-SE EM VALORES ABSO-LUTOS).":TX RR:IN:"8070":I"1000" -z:k=zu:"4","67+k":ڰ"4";"246",z:k Hk="14"̰"20":k,U;ڰ"6"," ":k:"15",U;:TX:Z: ?j=ṵ"20":j,u;" "jɰ"13":j: d"5","29";U;"X";U,"17";"Y":"7",u;"-120";"7","28";"120";u,"14";"80";"12","13";"-80" Bj=o̰"246"Ͱ"4":j,"120":j:j="72"̰"166"Ͱ"4":"129",j:j ذ"129","120","4" " @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:"" /I=Z:"7",U;:T$="ESCOLHE, "+N$+":":"8330" ~"11","6";"F FIM";"13","6";"I VOLTAR AO PRINCIPIO";"15","6";"C PASSO P/A PARTE";"16","6";" SEGUINTE" Z$=:Z$="F" Z$="I"I=U: Z$="C""8000"  "8090" 1502: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 ڰ"8":U:U;:c=Z:N=U̱t$ T$(N);:T$(N)=" "8385 .003xD,26 *OPT$(N)=".".1}L,30:9 "c=c+u:c=30c=Z:U;" "; 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;: zueaN oc) A GRAFICOS: DRAW * CIRCLEbT)AS VEZES ESTE EFEITO PODE SERDESASTROSO!CAR 2 |M+#$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >\),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 dCEN=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 (I=U:PN=U:A$=" OS GRAFICOS":"8410" $ "8500" ~"8075":E"1000" @/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:""  8150 9"8400":7,U;:T$="ESCOLHE, "+N$+":":8330 E=Z:11 ,6;"F FIM";13 ,6;"E EXERCICIOS";15,6;"C PASSO P/A PARTE";16,6;" SEGUINTE" Z$=:Z$="F" Z$="E"I=PN:E=U: Z$="C"I=I+U:PN=I:  8090 1502: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 l"u'u;:I=I9999':T$=F$(I) v%8330 :n<31T$(N)="" I c=Z:N=U̱t$ T$(N);:T$(N)=" "8385 U:.005y# =,10 *OPT$(N)=".".1}L,30:9 "c=c+u:c=30c=Z:U;" "; 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: ڱ"8400":"3","15-A$/2";A$:YL="11":XL="8*A$+16":"127-XL/2","142":XL,Z:Z,YL:-XL,Z:Z,-YL:U,-U:XL,Z:Z,YL:5,6;"exemplos e exercicios";8,U;: ! t$:ñt$ !cenu;"16-t$/2"; ! "8330":"8450" !5J=U+a9 +a:j,u;6+(a=10 ),a$:j: ! A=U+U:J="18"̰"24"6:208-J/A,ER+J/A*.73333:J,Z:A,-A,/A:Z,-J*.73333,Z:-A,-A,-/A:-J,Z:-A,A,/A:Z,J*.73333:A,A,/A:J: !4 INTER !9-CEN=Z:"9400":"14",U;:"8450":"8150" !>Aa$=" ":"8400":ڰ"4";"4","91":ڰ"4";"246",z !4a="10":"8470":a=Z:"8470":T$:t$="""8740" !:"5","15-t$/2";:"8330":I=Z̰"50"Ͱ"5":װ".01",I:I !"14",U;:"8450" " "8150" " "8600" "$u,u;:T$="AGORA, "+N$+"":"8330":U+U,u;:T$="TENTA ESCREVER AS INSTRU-COES QUE TE PECA. PENSO QUE NAO ENCONTRARASGRANDES DIFICULDADES.":"8330" "`"8150":cen=u:"8470":ER=Z "e "9530" "j b$:ñB$ "t"14",u;:"8450" "#u+U,u;ٰ"6";b$;:x="23688/2-U" " i=u̱b$ "b$(i)=""B$(I)=""x=x+u "ER="9"c$=b$(i):"9040" #(&#z;z,z;u;"K":z:c$=¾"23560":"" #-,"23617",Z:C$=°"14""23617",U:"9000" #.PC$<" "C$="~"C$="|"C$="\"C$="{"C$="}"C$="]"C$=""C$="]"C$="[""9000" #2(i=uC$<""C$>"9"C$=(C$+165) #4+I>UB$(I-U)=""C$<""C$=(C$+"165") #Z/u+U,u;ٰ"6";c$;:"(32-23688+x)>31"c$="?" #n\"5",x;a$(̰"(10X<21)+(30-X)*(X>20)"):c="(*3+2)"i=u:c=uj=ux:"5",j;U;" ";c$; #s3c="2"j=u+(ER="9")̰"4":j,u,a$;j+u,x;U;c$; #xKc="3"u+U,u;ٰ"6";c$;:j="23688-2"x-u:"5",j;U;c$;z;" ";°"8"; #}/c="4"j="9"̰"6"-u:j,u,a$;j-u,x;U;c$; #U:j #c$b$(i)u;"9","10";"ERRO !";"5",X;C$:U,"-18":"50":er=er+u:er<"3""9","10";U;"OUTRA VEZ!":"50":װ".1","20":"9","10",A$:"9000" #Wer="3""8470":U,U;7;U;"ESTA E A INSTRUCAO EXACTA:":er="9":"8860" #X="33-23688" #.1}L,i*3 #ERɰ"9"ER=Z #Li:er"9","11";u;"EXACTO !":"8150":J=Ṵ"20":J,U;J="10",A$:J #KEr"100":"8","10";"OUTRA VEZ!":װ".5","32":"8470":ER=Z:"8850" # "8810" $ D A T A  $"DESTA VEZ, FALAREMOS DAGESTAO DE GRAFICOS. QUANDO TIVERES O DO-MINIO NECESSARIO, OBTERAS RE-SULTADOS ESPECTACULARES!","" $"PLOT 3-(X/2),A(IND+1)","COMO SEMPRE, NO LUGAR DE VA-LORES ABSOLUTOS, E POSSIVELPROPORCIONAR VARIAVEIS OU EX-PRESSOES.","" %k"DRAW INVERSE 0;A,B","ESTA INSTRUCAO EXECUTA-SE NAFORMA HABITUAL: O E ANULADO PELO <0>.","" %x"DRAW 20,0,PI","POSTO QUE RADIANOS COR-RESPONDEM A <180> GRAUS, ES-TA INSTRUCAO TRACA UM SEMI-CIRCULO.","" %"CIRCLE BRIGHT A(IN);50,80,9","TODOS OS ATRIBUTOS SAO ACTI-VADOS POR UM ARGUMENTO DIFE-RENTE DE <0>; TAMBEM PODEM SERVARIAVEIS OU EXPRESSOES.","" %!L"LET C=A+POINT(F,G)","ESTES VALORES UTILIZAM-SE COMOEFEITOS NUMERICOS.","" %&X"IF POINT(A(IN),B-R) THEN CLS","IGUALMENTE A COMPARACAO COM<1>, PODE OMITIR-SE.","" %0"" %: INTER %DG"255,0","POE UM PONTO NO CANTO","INFERIOR DIREITO","DO ECRAN","" %NM"-255,-175","...DEPOIS TRACA UMA LINHA","QUE VA ATE AO EXTREMO OPOSTO.","" %Xg"50,0,","TRACA, EM SENTIDO ANTIHORA-","RIO UM SEMICIRCULO HORIZONTAL","COM DIAMETRO DE 50 PIXEL","" %br"50,50,-/2","TRACA UM ARCO EM SENTIDO","HORARIO,ENTRE DUAS RECTAS A"," 90 GRAUS, DISTANTES 50,50","PIXEL","" %lf"195,115,60","TRACA UM CIRCULO","COM RAIO DE 60 PIXEL","TANGENTE","AO BORDER SUPERIOR DIREITO","" %vv"(0,0)","SE O PONTO NO CANTO","INFERIOR ESQUERDO DO","ECRAN ESTA EM ","ENTAO LIMPA O ECRAN","" &G"" zu"eax c' n#NB255,0xCA OS GRAFICOSTDESTA VEZ, FALAREMOS DAGESTAO DE GRAFICOS. QUANDO TIVERES O DO-MINIO NECESSARIO, OBTERAS RE-SULTADOS ESPECTACULARES!7CAR EXER |"f#$$$~$$~$$$~$$~$~~bd&F(D(Zz  >>> @8Dp| |8H~|>@ƒB<" >