Home

Magazine Pom`s : la collection

1. localise localise jsr locali debut 00 Jne lda sta lay lda beq locali losui 3 es3a1 0 Scha ne y 0 jsr envoi iny bne 00 0 jar recoiti bca 1 dec Sessal lda Sessai bne 50 3ta lreponse jap stin 1 cnp 81F bne 0 jsr recoitl cmp 53F bcc doebut sbc 340 sta lvar jsr recoit cmp 3F bcc debut sbc LS40 sta lhor lda 1 sta lreponse Stin rts essal de l zcnerche 3 fois 1a r ponse envoi transparence 1B 62 peur position Curseur est ce LE 7 zoul attend vert 3sup r eur 40 alors c est bon soustrait 640 attend horizontal cha ne dfb 1B 3A 65 2 519 561 0 lhor da 1 lver da 1 lreconse ds L losui jsr chkcom jar ptrget sta varpnt sty varpnt i lda varnam and varnani l bmi 2 jmp miseri 2 ida lhor ldy El sta varpnt y dey tya sta varzpnt y jsr chkcom jst ptrget Sta Varpnt sty varpnt l lda varnam and varnam41 mi 3 jmp m serr 3 lda lver ldy l sta varpnt y dey tya sta varpnt y Jar Chkcom Jar ptrgat sta varpnt sty varpnt l lda varnam and varnam l bmi 4 inp m serr 4 lda lreponse ldy 1 sta varpnt y dey tya sta Varpnt y rcs mode Bg JJ U V Tt node Jar gatbytc Cpx 4 bcc 1 jmp horslim 61 stx 2 jsr envollB clc lda 4c adc 2 jmp envoi 2 da 1 WE m s RU RR pm mth mth jsr getbytc cox O
2. Laser Witer I SC d di un seul Macintosh pilot e parles routines QuicKDraw dudit Mac 4 polices IMo Ram 19 900 THI Laser Writer INT dot e de a derni re version de Post Script 42 rapide et partageable 35 polices IMo Rom 2Mo Ram 29900 FHT Laser WAiter INTX congue avec un processeur 68020 16 Mhz 2 4 fois plus rapide que la Laser Extensions m moire pr vues 35 polices IM o Rom jusqu 129Mo Ram 39900 FHT Elles sont connectables un IGS ou un PC l aide d AppleTalk PC et un syst me de mise niveaud un mod le l autre est pr vu Pom s n 34 Petites annonces Ces petites annonces sont gratuites et r serv es aux abonn s Elles doivent bien entendu concerner l informatique Pour les ventes de logiciels l annonceur doit nous faire parvenir une photocopie de la facture d achat Vends carte SSC 01 87 750 F c ble SSC Minitel 150 F Disk 1000 F carte horloge driver ProDOS adapter 100 F collection Micro Syst mes 20 72 faire offre Jean Marc Corazza Le T oulet 81600 Gaillac 63 57 06 96 Vends imprimante Microline 80 parall le connecteur Centronics 1000 F Michel Le Port 47 20 81 88 Calva MLP10 Recherche Langage Fortran UCSD original pour Apple Andr Moreau 73 rue du Roleur 59300 Valenciennes 27 45 16 12 Vends logiciels pour PC amp compatibles sous emballages scell s Multiplan
3. Roger Wagner Apple IIGS Machine Language for Deginners chez Roger Wagner Publishing David Eyes et Ron Lichty Programming the 65816 including the 6502 chez Brady Book Prentice Hall Press Gary Little Exploring the Apple IIGS chez Addison Wesley Michael Fischer Apple IIGS Technical Reference chez Osborne McGraw Hill Gary Bond Inside the Apple If GS chez Sybex D autre part Apple publie peu peu chez Addison Wesley scs diff rents manuels pour le GS Cc sont de vrais livres bien pius utilisables que les milliers de pages photocopi es dont il faliait se contenter jusqu ici Votre patience sera r compens e si vous avez attendu pour acheter Apple Computer Technical Introduction to the Apple HGS chez Addison Wesley Apple Computer Apple IIG S Firmware Reference chez Addison Wesley Apple Computer Apple IIGS Hardware Reference chez Addison Wesley Apple Computer ProD S 16 Reference Manual chez Addison Wesley Pom s n 34 DDA devrait pouvoir fournir certains de ces ouvrages demandez lui son catalogue Sinon essayez avec l APDA Sauf pour Sybex les diteurs ne diffusent pas directement Pom s a d couvert l existence d un sympathique f anzine de bonne facture pour les toqu s de l Apple et du Mac un produit du Sud et de l association Sun Data appel Ampersand Aux rubriques habituelles des fanzines solutions dc jeux comment prot ger v
4. Si le caract re est en 58 CMP 20 inverse ou en flashant 59 BCS SCT on le transforme 60 ORA 40 61 62 HCT4 ORA 80 63 JSR OUT Ecriture sur l imprimante 64 65 z CARACTERE EN PAGE 1 66 HCTS LDA ADL Y 67 BMI HCT6 A gt 68 AND 3F H capitulation sa op 520 TXT DMP C 70 BCS HCT6 m 71 ORA 40 Apr s ge saisi g e 72 HCT6 ORA 580 sous moniteur vous ia sauvegarderez 73 JSR OUT par BSAVETXT DMP C A 300 L 60 74 0300 A9 00 48 48 4A 29 03 09 2 0308 04 85 07 68 29 18 90 02 Ta INE doni m oUi n 0310 69 7F 85 06 02 0A 05 06 Zo CPY 40 Test si fin de ligne 0318 85 06 A0 00 A2 TF EC 1F 2 BNE HCT3 0320 C0 BO 19 A9 00 80 55 CO 78 0328 B1 06 8D 54 CO 30 08 29 X ucc LIT D VO RTS 0330 3F C9 20 BO 02 03 40 09 80 Fin d une ligne 0338 80 20 ED FD Bi 06 30 08 DT E 0340 29 3F C9 20 30 02 09 40 82 0348 09 80 20 ED FD C8 CO 28 83 LDA M 40 Envoi de RETURN 0350 D0 CA A9 8D 20 ED FD 68 84 JSR OUT sur l imprimante 0358 A8 C8 98 C9 18 DO A3 60 es te p u 86 PLA Programme de 87 TAY 1 a Eod passe a 13 d monstration 89 T YA suivante TXT DMP DEMO 90 CMP 24 Test si fin 91 BNE HCTi sde la page 10 TEXT HOME PRINT CHRS 21 92 20 D CHR 4 FLAG 0 93 RTS 30 FOR J 1 TO 39 A A NEXT 40 PRINT D BLOADTXT DMP C 50 B POM S IF FLAG THEN BS P O M d S ve BR JOUX AE Applied Engineering ES e 20 rue Montribloud 69009 LYON T l 78 36 52 69
5. Voici des expressions valides amp PRINT Noe CHRS 8 1 1 127 amp PRINT A 5 SLOT PF amp PRINT STR A B 2 255 Pour les lignes qui suivent nous prendrons l exemple de la ligne Basic 100 amp PRINT EE 127 3 T la fl che indique le caract re d sign par le pointcur de programme TXTPTR en B8 B9 IF L ampersand Premi re tape l installation du vecteur ampersand amp ou esperluette Lorsque l interpr teur Basic rencontre un amp il ex cute un saut l adresse 3F5 Il nous suffit donc d installer cette adresse un vecteur un saut qui vise le d but de notre interpr teur Ainsi notre routine prendra en charge lanalyse du programme Basic apr s lecture de l ampersand lda 4C code de jump sta SJ3F5 lda debut adresse sta 3F6 lda debut adresse sta 3 3rF7 rts fin dinitialisation debut Pom s n 34 Lors du BRUN d marrage du programme en langage machine de notre routine seule l installation du vecteur sera pratiqu e on ne sautera debut que lors de la rencontre d un amp Notons quil s agit l d une m thode brutale l ancien vecteur est cras sans sauvegarde La bonne m thode pour que plusieurs routines ampcrsand puissent cohabiter consiste noter le vecteur existant et y faire un saut si la commande ne nous concernait pas Apr s rencontre d un amp le pointeur de programme est dispos ainsi 100 amp PRINT
6. on1 off1 jsr jsr cpx beq 1dy lida jsr dey bpl rts ldy lda jat dey bpi rts dfb dfb souli Smode d ok hersilim couilc cou1f t5 arr 90F envoi envoiiB 4C Smode envoi envoi11B 940 coulc envoi envoi118 50 cou1f envoi envo1lB 549 flaah 1 l envoi envoiiB 6856 inv 2 1 envoi envoi1 8 559 souli 3 1 envoi l Bei pi ka eh gea mode lt 4 couleur carac et fond lt 8 mode texte mods couleur carac couleur fond fl sh inv lignage 271 972 516 918 55C S1B 49 91B 559 51B 94C 1B 547 1B 350 520 0 dd is Ca Gb GEF mm a recoit getbytc 7 Soff1 y envoi 1 43 569 34 918 4 966 93A 51B8 43 64 83A 818 4 66 3A 518 wm mm mm mm pm em E em E gn am mm mm e jsr jsr chkcom ptrget attend nom de Pom s n 34 err 1 saig re u 0 stocke pasrecu finsais 00 1 ig spec 50 1 2 accents 0 2 3 c1l c2 control bit nit omi Jeep jsr jmp lga sta jsr GUD bre jap beq and sta inc lda rts lda bne lda sta bne bcc cnp bcs dec jsr idx 1dy jar ida ldy zta 7 ida sta iny lda sta rts ds jsr bca jmp tax and CD beq txa ldy cmo beg iny iny cpy bne mp iny lda jap st jsr bcs jap sta lay lda bre iny ida cmp boe iny lda jap iny iny iny Epy bne jm
7. 6 ALERT E Aucun message re u l GOTO 3050 NO LG amp VIDECRAN amp PARAMT 0 2 0 0 0 0 amp AF FICHE JCHRS 18 CHR9 62 39 4 DEPLACE 2 3 amp MODE 1 6 AFFICHE Co nsultation des messages enregistr s amp M ODE 0 3144 amp PARAMT 0 2 0 0 0 0 amp MTH 1 amp AFFIC HE an CHRS 18 CHRS 64 39 amp MTH 0 amp DEPLACE 9 5 amp PARAMT 0 6 0 0 0 0 amp AFFICHE Pr c dent 3146 amp LIGNE amp AFFICHE amp INVERSE amp AFFICHE Retour amp DEPLACE 11 6 amp PARAMT 0 6 0 0 0 0 amp AFFICHE Suiv ant amp LIGNE amp AFFICHE amp IN VERSE amp AFFICHE Suite ai 3148 amp DEPLACE 15 7 amp PARAMT 0 6 0 0 0 0 amp AFFICHE Fin amp LIGNE amp AFFICHE amp INVERSE 6 AFFICHE Sommaire 3150 6 PARAMT 0 2 0 0 0 0 amp AFFICHE CHRS 18 CHRS 64 39 amp AFFICHE CERS 18 CHRS 64 39 3152 6 DEPLACE 1 12 amp PARAMT 0 4 0 0 0 0 6 AFFICHE CHRS 18 CHRS 69 39 amp DEPLACE 1 16 amp PARAMT 0 4 0 0 0 0 amp AFFICHE CHRS 18 CARS 64 39 3154 amp DEPLACE 1 24 6 PARAMT 0 2 0 0 0 0 amp AFFICHE t CHRS 18 CHRS 64 39 3170 PRINT D read FI r NO 3180 FOR I 1 TO 3 INPUT IS I NEXT 3190 FOR I 0 TO 6 INPUT MSS I NEXT 3192 6 DEPLACE 2 10 amp AFFICHE Message n STRS NO 3194 6 DEPLACE 2 13 amp AFFICHE 4 IS 1
8. ES ind pendan hung UM ilisateur Mili e c Mega Mac into WH 2 sm r d i LER Ic L anti disque che li SpeediskT la RAM Card q memoire permanente Rapidit Temps d acc s l information 0 2 ms 100 fois plus rapide que les disques Qurs Par exemple d marrage sur Basic System en 3 s AppieWiiter disponible en pere Is Fiabilit Constitu e de circuit CMOS ores faible consommation Speedik est aussi fiable que l ordinateur lui m me Elie est insensible l environnement Ca pacit Speedisk est propos e en quatre versions 1 Mo 1048 576 octets 384Ko extensible 1Mo avec horloge compotible ProDOS pour les Apple e ou sans GS Compatibilit 100 compatible avec ProDOS c est un volume SpeediskTM fonctionne sur Apple sur Apple e et sur Apple IIGS Prix Lecteur de Pom s vous b n ficiez f d une remise de 10 SPAOO 384Ko 25000 359100 SP1000 1 Mo sai 539100 SP400H 384Ko horloge a 58000 4 122 00 SP1000H t Mo horloge 658210 5 922 00 Garantie SpeediskTM est une fabrication francaise garantie un on por chonge de lo carte ma Te be AN ei H gt Ps as wh E d 4 e ge T kya 2X h k V ar e S IS a Tu Leg 4 ZER GIS ii Ls SE S t dah a ire 4 T LI B s z Iur m E KAKI e eral esst AA p ve L i se j a jJ LIO BI h n r e F 4 4 a FU TL PL DK P O PL i i j Y Tl P EE A B sil d L j
9. Il nous donne acc s tous les caract res des polices Mac et utilise des polices de 8 127 points Voil un s rieux concurrent pour MultiScribe Printrix et GSWrite il imprime plus vite que GSWrite ce qui n est gu re difficile tout en utilisant ses polices et il reconnait plus de 40 imprimantes Seul probl me pour le moment il ne dispose pas d diteur de polices ce propos quel diteur de polices syst me utilisez vous sur GS Pour nos accents 1l faut donc par exemple remplacer chaque par lt x2 gt N lt xl gt avant l impression avec les polices fournies sur la disquette Voil une belle macro SuperMacroWorks faire Mais Mark Simonsen nous promet pour bient t un Universal Font Editor toujours chez Beagle qui permettra d diter les polices Mac ou GS Write y compris sur e Notons que TimeOut SuperFonts ne p rime pas GraphMer ge de Pinpoint qui imprime aussi les images dans les fichiers AppleWorks mais imprime letexte en mode texte au lieu du mode graphique de Super Fonts GraphMer ge s accommode donc d une police transf r e dans l imprimante ce que ne peut faire Super Fonts Les utiles FileMaster Graph SideSpread QuickSpell TimeOut File Master est une sorte de Filer volu ou de Copy J Plus int gr AppleWorks mais sans fonctions DOS 3 3 Sa fonction de backup s lecuf des fichiers qui ne sont pas d j en double le rend particuli reme
10. VIP Technologies C O ISD Marketing 20 Steelcase Road West Markham Ontario L3R 1D2 Canada Word Perfect Corporation 288 West Center Street Orem Utah 84057 USA Zip Chip 11926 Santa Monica Boulevard Los Angeles CA 90025 USA f d exploitation et protection sur Syst mes syst mes de Apple par Jean Pierre Lagrange dition Micro application 179 F Qui n a jamais r v de d couvrir les secrets des protections de programmes Voici donc un livre qui devrait assouvir l app tit de d couverte des chevronn s de l Apple Que les diteurs de logiciels soient n anmoins rassur s i s agit ici de montrer comment prot ger les programmes et leurs disquettes il n est jamais question de d tailler le travail inverse D plombeurs s abstenir Avec un sujet de tr s haut niveau technique comme celui ci il est indispensable de poss der une excellente connaissance pr alable de lassembleur et des syst mes d exploitation de l Apple DOS 3 3 ou ProDOS I ne sera jamais question de faire un apprentissage de la pratique du 6502 le d but du livre d marre sur les chapeaux de roue et la suite continue Ia m me vitesse Au menu on trouve d abord les diteurs habituels de disquette tels que CIA ou Watson Suivent une description des m thodes pr histo riques de protection en m moire d un programme en commengant par rediriger les vecteurs du Reset Puis les protections
11. amp debut so 1 acc accl SLI suite envol 1 a x envoiqs Sat tend x y Carat sta jsr ldy bit bpl lda np lda beq cmp beq iny iny iny iny bne lda jar ne iny ldx bit bpl lda jap lda jsr iny dex bne bed bit sta stx ldx lda and beq lda sta ldx jar rts ds ds pha stx sty jer lda jsr bcc jsr pia j3r ldx ldy jsr rts ds da ds savereg Carac recoit 0 est ce un carac drap accentue L accent y debut accentO y 0 carac acc math matique litt raire bcl carac envol restreg ANON zoui 3 drap Li accent y suite accentO y envoi envoi des 3 carac Saccl 1 pint envoigs a x 0 statvs x 510 1 a data x x ace 1 1 x Sy parapi 0 statpi Sattend parapi writepi x Sy ace 1 1 1 T m T m cm ee r envoi LE gu envollF lda 1F jmp envoi envoi 1B ETE w em em lt w pm mm dinde a envoillB ld 18 jmp envoi E m w E m ah ah aan recevoir un caract re r sec si re u clc sinon E e rm mm e mm pm e e e pe e recoit bit pint bmi reccitgs stx regx ldx ED lda status x j and 00001000 bne 1 ldx regx clc rts 1 lda data x and 01111111 ldx regx sec jsr acr rts recoitgs stx X sty Sy jsr parapi ida l jsr statpi bcc Sfin jsr pa
12. s lda Spage y jar envol dey bpl 2 rts dch dfb 43 569 3A 51B 4 66 3A 1B dfb 41 958 S91F 914 page dfb 43 96A 934 918 4 9 66 3A 61B amp lt r u lm decnx k UU u m mm e decnx jer recoit ldy 2 61 lds CEA jsr envoi dey bpl 1 jar recoitl jsr recoit jmp recoit 52 dfb 103 57 27 deplace recolti debut oc2 recoit debut oc3 racoiti 11 debut 4 12 debut 1 reponse fin 1 ts ta ts r ech ken ptrget varpnt varpnt 1 varnam varnam 1 2 misarr oc1 1 varpnt y varpnti y chkcom ptrget varpnt varpnt 1 varnam varnam 1 3 miserr oc2 1 varpnt y varpnt y chkcom ptrget varpnt vaxpnt l varnam varnam 1 4 miserr oc3 l varpnt y varpnt y chkcom ptrget varpnt varpnt 1 varnak varnam 1 5 miserr reponse PI varpnt y Ivarpnt Y En e Tam e mA ge GA AH GER GNE ai mmm q u ma deplace jer qetbytc taa beq Serr clc adc 940 Sta posh cmp 969 bcs Sarr Jar getbytc taa beg Aert clc adc 40 eta posv mp 539 becs Serr lda 5F jsr envoi lda posvy jer envoi lda Posh jmp envoi Serr jmp horalim O Pom s n 34 Num jsr enligne bcc MM T sta jar enliqne jsr chkcom hcec isr ptrget sta sta varpnt Jar sty varpnt l bcs lda vsrn m np end varnam i 11 cmp Emi ok beq 3mp miserr jmp lca 6 12 lda sta essal sta Sok ldy ES bee ok1 lda ch
13. 1290 12A0 12B0 12C0 20 4C 10 Ce 51 23 C8 OC Ed DC E9 E4 CB S A BA 90 4C 2 F 4C HE 66 6F 4 C 69 66 F7 8A 8A 10 18 08 19 E8 20 83 19 8D 20 40 AC 1280 AC 04 00 30 20 BE DE 76 20 13 DO 20 DO 4C RE C4 CC D5 Di E6 E8 94 10 11 18 3 3A 11 58 3A JA 20 FO F0 19 20 4C A9 AC 60 20 9D AC A2 19 i3 F0 00 03 BE DD AC DO DE C7 JIS 10 B7 DO CB D5 CA B5 F6 8B 19 20 1B 1B 20 11 LE AC 1B AD BE 20 2C 19 ED A9 19 20 19 l 85 GE C3 D6 839 FA 97 20 10 A0 04 20 10 A0 04 20 19 18 18 E8 DE DD F 7 F0 A0 ES E6 BO 02 A0 C 4C BA D6 85 CO CD 85 FA 91 E3 19 07 66 F5 19 07 66 60 20 69 1B 20 A9 14 XF 1B A9 00 16 JA 8D 8D 43 DE DU E3 DE JB 0A AC A0 00 19 83 ES CO 97 85 EP FA 8B E6 88 B9 3A E6 88 B9 3A 19 60 40 40 20 E 06 AC C9 90 48 B3 CE 66 SE A0 12 20 AD DF 10 CE 19 01 B9 20 E4 D 8B EG E E9 BA 91 E0 10 3B 1B E0 10 7B 1B A0 79 8D 8D 10 DF 8D 19 JE D2 66 4C 63 03 12 12 A9 EJ JE 85 83 04 o C3 48 7E p 00 BE D3 94 EC EC E7 EA 96 19 Ei 41 19 F7 21 41 02 4C E7 E8 19 85 22 BO D0 A9 JA 10 12 12 1B 20 20 01 DE 12 83 84 A9 10 13 91 10 19 68 9C CO BA 85 8D 85 E8 00 90 CA 20 41 90 C
14. 27 AND Dlo ON MENU GOSUB Menus MENU O EIER ge N RETURN CS INKEYS ON MOUSE GOSUB Souris Quitter Dlog DIALOG 0 GOSUB OuvreFichier LIBRARY CLOSE WEND AttenteOuverture WINDOW CLOSE i MOUSE OFF IF Dr THEN FichjierOuvert SYSTEM MENU ON GOTO AttenteOuverture FichierOuvert ON BREAK GOSUB Bloque Menus WINDOW 1 tat du serveur 0 MENU 1 5 1 MENU OFF 39 512 342 1 IF DrArret OR C CHRS 27 OR nMenu MENU 0 TEXTFONT O TEXTSIZE 12 Dlog 4 THEN Arreter nArticle MENU 1 CLS OPEN R 1 Fichier 244 IF nMenu lt gt 1 THEN FinMenus MENU 1 1 0 FIELD 1 2 AS zNombre 5 8 AS zM ON nArticle GOSUB DemExistant MENU 1 2 0 ot 16 AS zNom 16 AS zTel Pom s n 34 35 GET 1 1 Mot zMots 7 3 NomServeur zNom x TelephoneServeur zTel tlMot 7 IF RIGHTS S Mot 1 2 THEN M otS LEFTS MotS LEN Mot 2 GOTO t1Mot tlNom IF RIGHTS NomServeur 1 s2s THEN NomServeurS LEFTS Noms erveurS LEN NomServeurS 1 GOTO tiNom tlTel IF RIGHTS TelephoneServeurS l 2 THEN TelephoneServeur LEFTS S TelephoneServeurs LE N TelephoneServeur 1 GOT O Ciel ChaineEtat Appel re u atten te de connexion GOSUB spAfficheEtat ENR Dr IF NOT Dr THEN Deconnexion NombreConnexions NombreConnexi ons 1 NombreConnexionsS STR NombreC onnexions ChaineEtat Connexion ok ser veur actif connexion n No mbreConnexions S GOSUB spAfficheEtat Te Premiere page Deplace 1 13 Afficher
15. 6 Consell 101 De Fran ois MULLER FM17 11 dec 87 15h31 Je conseille aux utilisateurs du programme MinBas Pom s 27 de faire la modification suivante s ils ne l ont d j faite Ligne 795 ajouter CHR 31 9 apr s le CHR 14 Ceci provoquera un saut de 9 lignes sur votre IMW et imprimera une page Minitel sur une page de papier ce qui est plus pratique Amiti s FM Du c t des imprimantes Laser Writer On parle d une nouvelle version du PostScript int gr la LaserWnter disponible aux tats Unis mais quel est e num ro de version de votre imprimante Pour le savoir envoyez lui le programme list ci dessous I donne acces soirement le nombre de pages imprim es et e nom de l imprimante cest aussi l occasion de voir des instructions non abord es d ans le num ro 24 de Poms L envoi se fait depuis un Mac l aide de Doz Load ou JustText et depuis un Apple par fe port s rie avec tout traitement de textes 96 n version PostScript Times Roman findf ont 12 scale font setfont 100 700 moveto version N 312 de version show show 100 680 inoveto 31 string statusdict be gin printername pagecount end 6 string cus Nombre de pages show show 100 720 moveto Imprimante show show shou page Trois nouvelles Laser W iter sont propos es par Apple long vit tri ple densit des noirs am lior e cartouches pus durables bac de 200 feuilles et enfin un bac enveloppes
16. E E st gd j D a CE eI i w x FE ERES L ET D A La LA Zb ga LI SN K be 4 I k I ke u KH g i UI Iam Bast 4 NK 12 a TO E i3 LL AT Lire Fr JN dI s A EM enia 0 D Mer CRUE ANS dli a l RK e f I A H EM I e CS TN ET r4 i ei e mg y Wi j 8 d A A EF I ch T b e ve rs echa W e Ai mm Ais 1 ag e 4 e I b 3 Let Ka Ie JD WSA 8 i gt k H d t E Fa b z Le pid A Lag Ce WT wee AP smiri r 1 K D a VS mi L SCH e L L aM dWI d ch ia dh Cl md MM Fa mi F 4 p e ET faf CH Emi rd Dus d T 4 CM E e 2414 ENK 1 l z Se il if i rz RK e Ae 7 d e nam bk Li Ds 4 1 TIS sw 4 m esch ME KNA A A x H v Tm A m BA T d i 1 Wi E i 4 LI LUE IL A A Be 1 WA x EE EN TEE EE 94 3 E d NG Vente par correspondance Logma S A Ves Lee D zg documentation 12 rue d Anjou VE i menn ams c MEE renseignements 78000 Versailles EL vere anama cms e T l 1 39 51 24 43 Banc d essai dans la revue Pom s n 31 p Speedisk est une marque d pos e de Je d sire recevoir sans engagement votre Thot Informatique France documentation sur les cartes Speedisk NONIS n nasse KANG ku al m TM In besos UL SASS DRE u ATE COCO CCC CSSS LC LES SSL AIR sss hasp Gadhung miki E
17. IF LEN R19 lt 4 THEN 6 ALERTE Minimu m 4 caracteaes 1 GOTO 3560 RAS SECRET 2 1840 PER SET ON NOT ES GOTO 10000 ON E GOTO 3680 3640 3500 3645 3640 500 3 680 10010 GOSUB 4000 GOTO 3610 GOSUB 5000 GOTO 3610 IF RIS lt gt R2S THEN 6 ALERTE Les deux mots de passe diff rent 1 GOTO 3560 MOS R1 PRINT F open F1 1255 PRINT Do write FI S r0 PRINT LG PRINT MO PRINT TES PRINT NOS PRINT D close 6 VIDECRAN amp DEPLACE 6 12 amp AFFICHE Le mot de passe a t chang s aos D EPLACE 11 14 amp AFFICHE faites amp INVERSE AFFICHE Sommaire 6 ACCEPTF A ON AS 0 OR A 8 GOTO 10 010 GOTO 500 REM EL a SOUS prog amp ALERTE Touche inactive ici 0 RETURN amp ALERTE Guide indisponible 0 RETURN CADRE 4 10 6 12 2 0 5 0 6 AFFICHE 1 r amp TEADRE 4 13 76 5 2 07 5 00 APFICH E 2 E CADRER4 210 6 18 2 0 5 0 amp AEF 7000 8000 9000 9010 9020 9030 9040 9050 9055 9060 9070 9080 9100 9110 9120 9130 9140 9150 9160 9170 9172 9175 9180 9190 9200 9205 9210 9250 9400 9410 9420 9430 9440 9450 9500 9899 9900 9910 10000 10010 19999 20000 ICHE 3 RETURN amp ALERTE Choix lmpossible 1 RETURN VTAB 10 PRINT US CALL 868 PRINT RETU RN Eeer menu g n ral VTAB 23 FOR I 1 TO 23 PRINT NEXT PRINT PRINT PRINT
18. J ai essay de traduire les macros agenda de Dimitri Geystor c est un joli casse t te il faut traduire d abord les commandes AppleW orks 1 4 VF en commandes AppleW orks 2 0 US traduire ensuite les commandes SuperMacroW orks VF en commandes S uperMacroW orks US traduire enfin les commandes Super MacroW orks en commandes UitraMacros Poms n 34 SuperMacroWorks vous permet de wansf rer une police Power Print pour l imprimante au chargement d AppleWorks ce qu UltraMacros ne permet plus Enfin et surtout un fat que Beagle s abstient soigneusement de dire et que doivent donc crier sur les toits les utilisateurs qui n aiment pas ce genre de cachotteries SuperMacroWorks aussi automatise les applications TimeOut Eh oui quand la l gion des TimeOut s est form e son commandant tait d j JA UltraMacros me semble donc surtout destin aux fanatiques de la programmation et du bidouillage qui voudraient un autre programme en plus de SuperMacroWorks pour cr er des applications sp ciales en anglais seulement Si vous tenez absolument UltraMacros il vous suffira d envoyer 22 5 dollars Beagle en m me temps que votre disque original version US de SuperMacroWorks On est pri de ranger soi m me son bureau En admettant que vous ayez un bureau une m moire de taille suffisante vous avez tellement d accessoires et d applications y mettre qu un s rieux probl me de rangement se p
19. amp DEPLACE 4 14 amp AFFICHE vos messages et confidences amp DEPLACE 13 18 amp AFFICHE Acc s au me 35 280 290 300 340 499 500 2 TO 520 550 560 570 580 590 600 6 10 6 20 6 30 6 50 660 700 710 720 730 740 750 760 770 780 790 800 801 pu amp INVERSE amp AFFICHE Sul te ei amp DEPLACE 18 19 6 AFFICHE Renoncer gt amp INVERSE amp AFFICHE Connexion V Le amp ACCEPTFE A ON NOT A GOTO 10000 ON As GOTO 500 340 200 340 340 500 500 10010 340 GOSUB 4000 GOTO 290 REM EEEE i Sommaire PRINT D close amp VIDECRAN 6 VIDRECT 1 1 40 6 4 amp DEPLACE 9 4 amp PARAMT 1 7 4 0 0 0 6 AFFICHE R pondeur t l maticue GOSUB 6000 amp PARAMT 0 7 0 0 0 0 amp DEPLACE 8 11 amp AFFICHE Laisser un m ess ge amp DEPLACE 8 14 amp AFFICHE Fonctions de service amp DEPLACE 8 17 amp AFFICHE uitter ce r pondeur amp DEPLACE 15 22 amp AFFICHE Votre choix amp INVERSE amp AFFICHE Env gd T a CHS E ACCEPT 29 22 0 EE 1 CHS E ON NOT ES GOTO 10000 ON ES GOTO 650 200 500 620 600 600 650 10010 GOSUB 5000 GOTO 600 WE CHS lt I OR CAS gt t3 THEN iGOSUB 7000 GOIO 600 IF CH lt 1 OR CH gt 3 THEN GOSUB 7000 GOTO 600 ON VAL CH GOTO 700 3000 9900 amp VIDECRAN amp DEPLACE 3 2 amp INVER
20. and jsr Ida sta ida sta res 6 g portek rgerr og 7F pfek SFF era SBE30 ancvec SBE30 1 ancvec i 18 fin S19 y S80 7 SFDED 2 8 sortie 8D o7 SFDED ancvec SBE30 ancyec 1 SBE 31 22 SBE03 Pom sdsinbue Super Macro Works Apr s l article de Damien Nould dans Pom s 33 et l loge qu en faisait aussi J Y Bourdin vous tiez nombreux rechercher vainement SuperMacroWorks chez les revendeurs Pom s a obtenu de Beagle Bros la possibilit de diffuser ce programme de Randy Brandt dans ses versions fran aise et am ricaine Pr cisons que si SuperMacroWorks est bien entendu compatible avec toute carte d extension m moire pour Apple cartes Apple Applied Engineering Checkmate et autres il ne n cessite aucun quipement sp cial du moment que vous pouvez charger AppleWorks 1 4 tel qu il est vous pouvez utiliser SuperMacroWorks Pour les techniciens SuperMacroWorks se loge dans la carte langage de la m moire auxiliaire ce qui n est pas simple sachant que vous n avez plus alors de ROM et que vous devez utiliser la pile et la page z ro de la m moire auxiliaire C est d ailleurs pourquoi AppleWorks renonce utiliser cet espace Les seules exceptions imaginables la compatibilit avec SuperMacroWorks seraient donc pour le propri taire d un I qui aurait modifi AppleWorks avec Plus Works 2 0 ou le patch fourni avec la carte Ramfa
21. beq Slitt ldx SEEF litt stx drap rts LET w wama w s ss normal En ss ss ssss normal Aar envoi13 lda LS95C jap envoi 1 Gss paramg paramg Jar dgetbytc stx coulc jer getbytc stx coulf jsr getbytc sta ligne jsr getbytc stx fiash lda coulc ora coult cmp 8 bec 0 jmp herslim SD lda 0E jar envoi jsr envolls cic lda couic adc 540 jar envoi jar envoilB5 ele lda coulf ade 530 jar envoi jsr envoiiB lda 549 bit flash eq 1 sec abc l 1 jsr envol jer anvollB lda 59 ldx 1igne b g 2 cle adc l 52 jmp envoi coulc ds 1 coulf da 1 iigne ds 1 flash d3 1 W UI w pm D pm E ri paramt W U kai mx paramt jar getbytc atx Smode Jar getbytc stx Scovlc Jar Yetbyte stx Scoulf jsr Qetbytec stx S El sh jar getbyte stx Sinv Jar getbyte smode math matique grephique couleur carac couleur fond flash lignage Pom s n 34 amp err Sok 1 s2 3 Smode coulc eou1lf flash 1nv scuii reinit 1 fin 2 stx lda emp bee mp lda ora cmp bcs lda dsr 3jsr clc lga adc Jar jsr cle lda adc jsr jsx clc lda adc jsr jsr ld ldx beq sec sbc jsr jsr lda ldx beq clc adc jsr sr lda ldx deg clc adc Jump as ds ds ds da da ldy lda beq 3sr iny bne rts dfb dfb dfb rguleau rouleau on 0 Soft 1
22. curseurv Anitcptl 1 al deb 1F 40 941 920 12 564 951 F 940 541 Rien 19 41 la effacer SOA 0 sais EO depasost 0 tempo tempo 1 pint S1 SFD 2 SF8 tempo 2 d passt 0 stempo cur seuri 6 efface ligne O efflg0 y positlonn curseur e f190 lgch lgatt noach nbcar tempo depasst al Carrecu dbilh position 0 Si 2 nonrep finacc 301te So 01 Saff sfin chaidef Serr Ssuite jsr dey bpi lda sta rts d b dfb ds ds ds ds ds ds ds ds ds jar stx sty jsr lda clc adc jsr lda cle adc jsr lda beq Jer 1da imp ds ds lga ata lda 4sr ldx 1dy jsr lda 1dy sta iny lda sta iny 1da sta JET Jar gta aty lda and bmi jmp lda smp bcc sbc ldy ata lay tya sta jsr ldx cpx beq lda Aer bne lda sta rts jsr jsr lda sta lda sta jmp lda ata ld sta ldy envoi 91 0 al S0A 564 512 20 41 40 1F k j deb d al ka AJ Fei curseuri 1 2 envollr S2 640 envoi 91 40 envoi dbih 0 envoilB 54D envoi 1 1 0 carrecu nbcar getspa 1 2 novstr nbcar 0 varpnt y fretop varpnt y fretop l varpnt y chkcom ptrget varpnt varpntel vaznata vernam l So miserr carrecu EJ Sei Ei a varpnhnt y 0 varpnt y curseuri nbcar lgatt siin u envoi eff E
23. iu L Se Ka LI LA k E 4 i Nr k b W gt i Se i 1 L HA t 1 ep Le E EE wa J m i 2202815 3 s De gd a T e _ e A K E D i an D 4 i 1 Ss e 1 LJ EE ra de Ss P 4 4 H Mf 4 L JA a Ure I L bow x a SSS Se AE EN d r A T e l a di 4 V e Lean as 1 r b ww i e Ig rr Fra a EM e d Se D i 1 4 LE LE F e a SS RS d A 1 e aa wi a k IV J l k i 4 J LU P Pru wya 1l uu g EZ QE ue a h a Paf ae is E amr eh AERA Tekag ro ek s F al A D 4 d EM e T da 4 7 e a Ve x ke P 4 s e zi te s i a E Le geet zeg K a A T d 3 r 1 La SA ws MEN i I LE Je a S H d a P 3 E ip d 4 K pa II d F k _ L ow m d i pan 79 d Sei d 3 M Se ET k FAR i f A k i P t m HM M MM B A H H n MN HT 72 3 St Noc mmm NC HB ee ET Di W y Zct eket Se d i d eh bn Dr kay S W kS k M a 4 j ya S a ze ka I At A At P d GUET C y i Sa 1 iude ds k 1 i L j d z H L Elek K ebe L A I A f m e 1 e T E Be LEM Tul Ai a T ni e T LR i 1 ka ix e 1
24. l Apple comme serveur avec un logiciel tel par exemple R pom deur publi dans ie num ro 34 de Pom s C ble interface Apple Minitel Pour faire fonctionner les programmes suivants Minitel 1 pour Macintosh MinBas pour Apple Ui e e c et IIGS programme permettant l enregistrement des crans Minitel la restitution loisir hors r seau le stockage et ou l impression de copies d cran du Minitel et aussi l envoi de textes ou messages sur un serveur Programme du num ro 27 de Pom s InterPoms 1 0 et plus pour Apple li e e c HGS et Macintosh programme de t l chargement entre Apple et ou Apple et Macintosh Transmission de n importe quel type de fichier syst me texte binaire Basic en utilisant le Modem du Minitel Version 1 0 publi e dans le num ro 28 de Pom s T Pom s pour Apple e e c IIGS et Macintosh r cup ration de l annuaire t l phonique sous la forme de fichiers texte Num ro 30 de Pom s e Clv Pom s pour Apple e e c et IIGS et Macintosh programmes de communication pour CalvaCom et serveurs ASCH Num ro 31 de Pom s e Paint Minitel pour Mac et HGR Minitel pour Apple Ir e e c IGS graphisme et Minitel programmes propos s dans le num ro 33 de Porn s e R pom deur pour Macintosh Apple JI e e c et IIGS r pondeur enregistreur t l matique Interrogeable distance publi dans l
25. lda facmo sta forpnt lda facmo l sta forpnt l lay 0 laz forpnt y comp 37 bec 000 Jap strtool 000 sta 1g ldy 2 0 lda forpnt y dey sta ptr y cpy 0 hne 9 jsr qgetbytc txa beq 00 Aer bip 00 lay 8 01 lda Sligne0 y Jar envoi dey bpl Soi idy 0 idx Silo 51 dex bmi Sfin rcherche chaine C est chaine 7 r cup re longueur r amp cup re adresse de la chaine zaffiche la chaine quel ast le caract suivant 3 point virgule 9syhtax error cherche chaine c est 1 cha ne ir cup re iongueur maximum 36 Caract res r cup re adresse de la chaire attend varlablen va en ligne 0 et l effsce affiche la chaine lda 3sr iny jnp fin lda mp 11gne0 dfb dfb 1g ds appei jsr jsr sta sty lda and dmi jnp Sal ldy Sai lda bmi dey bne aonnepa lda Sfin ldy sta dey tya sta rts sonnae ldy tal lda jar bit bp1 dey bne lda bne varpnt y varpnt y 3 95C6 FCAS cO6t sonnepa 31 1 Sfin um zm mm um mmm mmm m memm m a bip bip l a Jmp lt s 7 envoi cadre cadre jsr cpx bcs stx jsr epx bes atx jsr cpx bes Sta 4sr Cepu bcs stx jar cpx bcs stx jsr sts jsr pcs txa ora ste jsr txa Ora sta emp bcc errf Jop h1 ds h2 ds v1 ds v2 ds coulcar da coulfd da type ds getbytc 41 Serrf hi getbytc 25 Serrf v1 getbytc
26. le des saisies au clavier on ne risque pas de saisir caract res l o on en attend 3 ainsi l aspect de l cran est prot g L utilisateur reste toujours dans les zones qui lui sont allou es Fonctions du r pondeur Le principe de l ensemble est le suivant Un client un ami vous appelle en votre absence l apple d tecte cet appel connecte votre Minitel Votre client et n anmoins ami re oit alors la tonalit famili re aux habitu s du Minitel et connecte son propre Minitel avec la touche Connexion Fin Le dialogue peut s engager entre votre ordinateur serveur et l ami et ou relation d affaires I aura la possibilit de laisser un ou plusieurs messages qui seront enregistr s sur disque En fin de communication ordinateur serveur et Minitel se remettent en veille dans l attente du prochain appel Tout ceci se passe alors que vous tes fort loin de votre domicile bureau atelier Appelez chez vous avec un Minitel sous la main vous pourrez demander la lecture depuis votre lieu de vacances par exemple des messages t l matiques qui ont Dome n 34 Apple Christian Piard t laiss s sur l ordinateur Cet acc s vos messages est videmment prot g par un mot de passe Beaucoup de messages sont arriv s vous craignez la saturation du disque Vous avez galement la possibilit d effacer le fichier pour lib rer de la place Luxe suppl mentaire vous changerez si n cessaire l
27. me octet attend le 4 final attend n de port est ce un port s rle 43 2 56 Serr conf 1 2 av portint i r w s p1 initpi readpi vritepi statpi pii pifnit piread plwrlte pistat asl adc sta sta inc jsr jsr lda beu jnp lda jsr lda CMP beq jar rts ld jnP lda sta lda sta lda sta lda sta sta lda sta sta sta lda sta sec jar ldy lda sta dey bpl lda sta lda sta lda jsr ldy lda sta dey bpl rta da lda sta lda ora Sta sta sta sta sta ata sta sta sta sta lda ata lda sta lda ata lda sta lda asl as1 as1 asi sta rt3 mp jnp jmp jmp jmp da da da da da 88 data status status recoit recoit deuxc 3 errout C538 s4 c Sep 6470 8 47E 57C 4 3C 4 43 3D 3F S7ER 83E C311 1 BE30 y av y 1 00 8830 L C3 8831 7 cout l av y BE 30 y 2 z ESFE pint noslot L CH cn pilit i piinit 1 piread41 piwrlte 1 pistat 1 1 2 r 2 w42 942 scoop ptinit SC00E piread C00F piwrite co1o pistat noslot nO pil tPiinit piread pivrite piotat 0000 0000 30000 30000 0000 e rp n pO inverse 44 inverse jar envoiiB lda CSSD jmp envoi lt lt am mm am m m sm u w m m sss m ligne xligne j r envoll2 lda 5A jap envoi
28. puisqu il s agit parfois de versions pr alables de pre Release de documentations provisoires polycopi es qu Apple diffuse d s qu il le peut aupr s de ceux qui en ont besoin Cette politique d ouverture maximale semblerait premi re vue donner des armes la concurrence elle a en fait toujours fait le succ s d Apple Apple France s y met aussi apr s le serveur Apple en 36 14 Jean Y ves Bourdin voici D D A Documentations D veloppeurs Apple version fran aise de l APDA C est aupr s d elle que tout un chacun peut se procurer les documentations techniques sur le GS ou sur le Mac Toujours plus un IBM dans l Apple Avec la carte PC Transporter d Applied Engineering le MS Dos devient pour l Apple ce qu tait le CP M auparavant un deuxi me syst me d exploitation pour l Apple Cette carte n est pas un mulateur mais un v ritable IBM dans l Apple elle a n cessit un norme effort de d veloppement et d investissement Son prix justifie une tude un peu serr e de ses performances Tout d abord en dehors de toute utilisation du MS Dos cette carte qui entre dans n importe quel slot sauf le slot 3 ou le slot auxiliaire est la fois une extension m moire type Apple 768Ko et une carte contr leur de drives universelle pour l Apple elle pilote aussi bien les lecteurs GS 3 5 mais pas les Unidisk e et c que les drives 5 25 40 pistes double face type IBM vendus par App
29. ralentir sensiblement le fonction nement du programme Pom s n 34 Mais plus encore il est possible pour une colonne donn e de d finir un format pr cis par exemple la position des parenth ses et tirets s il s agit de noter des num ros de t l phones Par la suite 1 n y aura plus qu saisir les chiffres Bien s r si cette colonne a t coch e comme Non Unique et num rique on vitera de nombreuses erreurs de saisie En cas de donn es fortement r p titives comme les jours de la semaine on peut tablir un masque de saisie choix multiples gr ce a la fonction Barre de Saisie La gestion en m moire vive offre d autres atouts Ainsi Over Vue se passe tr s bien de la fonction Index pr sente sur toutes les bases de donn es conventionnelles quoi bon d finir des priorit s dans les recherches puisque m me les plus gros fichiers sont tri s en quelques secondes Il existe cependant un petit inconv nient cela les tris ne portant que sur une colonne la fois il faut ensuite effectuer un autre tri sur le crit re suivant le premier ordonnancement n tant pas oubli En plus du tri Over Vue propose le regroupement des fiches une fois Ki es Par exemple chaque ville d un fichier d adresses cr e un groupe qui sera s par des autres par une fiche sp ciale appel e sommaire Ce sommaire pernet d effectuer des calculs dans chaque groupe moyenne somme mini maxi compteur
30. s extraordinaires et personne ne le connait Que fait il D abord il compresse 50 les fichiers textes 40 les fichiers traitement de texte et base de donn es d AppleWorks et les d compresse ensuite bien s r En quelques communications avec Inter Pom s je le rembourse int gralement Au lieu de copier un fichier pour le ranger compressez le cela n est pas plus long et de toute fa on Documax vous permet de lire ces fichiers et de travailler dessus tant sous ProDOS 8 il tourne sur e c IIGS et accepte bien entendu tous les disques reconnus parProDOS Ensuite il permet de chercher une r f rence un nom un morceau de phrase un num ro de t l phone dans l ensemble de tous les fichiers texte ou AppleWorks que vous lui indiquez compress s ou non bien entendu il soccupe lui m me des catalogues ProDOS vous n avez jamais taper un nom de fichier Il vous cr e si vous le voulez un fichier de r f rences sur n importe quel sujet avec nom de fichier texte recherch avec son contexte num ro de ligne Vous faites ensuite de ce fichierune base de donn es ou bien vous coupez et coller linformation dans d autres fichiers Il segmente et fusionne les fichiers volont Il g re les catalogues ProDOS y compris l ordre des fichiers dans le catalogue Il est sain de temps en temps de nous rappeler que l inf ormatique ne sert pas cliquer des souris mais traiter et manipuler notre guis
31. 0 lt save0 gt 1 lt save0 gt 2 lt save0 gt 3 lt sa M Cn d marre M lt all gt lt sa C gt lt 0 gt 1 lt save0 gt 4 lt sa C gt lt 0 gt 2 lt save0 gt 4 lt s a C gt lt 0 gt 3 lt save0 gt 4 Milliers C lt all1l gt lt sa D gt lt 0 gt 1 lt save0 gt 3 lt sa D gt lt 0 gt 2 lt save0 gt 3 lt s a D gt lt 0 gt 3 lt save0 gt 3 lt sa D gt lt 0 gt 4 lt save0 gt 3 lt sa D gt lt 0 gt S lt save0 gt 3 lt sa D gt lt 0 gt 6 lt save0 gt 3 lt sa D gt lt 0 gt 7 lt save0 gt 3 lt sa D gt lt 0 gt 8 lt save0 gt 3 lt sa D gt lt 0 gt 9 lt save0 gt 3 lt sa D gt lt 0 gt 0 lt save0 gt 3 Centaines D lt all gt lt sa U gt lt 0 gt 1 lt save0 gt 2 lt sa U gt lt 0 gt 2 lt save0 gt 2 lt s a U gt lt 0 gt 3 lt save0 gt 2 lt sa U gt lt 0 gt 4 lt save0 gt 2 lt sa U gt lt 0 gt 5 save0 2 sa U 0 6 save0 2 sa U 0 save0 2 lt sa U gt lt 0 gt 8 lt save0 gt 2 lt sa U gt lt 0 gt 9 lt save0 gt 2 lt sa U gt lt 0 gt 0 lt save0 gt 2 Dizaines U lt al1l gt lt sa K gt lt 0 gt 1l lt save0 gt 1l lt sa K gt lt 0 gt 2 lt save0 gt 1 lt s a K gt lt 0 gt 3 lt save0 gt 1 lt sa K gt lt 0 gt 4 lt save0 gt 1 lt sa K gt lt 0 gt 5 lt save0 gt 1 lt sa K gt lt 0 gt 6 lt save0 gt 1 lt sa K gt lt 0 gt 7 lt save0 gt 1 lt sa K gt lt 0 gt 8 lt save0 gt 1 lt sa K gt lt 0 gt 9 lt save0 gt 1 lt sa K gt lt 0 gt 0 lt save0 gt 1 Unit s K lt all gt lt oa right gt lt sa gt Compteur lt al l gt lt if gt
32. 20 FIXE Voir aussi FLASH PARAMG PARAMT FLASH Syntaxe de l instruction FLASH But Passe en affichage clignotant Exemple 10 REM Exemple d utilisation de FLASH 20 FLASH Voir aussi FIXE PARAMQG PARAMT GR Syntaxe de l instruction GR But Passe en mode semi graphique Exemple 10 REM Exemple d utilisation de GR 20 GR Voir aussi PARAMG PARAMT TXT HAUT ne fonctionne pas en local Syntaxe de l instruction HAUT nombre But D cale l cran Vid otex vers le haut Explication nombre est une variable ou expression enti re qui indique l amplitude du d calage en lignes nombre doit tre compris entre O et 24 inclus Remarque HAUT vide le tampon d entr e des caract res voir PURGE pour le Macintosh 17 Exemples 10 REM Exemples d utilisation de HAUT 20 HAUT 10 30 HAUT N 410 40 HAUT N A Voir aussi BAS IDENT ne fonctionne pas en local Syntaxe de l instruction IDENT valeur 1 valeur 2 valeur 3 tat But Retourne les trois octets d identification du Minitel utilisateur Explication valeur 1 est une variable enti re dans laquelle IDENT retoume le code constructeur du Minitel utilisateur valeur 2 est une variable enti re dans laquelle IDENT retourne le type du Minitel utilisateur valeur 3 est une variable enti re dans laquelle IDENT retourne le num ro de version du Minitel utilisateur tat estune variable enti re dans laquelle on pourra trouver au
33. 34 Que font elles Chaque routine Pom Link a une fonction d envoi et ou de r ception de caract res vers ou depuis le Minitel servi Ainsi ii est plus agr able d crire dans son programme Basic DEPLACE 1 16 pour positionner le curseur en ligne 1 colonne 16 plut t que la suite d instructions ouvrir port s rie en sortie PRINT CER 31 CHR S 64 1 fermer port s rie R aliser un INPUT sur le Minitel servi en Basic est quasi irr alisable alors que celui propos ici est d j beaucoup plus puissant que celui de l AppleSoft Chaque nouvelle fonction offre chacun la possibilit de piloter un serveur sans pour autant maitriser les garements de la norme Vid otex il faut toutefois en dire un mot CERS 645416 Le Vid otex Dans le descriptif de chaque instruction figurent souvent des remarques du fait de contraintes Vid otex ct il faudra pardonner aux librairies de n avoir pas totalement supprim la jourdeur du syst me La couleur du fond qui repasse au noir lors d un d placement le soulignement qui n est valid qu apr s affichage d un espace par exemple sont prendre cn consid ration lors de la programmation Cons quence de ces petites contraintes certaines instructions ne fonctionne pas O au moins pas normalement pour certaines en local c est dire Minitel serveur non connect cela compliquera l g rement la mise au point Mise en uvre Une syntaxe
34. 4 Deplace 9 4 Paramd 1 7 4 0 0 Affiche R pondeur t l matiq ue GOSUB spCadresChoix ParamT 0 7 0 0 0 0 Deplace 8 11 Affiche Laisser un message Deplace 8 14 Affiche Fonctions de service Deplace 8 17 Affiche Quitter ce r pondeur Deplace 15 22 Affiche Votre choix Inverse Affiche Envoi T BoucleChoix Ghadbnes5z Accept 29 22 0 l ChaineS D ON Dr 1 GOTO DeconnexionF Cho ixImp2 Page2 Sommaire Guidel mp2 BoucleChoix BoucleChoix ChoixImp2 Deconnexion GuideImp2 GOSUB GuideIndisponible GOTO BoucleChoix Choiximp 2 IF ChaineS l1 OR Chaines gt 3 THEN GOSUB ChoixImpossible GOTO BoucleChoix ON VAL Chaine GOTO EnrMess age Service Quitte te Enregistrement du message EnrMessage VidEcran Deplace 3 2 Inverse ParamT 0 7 4 0 0 0 Affiche Enregistrement de votre message Gase l 2 1 83 2 0 105 2720 Deplace 1 5 Affiche VotBe nem TAHU TONG SE Ligne Affiche Inverse Affiche Suite Deplace 1 6 Affiche rer qo Pr nom 2 css Ligne Affiche Inverse Affiche Suite Deplace 1 7 Affiche T l phone uS SE Ligne Affiche z Inverse AfficheR Suite Chariot Normal Mode 2 Affiche Message FOR Index 11 TO 17 Deplace 1 Index ATOME ms nn NG Ligne Affiche Inverse Affiche Suite NEXT Deplace 1 20 Af
35. 4 HTAB 7 IF FLAG THEN PRINT TAB 5 160 INVERSE PRINT B VTAB 11 170 IF FLAG THEN HTAB 24 INVERSE GOTO 190 180 HTAB 13 FLASH 190 PRINT CS 200 VTAB 18 NORMAL HTAB d IF FLAG TH EN PRINT TAB 20 IF FLAG THEN PRINT A 210 PRINT Mettez votre imprimante en ma rche 220 VTAB 20 HTAB 8 IF FLAG THEN PRINT TAB 20 230 PRINT puis tapez sur une touche 240 WAIT 16384 128 POKE 16368 0 250 BRINT Do PREIlI CAEL 788 PRINT DS P R O 260 HOME IF FLAG THEN END 270 FLAG 1 GOTO 50 Pom s n 34 L un des reproches que l on adresse la version fran aise 1 4 d AppleWorks est qu eile n a pas en tableur les fonctions ROUND AND et OR de sa s ur 2 0 am ricaine pas plus qu elle ne poss de de programme de mailing Qu cela ne tienne SuperMacroWorks permet de contourner ces lacunes avec l gance Pour vous mettre en app tit Pom s vous propose d s ce mois ci et dans la nouvelle rubrique consacr e AppleWorks et SuperMacroWorks les trois macros AND OR ct ROUND Rappelons que les fichiers de macro commandes se pr sentent sous la forme de fichiers traitement de texte AppleWorks Une fois que vous avez modifi votre AppleWorks avec le logiciel SMW tout ce que vous avez faire est de charger le fichier de macros l appeler l cran et faire pour compiler celles ci et les rendre actives Les macros sont actionn es en appuyant simultan ment sur la touche et la
36. 413 Serrf h2 Ggetbytc 25 Serrf v2 getbytc 3 Serrf type getbytc 1lgnage getbytc 8 Serrf 40 coulcar getbytc 550 coulfd 558 deb horslim 1 kad F jeh k fes F ptr y envoicar 1 CSOA envoi S ll San SIE 564 12 520 S 4 540 S1F 1 PO EES chkcen virgule ptrget cherche variable varpnt varpnt l varnam si var enti re varnam 1 les 2 octets sont Sal nBgatitfs miserr 0 attend un instant c061 avant de renoncer 5onne a2 ED a D sonne pas El 3onne t 11 au 1 2 seconde vite les stintements attend hi Ho h2 V2 lignage couleur caract et couleur fond 41 42 Sliqnaqe Sdeb t00 s tol type2 11 SEO scg sfincolg colod da ida sec sbc cmp bec lda sec sbe cnp bec jsr lda sta lda beg Anc lda elc adc ata lda cnp bne inc lda sta 1da cmp beq lda sta lda sta bne lda sta sta lda sec sbc adc sta ldy id ata lda sta lda sta lda sta lda clc adc sta jsr ldy ida sta lda sta ida sta lda cie adc sta jsr ida sta sta lda clc adc sta lda clc adc sta inc ldy lda sta jsr lda clc adc enp bea lda ele adc sta ld cic adc zta inc 1 ldy type 52 dfb 104 57 27 Sh2 hl gt hal ida cd y sta caract Wai ar ra E C iR E Rd sassa Shi jsr colonne cnxr 2 ida v2 Nec iu Ui eres EL ere E A P QE errf
37. Essai 1 127 T avec dans A le caract re qui suit l amp en l occurence il doit s agir du token code du mot cl de PRINT c est dire BA pour le trouver il suffit de taper NEW 10 PRINT et de passer en moniteur pour lire les octets partir de 801 IF cmp debut BA beq ok jmp DEC9 SNERR routine qui stoppe le programme Basic avec le message syntax error ok jsr B1 CHRGET saisi le caract re suivant et avance le pointeur de programme d un octet Arriv s ici nous nous sommes assur s qu il s agit bicn de PRINT et le TXTPTR se pr sente ainsi 100 amp PRINT Essai 1 127 IF A T Nous pourrions maintenant par une suite de JSR CHRGET saisir les caract res afficher mais il est pr f rable de faire confiance l AppleSoft lda 0 R initialise le calcul des sta 52 chaines temporaires jer DD7B FRMEVL donne un Syntax Error si besoin FRMEVL est la routine d valuation des formules ce qui permettra l utilisation d expression complexe du style STR 3 AB ERR CHR 10 Elle value l expression qui d bute sous le TXTPTR et qui se termine par une virgule ou une fin d instruction ou de programme Le r sultat se trouve en FAC zone de 6 octets partir de 9D r serv e aussi pour tous les calculs sur les nombres en virgule flottante Si l expression valu e tait une chaine et c est le cas seuls deux octets nous servent AO SALT Ils forment un pointeur su
38. ICHE Fonctions de service amp PARAMT O 0 0 0 TU amp DEPLACE 32 12 amp AFFICHE amp I NVERSE amp AFFICHE Envoi amp DEPLACE 15 15 amp AFFICHE Pour renon cer E INVERSE amp AFFICHE Gomm aire MPS amp SECRET 9 12 0 Mot de passe 7 MP E ON NOT E GOTO 10000 ON E GOTO 3018 50 0 29000 3036 3017 500 3018 10 0810 GOSUB 5000 GOTO 3014 GOSUB 4000 GOTO 3014 IF MPS MOS GOTO 3028 ES ES 1 IF ES 1 THEN 6 ALERTE Mot de passe e rron 1 GOTO 3014 IF ES 2 THEN amp ALERTE Erreur encore un essai 1 GOTO 3014 amp VIDECRAN amp DEPLACE 10 12 amp AFFICH E D sol d connexion forc e GOTO 10010 ES 0 amp VIDLIGNE 12 0 6 VIDLIGNE 15 0 GOSUB 6000 amp DEPLACE 8 11 6 AFFICHE Lire les me ssages amp DEPLACE 8 14 amp AFFICHE Ef facer le fichier amp DEPLACE 8 17 amp AF FICHE Changer le mot de passe amp DEPLACE 15 22 amp AFFICHE Votre chol x amp INVERSE amp AFFICHE En voi CH w CH amp ACCEPT 29 22 0 1 CH E ON NOT E GOTO 10000 ON E GOTO 3070 30 00 3065 3066 3065 500 3070 10010 GOSUB 4000 GOTO 3050 GOSUB 5000 GOTO 3050 IF CHS lt 1 OR CHS gt 3 THEN GOSUB 700 0 GOTO 3048 ON VAL CHS GOTO 3100 3300 3500 REM lecture fic PRINT D open FIS 1255 PRINT D read FIS r0 INPUT LG IF LG 0 THEN PRINT D close
39. Inact3 document MacWrite baptis MacWrite 9 72 et contenant des Guidelmp9 Inact9 Sommaire At caract res en tailles 9 72 Ces caract res utilisent 1a police Times tenteService3 Deconnexion mais ici peu importe la police c est la taille qui cornpte Par Inact9 exemple si vous voulez ins rer dans un document le titre Section GOSUB spTouchelnactive 1 en Courier 72 GOTO AttenteService2 fermez votre fichier e rip grs GOSUB Guideindisponibjie ouvrez le fichier MacWrite 9 72 Pp s lectionnez et copier 72 ou seulement le 7 ou le 2 ME ne Tice e fermez le fichier MacWrite 9 72 IF Chaine 1 OR Chaine gt 3 ouvrez votre fichier THEN GOSUB ChoixImpossible e coller 72 l endroit o vous voulez placer votre titre GOTO AttenteService e taper Section 1 ON VAL Chaine GOTO Lecture s lectionnez Section 1 Effacer ChangeMot changer la police Courier dans le menu Caract res e supprimez 72 Le fichier Write 9 72 est sur la disquette d accompagnement de re Lecture du fichier Lecture Le nouveau syst me 4 2 est arriv avec les polices Laser Writer FIELD 1 2 AS zNombresS 8 AS zM n d ot 16 AS zNom 16 AS zTel GET 1 1 9 10 12 NombreMessage CVI zNombres 14 IF NombreMessage 0 THEN Alert 3 e Aucun message recu 1 GO TO AttenteService2 NumMessage NombreMessage i FIELD 1 16 AS uN 16 AS ops 6 AS uT 28 AS u1 28 A
40. Lire les messages enregistr s Quitter Pom s n 34 L ouverture d un nouveau fichier sera parfois n cessaire ne serait ce que lors de la premi re utilisation du serveur Dans ce but R pomdeur affiche une fen tre de saisie qui vous permettra l initialisation de vos nom ou raison sociale et num ro de t l phone ainsi que du mot de passe qui autorisera les fonctions de service distance lecture des messages remise z ro du fichier et changement du mot de passe Mot de passe de 4 7 caracteres R gt 2 et D gt 9 Nom jusqu 16 caract res affichables par tous les Minitel T l phone jusqu 16 caracteres affichables par tous les Minitel Mot de passe IUZBOO7 Nom Editions MEU T l 0 395 51 24 43 Le passage d une zone de saisie lautre se fait classiquement par un clic un retour chariot ou une action sur la touche de tabulation Certains contr les sont effectu s par le programme afin d viter les plus grosses erreurs de saisie ainsi pour emp cher l apparition dans le mot de passe de caract res difficiles voire m me impossibles saisir sur le clavier du Minitel on limite les possibilit s e Z et 0 9 Au cas o un ou plusieurs caract res se trouveraient hors de ces gammes l erreur est signal e par un bip suivi de l affichage en inverse du texte indiquant les possibilit s Le m me principe
41. PER 1 NumEdit i BUTTON 1 1 Annuiler 16 208 128 224 BUTTON 2 1 K 136 208 24 8 224 ON DIALOG GOSUB DialogueNou veau DIALOG ON DrSortie Faux BoucleD IF DrSortie THEN SortieNouvea u GOTO BoucleD SortieNouveau DIALOG OFF WINDOW CLOSE 2 IF NOT Dr THEN RETURN Fichier S FILESS 0 Nom du fich ier serveur J IF LEN Fichier THEN Dr Vra i ELSE Dr Faux RETURN OPEN R 1 FichierS 244 Pom s n 34 FIELD 1 2 AS zNombre 8 AS zM ot 16 AS zNom 16 AS zTel LSET 2NombreS MKIS 0 LSET zMot Mots LSET zNom NomServeurS LSET zTei o TelephoneServeur PUT 1 1 CLOSE NAME Fichier AS FichierS PR ep RETURN DialogueNouveau DIALOG OFF Dial0 DIALOG 0 ON Diai0 GOSUB BoutonD EditD RienD RienD RienD ReturnD Re turnD DIALOG ON RETURN BoutonD IF DrInverse THEN GOSUB Sign ale DrInverse Faux Diali DIALOG 1 IF Diall 1 THEN Dr Faux DrSor tie Vrai RETURN Mot EDIT 1 NomServeur EDITS 2 TelephoneServeur EDITS 3 LMot LEN Mot IF LMot 4 OR LMot THEN BEE P DrInverse 1 GOSUB Signale EDIT FIELD 1 MotS 160 12 9 248 144 DrSortie Faux R ETURN LNom LEN NomServeur IF LNom 1 OR LNom 16 THEN BE EP DrInverse 2 GOSUB Signal e EDIT FIELD 2 NomServeurs 94 153 248 169 DrSortie Faux RETURN LTel LEN TelephoneServeur IF LTel l OR LTel 16 THEN BE EP DrInverse 3 GOSUB Signal e EDIT FIELD 3 TelephoneSe rveur 54 177 248 192 Dr So
42. SBi 25 031A A9 OO 16 Ida 0 03Acs 85 52 27 sta 52 031E 20 78 DD 18 jsr SDD7B 19 0321 20 6C DD 20 jsr ale 21 0324 AS AO 22 ida A0 0326 85 85 23 sta 35 0328 A5 A1 24 Ida SA 032A 85 86 25 sta 86 26 032C 20 F5 Ee 27 jsr SE6FS 032F 86 06 28 stx Se 29 0331 20 FS Ee 30 jsr SEerh 0334 86 07 31 SEX 7 32 0336 A9 00 33 lda 0 0338 85 O8 34 sta 8 033A 20 B OO 35 jsr SB7 0332 FO OD 36 beq CR 033F C9 3H 37 cmp 938 0341 DO C6 38 bne 1 0343 20 Bl OO 39 jsr B1 034 4C 4E 03 40 jmp PASCR 41 0349 4C C9 DE 42 2 jmp SbEC 43 034C C6 O8 44 CR dec 8 45 Pom n 34 034E AS 0350 Ge 0352 90 0352 JG 0357 A5 0359 C3 035B FO 0350 C9 035r Do 0361 AD 0364 8D 0367 AD 036A BD 036D A8 036F 8D 0372 AS 0374 09 0376 8D 0379 AQ 137 BEN CR 037D 99 0380 88 0381 10 0383 C8 0384 C6 0386 30 0388 Bi 038A 09 038C 25 038E 20 0391 4C 0394 24 0396 10 0398 A9 039A 25 039C 20 039F AD 03 32 8D 03 5 AD 03A8 8D O3AB 60 03AC A939 OS3AE 4C Des transmissions intelligentes Pom s n 34 05 08 03 AC 03 BE 03 BE 03 BE BE 00 ED 03 FD 03 03 BE BE PASCR err pertok pfok 1 2 fin sertie rgerr ancvec ida CMD cc jJ mD ida cmp bea cmo Done laa sta lida sta lda sta ida ora sta ldy lda sta dey bol iny dec Da ida era and JSI jme bit bpl lda
43. Voulez vous PR INT PRINT l activer le serveur PRINTY 2 lire les messages BRINT 3 effacer les messages PRINT 4 guitter ce programme PRINT PRINT VTAB 23 PRINT Votre cholx G EISe BRINT ON RS lt J OR Rp gt g GOT O 9060 ON VAL R GOTO 40 9100 9400 9080 HOME END PRINT PRINT PRINT D open FI 1255 PRINT D read FIS r0 INPUT LG PRINT D IF LG 0 THEN PRINT D close PRINT A ucun message recu PRINT PRINT GOTO 9 020 PRINT Vous avez LG message IF LG gt 1 THEN PRU NT at PRINT PRINT INPUT N du message lire 0 pour finir Ji N19 N1 VAL Nl1S IF Nl lt 0 OR N1 gt LG THEN PRINT De 1 MG MU GORO 1250 ON NOT N1 GOTO 9250 PRINT PRINT Message n NI PRINT D read FI r N1 FOR I m TO 3 INPUT A PRINT gt AS NEXT FOR I 1 TO 7 INPUT AS PRINT AS N EXT PRINT D GOTO 9150 PRINT D close GOTO 9020 PRINT PRINT Ok pour effacer TOUS les m essages INPUT R pondre OUI pour effacer N1 O N NAS lt gt OUI GOTO 9500 PRINT D open FI 1255 PRINT D write FI r0 PRINT 0 PRINT M Oo PRINT TES PRINT NOS PRINT D close PRINT PRINT PRINT Messages effac s GOTO 90 20 PRINT PRINT Ordre annul GOTO 9020 REM fin amp d connexion amp VIDECRAN amp DEPLACE 10 12 amp AFFICH E Au roWb1r PRINT D close DECNX GOTO 40 amp VIDECRAN amp DEP
44. Z Z 102 6 AFFICHE 103 amp AFFICHE Z g c 104 6 AFFICHE e WOS be e 7 ctia 106 amp AFFICHE KAG e 107 amp AFFICHE CG _ A 108 6 AFFICHE amp AFFICHE 6 AFF ICHE amp AFFICHE _ e 109 amp PARAMT 1 2 0 0 0 0 amp AFFICHE La re vue des Apple 110 amp HAUT 12 amp BAS 4 ARAMT 0 2 0 0 0 0 112 6 AFFICHE CHRS 18 CHRS 86 amp DEPLACE 12 18 amp PARAMT 0 3 0 0 0 0 DEPLACE 9 1 amp P Pom s n 34 119 120 199 200 210 220 230 240 250 260 270 op A D umnuntuunnunnunaunu ununuanunuqnananana an eene CH DOTTER nn on oo gg AHORRO amp a a a a a a a a a DH SSSR ETES lt Zb amp AFFICHE CHRS 18 CHR 92 amp MTH 0 FOR I 1 TO 1000 NEXT REM En 2eme page amp VIDECRAN amp CADRE 1 1 40 7 2 0 5 0 amp CADRE 1 8 40 207230 99 amp DEPLACE 4 3 amp AFFICHE Vous etes bi en au TES amp DEPLACE 4 5 6 MODE 2 amp AFFICHE NOS amp DEPLACE 4 10 amp AFFICHE Votre interi ocuteur est un amp DEPLACE 4 12 amp AFFICHE ordinateur pple pr et enregistrer
45. avec tat avant retour au programme Basic les points de la zone Pom s n 34 de saisie situ s sur des positions inutilis es sont effac s e lorsqu un message est affich dans la ligne 0 une action sur le clavier du Minitel provoque l effacement de ladite ligne e les caract res et sont remplac s par un point uniquement avec l Apple comme serveur Exemples 10 REM Exemples d utilisation d ACCEPT 20 ACCEPT 5 8 1 Nom 12 CH ETS 30 ACCEPT COS LIS 1 1 A s 10 C ETS 40 ON T 41 GOSUB 100 200 300 400 500 Voir aussi ACCEPTF SAISIE et SECRET ACCEPTF ne fonctionne pas en local Syntaxe de l instruction ACCEPTF tat But Attend pendant 2 minutes maximum une action sur une touche de fonction Explications tat est une variable enti re contenant au retour le code de la touche de fonction e tat pas de caract re saisi depuis plus de 2 minutes voir le paragraphe C t utilisateur e tat 1 ENVOI ou retour chariot e tat 2 RETOUR e tat 3 REPETITION e tat 4 GUIDE tat 5 ANNULATION e Cat 6 SOMMAIRE e tats 7 SUITE e tatz 8 CONNEXION e tat 9 CORRECTION C t utilisateur Si le clavier du Minitel n est pas sollicit pendant une minute ACCEPT met un bip et affiche le message D connexion imminente dans la ligne 0 Si rien ne se passe pendant la minute suivante il y a retou
46. compatibilit s incompatibilit s Une excellente nouvelle tous les TimeOut sauf UltraMacros sont enti rement compatibles avec Pinpoint l installation vous patchez d abord AppleWorks avec TimeOut puis vous y installez Pinpoint Une fois AppleW orks charg il suffit de faire P pour acc der Pinpoint et G Escape pour acc der TimeOut Du coup et c est sans doute pourquoi Beagle ne crie pas sur les toits cette bonne nouvelle il me semble que les TimeOut qui doublent les accessoires de Pinpoint Correcteur accessoires de bureau par exemple ne sont pas indispensables qui a d j Pinpoint D autant que Pinpoint lui s installe aussi dans Basic System W ord Perfect et autres et pas seulement dans AppleW orks et permet avec Pinpoint ToolKit de programmer soi m me ses propres accessoires De plus Pinpoint reconnait aussi AppleW orks 1 4 fran ais m me si certains des accessoires tels le Speller ou les macros KeyPlayer ne marchent qu avec AppleW orks am ricain Deuxi me bonne nouvelle les TimeOut sont compatibles avec Super MacroW orks et AutoWorks Mais ces deux programmes de macros ainsi d ailleurs qu UltraMacros ne sont pas eux m mes compatibles avec Pinpoint sauf AutoWorks qui offre une option de choix du banc m moire aux propri taires d une carte d extension m moire type RamW orks ou MultiRam sur e ou c Les gourmands qui voudront avoir tout en m me temps Macros ET
47. des messages Fichier D marrer avec un fichier existant D marrer avec un nouveau fichier Lire les messages enregistr s Nous ne parlerons ici que de la lecture des messages sur le Macintosh la consultation du fichier distance sera voqu e un peu plus loin Hessage 7 7 ROUGERSN Jacques 39 51 24 43 J ai lu qu il existait un micropracesseun pour Apple c Pouvez vous m indiquer o je puis le trouver ainsi que son prix Je Vous remercie d avance oc0co 6066 6 46 4900000000000P9nunnun u4SUR HRS Le premier message affich est le dernier requ Les boutons Pr c dent et Suivant seront utilis s pour passer d un message l autre Le bouton Vider permet la remise z ro du fichier apr s confirmation bien s r Uoulez uvous effacer le contenu du fichier Fichier serveur 3 manner a Cot Minitel servi Apr s affichage des crans de pr sentation votre correspondant se trouve devant une page qui lui propose trois choix possibles 1 Laisser un message Pom s n 34 M M 2 donne acc s diff rentes zones parfaitement contr l es par votre Macintosh serveur qui permettent la saisie dun nom obligatoire pr nom num ro de t l phone et message de 196 caract res 7 lignes de 28 caract res Nous avons particuli rement soign l ergonomie du serveur pour la partie utilisa
48. des pointa 2 lhor positionne curs san fin de chaine nbcor par d faut lver positicn debsais varpnt 1 varnam varnam 1 al miserr 0 sinit compteurs al depasst al initcpt H tempo 1 tempotl 1 tempot 1 tpadep getcar lg 0 200 F carrecu Anitept al 11 effal carrecu 13 retour chariot 3 fnrecu soui e envoi 10 touche fonction fnrecu deb4 sincr compteurs jattend un car rcompteurs A Q soul LO carrecu Carrecu 13 transforme RC 00 en envoi 1 7 01 9 01 Seil 1 1 satocke tat dans varpnt y variab enti re 0 varpnt y 34 tpsdep lda depasst beq 0 jap nonrp 0 lda 1 sta al sta depasst l y 0 1 l a decio y beg 2 jsr envoi iny one 1 2 jar Anitcpt1 jmp debs Source PL 3 1 minute inactif 2 fois fln j re nlnute message d alerte Assembleur ProCODE L CSSS gd A e d r E d affiche affiche jsr chkcom lda 0 sta 52 jsr frnmnevl jsr chkstr lda facmo sta forpnt lda facmo l sta forpnt l ldy 0 lda forpnt y tax ldy 2 0 lda forpnt y dey sta ptr y cpy 0 bne 0 1 dex bal Sfin ida Iptr Yy Jar envoicar iny jep Si Stin jsr chrgot beg cr cmp 3B beg Sfinl rts f n1l jmp cnrget cr lda 10 jsr envoi lda f13 jmp envoi a alerte n e Ae e EA We be be Ae Se Se oe em alerte jsr chkcom lda 0 sta 52 jsr frmevl jsr chkstr
49. en assembleur pr sent ici est une volution de celui de Christian Gu rin paru dans le num ro 3 de Pom s Il fonctionne S dans les m mes conditions et mm s utilise de la m me fa on L volution r side dans le fait qu il d termine la nature de l cran et donne aussi bien la copie d un cran en 40 colonnes qu en 80 colonnes Il fonctionne sous ProDOS et DOS S Le petit programme BASIC ci joint donne un exemple d utilisation Comment faire Il suffit de saisir et sauvegarder la r capitulation TXT DMP C sauvegarde BSAVE TXT DMP C A 300 L 60 Le programme se charge en page 3 ce n est pas tr s original mais sous ProDOS quelle simplification donc l une des premi res lignes de votre programme Basic sera 20 PRINT CHR 4 BLOADTXT DMP C A chaque fois que vous avez besoin d envoyer une copie d cran un p riph rique ce sera bien souvent l imprimante faites PRINT CHR 4 PR 1 CALL 768 PRINT CHRS 4 PREO Ceci dans le cas ou le p riph rique destinataire est connect au port l Veillez ce qu il n y ait pas d cho l cran lors de l envoi des caract res au p riph rique l imprimante sinon l cran sera d figur au fur et mesure de l impression En principe un PRINT CHR 9 80N avant le CALL 768 r gle ce petit probl me noter enfin que le fichier binaire s appelle TXT DMP C mais qu il conviendra toute imprimante Pom s n 34 Source T
50. engendr uniquement par la n cessit purement commerciale de couvrir tout le terrain de ce qui se vend d j bien sur Apple les accessoires Pinpoint en l occurrence Les fonctions de ces accessoires de bureau sont tout aussi bien remplies soit par AppleWorks lui m me la calculette le tableur le bloc notes le traitement de textes soit par des macros SuperMacroWorks calendrier adresseur d enveloppes composeur t l phonique horloge conversion ma juscules minuscules d compte des mots d un texte et m me l encryptage des fichiers Beagle ne nous avalt pas habitu s ce genre de frivolit s Quoi qu il en soit labonnement Pom s ses disques et ses programmes de macros pour SuperMacroWorks est un bien meilleur investissement que les TimeOut DeskTools Mais me direz vous les publicit s de DeskTools partent d un utilitaire de conversion des donn es qui permet de passer directement par le presse papier sans l interm diaire d un fichier DIF sur disque des cat gories de la base de donn es dans des colonnes du tableur et vice versa et c est quand m me plus pratique qu une macro qui passe par un disque m me un disque Ram comme celui de la carte Speedisk n est ce pas Bien s r mais ce que les publicit s ne disent pas c est que cet accessoire est galement fourni en prime avec TimeOut Graph et TimeOut UltraMacros PinPoint TimeOut Macros
51. est utilis pour la saisie des nom et num ro de t l phone dont la longueur est v rifi e afin que l affichage des chaines de caract res ne provoque pas de d sordre sur l cran du Minitel servi Mot de passe de 4 7 caract res A gt Z et 0 gt 9 Nom jusqu 16 caract res affichables par tous les Minitel T l phone jusqu 16 caracteres Mot depasse FETE Nom Editions MEU T l 1 39 5124 43 B RHREEOHPSBERSRRERSERRRSERERERARERERRARERRRISPAIHLTARGAEZAAARUGARREEZEREZRRISUSTSEGEUERUGAGRORACERORAOUREOEE rana na NE NE mnqnanananananansarar SE WS Le bouton OK confirine vos choix et si le contenu des zones de saisie est valide les v rifications sont faites lors de la sollicitation de ce bouton une seconde fen tre apparait autorisant le bapt me du fichier serveur Une fois le fichier nomm et si vous n utilisez pas le bouton Annuler le serveur d marre avec le nouveau fichier Quand le Macintosh sert SOn cran affiche un minimum d informations Il s agit de Attente d un appel Commande pour interrompre le serveur lorsque le Macintosh est en attente d un appel Appel regu attente de connexion en attendant que votre correspondant appuie Sur Connexion Fin Connexion ok serveur actif connexion n N quand le Macintosh converse avec le Minitel servi N repr sente le nombre de connexions depuis le lancement de R pomdeur Lecture
52. ici regroupe une quarantaine d instructions nouvelles orient es t l matique ajout es celles de votre Basic AppleSoft sur l Apple Basic Microsoft 2 0 et plus sur le Macintosh Cette version comporte le n cessaire la r alisation d un v ritable serveur Vid otex qui n aura rien envier aux serveurs du 3615 Pom Link 2 1 est publi e dans ces pages donc aussi sur lcs disquettes d accompagnement Macintosh et Apple Les sources de la version Macintosh beaucoup trop volumineux n ont pas pu tre plac s dans ces pages mais ils sont toutefois sur la disquette Mac 34 La version 3 0 disponible en produit part ouvre la porte au mode t l informatique style CalvaCom mode ASCII 80 coionnes mais va galement pius loin dans l exploitation du mode Vid otex Elle donne galement l cran de l ordinateur serveur un cho des entr es sorties utiles pour rechercher les bugs Pourquoi des librairies Certes Pom s pouvait publier comme produit unique et final le r pondeur t l matique donn en exemple mais le r sultat aurait t fip De nouvelles instructions ajout es au Basic pennettent chacun demodifier simplement ce r pondeur et de l adapter ses bcsoins decr cr son propre serveur sp cialis Les librairies permettront de mettre en uvre votre imagination De plus ne doutons pas qu elles serviront de base bien d autres programmes dans les prochains num ros Pom s n
53. le TXTPTR se pr sentant ainsi 100 amp PRINT Essai 1 127 IF T Il faut lire ie prochain caract re du Basic mais sans incr menter le TXTPTR au cas o ce ne serait pas un point virgule C est l objet de CHRGOT semblable CHRGET mais sans incr ment au sortir de CHRGOT le caract re lu est dans A et le bit Z du registre d tat est positionn si on tait en fin d instruction ida 0 initialise 1e drapeau de retour sta 8 chanot jsr B7 Chrgot beq cr si 0 il n y avait pas de cmp 3B est ce bne 1 jsr B1 saute le jmp pascr 1 jmp DEC9 Syntax Error cr dec 8 note qu il faudra un rctour chariot pascr 25 Dans notre exemple le TXTPTR n a pas boug puisqu il n y avait pas de point virgule 100 PRINT Essai 1 127 IF A T Nous avons tous les l ments nous devons les contr ler lda 6 cmp 8 pas de port au dessus de 7 bcc portok err jmp rgerr donne Range Error portok lda 7 PF vaut 127 ou 255 cmp 5 7F beq pfok cmp FF bne err sinon Range Error pfok Il faut maintenant rediriger la sortie de caract res vers le p riph rique choisi Le mieux sous ProDOS est de remplacer le PR slot par une modification du vecteur de sortie de caract res dans VECTOUT en BE30 BE31 sauvegarde l ancien vecteur remplacement par CA00 n tant le num ro de port pfok lda BE30 Sauvel ancien vecteur sta ancvec Jda SBE30 1 sta ancvec4l lda
54. lt input gt 1 0 j lt r tn gt lt msg gt R sultat du OR A asp if Xmsg lt msq gt AND premi re expression p uis RETURN input aif msg gt msg AND deu xi me expression puis RETURN input 1 0 0 rtn gt lt msg gt R sultat du AND R lt asp gt int lt msg gt msg Expression arrond ir puis RETURN input 005 100 100 lt rtn gt lt m sg gt Arrondi deux d cimales END Quelques mots d explication sur ces macros Elles tirent parti de trois formules classiques e pour l arrondi 2 d cimales INT Expression 005 180 100 e pour OR IF Exprl 1 lF Expr2 1 0 il suffit que Exprl ou Expr2 soit v rifi e pour que la formule renvoie 1 e pour AND IF Expl 3IF Exp2 1 0 0 il faut que Exprl et Expr2 soient v rifi es pour que la formule renvoie 1 L ntroduction des expressions se fait par la fonction input la macro s arr te et attend l entr e de texte au clavier La macro reprend aussit t apr s un Return au clavier qui n est pas ajout l input Pour que la macro soit compr hensible il faut faire pr c der input de la fonctton msg qui permet d afficher un message au bas de l cran en caract res normaux inverses ou Mouse Text Dans le cas des macros ci dessus la s rie d espaces entre efface le d but de la ligne o va s inscrire l input et le message proprement dit e
55. mais se comporte comme une fiche ordinaire pour les tris et s lection Ces possibilit s sont souvent offertes dans les autres logiciels avec le module rapports rarement l cran Les possibilit s de recherche et de s lection sont tout fait classiques et rien ne manque OverVue pr sente en outre deux caract ristiques qui le rapprochent du tableur un nombre important de fonctions de calcul et la possibilit de repr senter les donn es sous forme de graphiques On peut ainsi remplir une colonne d une valeur fixe ou d une s rie ajouter les valeurs de deux colonnes dans une troisi me multiplier ce r sultat par trois le diviser par 2 et envoyer ie tout dans la colonne suivante Le tout peut tre assorti de fonctions logiques Certes il n y a pas de fonctions math matiques et Pom s n 34 Lejeune financi res mais l accent a t mis l o il le faut pour un fichier l alphabet Une douzaine de fonctions sur les chaines de caract res sont en effet disponibles extraction rep rages de chiffres conversion majuscule minuscule rotation A Le module graphique est simple mais il est impossible d imprimer un graphique partir d OverVue il faudra le transf rer via l album On touche i un point crucial du logiciel En effet OverVue n utilise pas l ImageWriter ni la Laser Writer en mode graphique I utilise le propre g n rateur de caract res de l imprimante Ainsi Over Vue se limite aux s
56. mais moins efficace un di se H juste apr s le nom de l instruction Vous obtiendrez alors ALERTE Interdit 1 ALERTE Interdit 1 Notons enfin que le nom des instructions peut tre saisi indiff remment en majuscules ou minuscules ainsi AfficheR Bonjour chez vous est aussi valide que AFFICHER Bonjour chez vous PoM S SUR MINITEL 1 39 53 04 40 DES AUJOURD HUI NOUS RESERVONS CE NOUVEAU NUMERO DE TELEPHONE A VOS MINITELS TROUVEREZ A TITRE DE DEMONSTRATION LE REPONDEUR TELEMATIQUE DE CE NUMERO NOUS Y AVONS ADJOINT UN MODULE SUSCEPTIBLE D ENREGISTRER DES COMMANDES Optimiser HGR Minitel En ajoutant la ligne suivante au programme de conversion HGRMinitel du num ro 33 de Pom s on gagne un temps pr cieux 50135 IF MN THEN 50160 x Pour convertir Lady il faut avec cette Jigne 2 55 et 4 45 sans G Lauvergnier Rennes ACCEPT ne fonctionne pas en local Syntaxe de l instruction ACCEPT colonne ligne mode sollicitation longueur retour tat But G re une zone de saisie contr l e Explications colonne et ligne sont des variables ou expressions enti res indiquant la position de la zone de saisie sur l cran du Minitel colonne doit tre compris entre 1 et 39 inclus ligne doit tre compris entre 1 et 24 inclus mode est une variable ou expression enti re d signant la taille des caract res utilis s lt mode O taille normale e mode 1
57. origine The Bridge MultiScribe 2 0 logiciels d astrologie Astronomie G n alogie sur Apple Mac IBM et tous logiciels de d monstration en version limit e Club informatique ForlNext 15 square Costes 91070 Bondoufle 64 97 67 09 CalvaCom C110 amp PB16 Vends machine crire IBM sph res 1500 F Maurice Trecul 3 boulevard de Verdun Moigny sur cole 91490 Milly la For t 1 6498 4235 o Boue Auf wiedersehen Comme promis nous avons tir au sort des noms parmi les bulletins d abonnement depuis parution du dernier num ro M Michel Cosset de Caudebec en Caux re u un traitement de textes M Jean Rumeau un trai tement de textes doubl d un programme de mailing M Patrice Verdun de Villiers le Mahieu un traitement de textes et M Bertrand Guillin d Epernay un tableur F licitations et rendez vous au prochain num ro pour le r sultat de notre sondage et un autre tirage au sort parmi les abonn s rappelons que nous offrons programmes de valeur et documentation techniques VOVA Probl me 34 par Jo lle Piard Esp Ea rE KIK Z u zz wang LL F z qe UL B S Bab A amp E im ts wm pg adha akui Nous avons d couvert qu on peut avoir le sens des affaires Avoir le sens des affaires est devenu monnaie courante R en n est plus bana
58. retour dans le programme Basic e tat 0 si le Minitel utilisateur n a pas r pondu e tat 1 1 sur le Macintosh si le Minitel utilisateur a r pondu normalement Remarques Si tat 0 le contenu de valeur 1 valeur 2 et valeur 3 est ind fini e sur le Macintosh IDENT vide le tampon d entr e des caract res voir PURGE certains Minitel sont munis d un logiciel qui ne permet pas l mission des identificateurs dans ce cas tat sera gal Exempte 10 REM Exemple d utilisation de IDENT 20 IDENT V1 V2 V3 ET INIT uniquement sur l Apple Syntaxe de l instruction INIT slot But Initialise les routines sur le slot indiqu et v rifie l existence du port s rie Explication LENAN LEKAK ENG III slot est une variable ou expression enti re qui indique quel port s rie devra tre utilis pour les entr es sorties Exemples 10 REM Exemples d utilisation de INIT 20 INIT 2 30 INIT SS Voir aussi SERVOFF INVERSE Syntaxe de l instruction INVERSE But Passe en affichage invers Exemple 10 REM Exemple d utilisation de INVERSE 20 INVERSE Voir aussi NORMAL PARAMG PARAMT LIGNE Syntaxe de l instruction LIGNE But Initialise le mode lignage ou soulign Explications si le Minitel utilisateur est en mode semi graphique LIGNE passe l affichage en mode lign caract res semi graphiques dis joints si le Minitel utilisateur est en mode texte LIG
59. rouleau Remarque ROULEAU vide le tampon d entr e des caract res voir PURGE pour le Macintosh Exemples 10 REM Exemples d utilisation 20 REM de ROULEAU 30 ROULEAU 1 40 ROULEAU R 50 ROULEAU R zO0 SAISIE Syntaxe de l instruction SAISIE caract re But Retourne une chaine contenant le caract re frapp sur le clavier du Minitel utilisateur ou une chaine vide si aucun caract re n a t sollicit Explications caract re est une variable chaine qui re oit le caract re ventuel Si le code ASCII du caract re retourn est inf rieur 32 espace l utilisateur a sollicit une touche de fonction e ASC caract re 1 ENVOI e ASC caract re 2 RETOUR e ASC caract re 2 3 REPETITION e ASC carac re 2 4 GUIDE e ASC caract re z 5 ANNULATION e ASC caract re 6 SOMMAIRE e ASC caract re 27 SUITE e ASC caract re 28 CONNEXION e ASC caract re 9 CORRECTION e ASC caract re 13 RETOUR CHARIOT Remarques e sur le Macintosh lorsque le tampon d entr e contient plusieurs caract res le caract re retoum par SAISIE est le premier caract re entr non lu voir PURGE e les caract res dont les codes diff rent sur le Minitel et l ordinateur serveur sont recod s Exemple 10 REM Exemple d utilisation de SAISIE 20 SAISIE C Voir aussi ACCEPT ACCEPTF SECRET 21 22 SANSLIGNE Syntaxe de l instruction SANSLIGNE But Ini
60. sangle haut gauche l gnag0 dfb 559 518 sta varpnt y angleg coulc dfb 40 1B Pla ahd y sangle haut droit coulf dfb 50 beq Me Ce angled angleg dfb 500 Jar wait graphl y type E 1 graph caract dfb 00 912 ldy 0 graph0 type 2 texte repet dfb S4D Sbcl lda S copyr y Svi sposition vert angled dfb 00 peq Sfine lh dfb 3 70 923 5F eor A5 940 lb dfb 23 570 97E Jar envoi vert cd dfb S6A 35 7D iny ligne trace lig du haut cd dfb 35 6n 7B bne S bcl Stype caract ligne bas ahg d b 60 37 S00 finc jsr wait attend 1 instant lbry shd dfb 530 S6R S 00 Jar wait caract abg dfb S22 75 00 Jsr wait abg Y angle bas gauche abd dfb 21 7A 500 jsr wait angleg graph1 dfb S 0E SOE SOF ida 12 efface l cran et abd y sangle bas droit jmp envoi sort angled Wa echoue mp decnx decnx et sort v2 position vert chariot essai de 1 ee 2 dfb 104 57 27 111 57 27 40 Scopyr DER S BA SES SEA G SB7 SCH SBA vert chariot jsr chrgot DFB ES SES4 SRE 9C SDA SAS ligne trace lig du bas beg Siseul DFB SBA SEF SED SEB SCA SDC C4 0 annule les angles cmp DFB 00 5 85 D6 C0 D7 D3 angleg beg 00 DFB CO DO D7 85 F5 GC CB angled jmp snerr DFB FA SES SCC SCH SCE 85 Shi colonne gauche lseul ldx 1 DFB 97 588 594 SBA SEE SED D5 position horiz ane 0 DER S CA S 00 D7 5 85 9E4 D5 S4D 00 jsr getbytc DFB D5 C8 SCH 85 SEC SEC 85 hori cpx 25 DFB c0 D1 85 88 C4 C6 vl
61. seul moyen apr s avoir fait le n cessaire avec le tableau de bord est de l teindre Le GS refuse le moindre risque de perdre un fichier du disque Ram Comme il est aussi prot g contre les micro coupures d lectricit vous avez le temps de prendre un caf avant qu il oublie r ellement ce qu il a en m moire et que vous puissiez le rallumer Heureusement il y a un autre moyen faites G control option reset et l autotest de votre machine d marre Attendez un peu puis faites G control reset pour red marrer le disque Cette fois ci le GS vous ob it Puisquil y a d j un red marrage chaud ct un red marrage froid ceci doit tre un red marrage glacial Roger Wagner m a crit trois pages pour expliquer les raisons et formes de sa protection de Softswitch En gros il s agit d viter s agissant d un programme que l utilisateur met sur toutes ses disquettes une diffusion ou un passage involontaires dans le domaine public Tout est copiable mais l installation du programme met un signe dans votre machine pour qu il ne puisse pas marcher sur une autre Ceci dit la derni re parution de Roger Wagner Merlin 8 16 est un programme normal non prot g Et si quelqu un devait craindre Ie passage dans le domaine public c est bien Bill Basham de Diversified Software Research dont le Diversi Cache qui s int gre carr ment au ProDOS 8 acc l re de fa on consid rable la lecture et l criture su
62. sur disque sont progressivement d taill es modifications du nombre de pistes de secteurs d octets ou de nibbles pr c dent des m thodes franchement abominables nouvel encodage des nibbles allongement des temps de Synchronisation synchronisations angulaires Enfin apparaissent les m thodes quasi incopiables interpistes ou spiraling par exemple Pour illustrer ces m thodes l auteur pars me les chapitres des listings des principales routines tudi es nouveau seulement des routines de protection aucun listing n est fourni pour d crypter Il ne reste plus au lecteur qu prot ger ses programmes en cr ant un cocktail de sa composition pour faire amplement transpirer les h ritiers d Aldo Reset MatStatMath Logma SA 12 rue d Anjou 78000 Versailles 450F Il ne s agit pas l d un livre mais d une disquette propos e en annexe dans l ouvrage Excel efficace publi chez Cedic nathan MaiStaiMath regroupe un grand nombre de mod les de calcul utilisables avec Excel et destin s au tudiants professeurs ou plus g n ralement tous ceux qui ont besoin de manipuler des statistiques ou nombres sous toutes leurs formes Cette disquette contient galement une police de caract res en taille 6 points baptis e MicroCaract res MatStatMath est commercialis e par Logma SA soci t qui distribue aussi les fantastiques cartes S peedisk pour Apple Le livre de PostScript par Bernard Pa
63. vous servez plus aussi facilement qu on efface un fichier du bureau Mais une application comme TimeOut Graph charg e de faire des graphiques avec les fichiers tableur prend elle seule 56Ko sur le bureau d AppleWorks avec une machine de 128Ko l Apple courant vous ne pourrez pas charger en m me temps que l application le fichier tableur qu elle doit traiter I faut donc soit avoir suffisamment de m moire pour ne pas tre g n soit renoncer aux TimeOut et quitter AppleWorks pour utiliser des programmes ind pendants de lui en l occurrence Visualizer de PBI ou Graphic Edge de Pinpoint Inutile donc de pr ciser que les TimeOut sont compatibles avec pratiquement toutes les sortes de carte m moire qui permettent d tendre le bureau d AppleWorks il s agit ici d une n cessit Troisi amp me point savoir il vous faut de la place sur disque pour placer vos fichiers TimeOut puisqu en fait c est Pom s n 34 AppleWorks qui enfle Si vous avez un lecteur 3 5 ou un disque dur pas de probl me les TimeOut sont d ailleurs livr s la fois sur disquette 5 25 et sur disquette 3 5 Si vous avez un M ga de Ram vous pourrez vous d brouiller Mais si vous n avez que 128Ko et deux lecteurs 5 25 il va falloir jongler au d but vous pourrez placer vos applications TimeOut sur votre disque de donn es Mais elles risquent vite de remplir la disquette Bref avec les TimeOut c est non seulement AppleWor
64. 0 8D 14 18 20 F5 E6 20 FE 10 8A C9 08 90 1A40 3E AF 6A AA 7A AA 7B C2 00 41 65 FD 42 65 FB 43 12BH0 03 4C BD 18 69 40 8D DE 18 69 10 8D 20 16 A0 OC 1A50 65 E5 48 65 E5 41 61 CO 43 61 Ei 48 61 El 43 69 1800 B9 0A 18 20 10 19 88 10 F7 60 OF 67 12 5F 40 1B 1A60 E9 48 69 E9 43 BF EF 48 6F EF 41 75 FC 48 75 F5 1810 50 1B OE 41 40 1F 14 20 F5 B6 FO 29 BO 2B BE B8 1A70 4B 63 DC 00 C7 08 49 OC EC OC 35 OD 98 OD D3 OD 1820 18 20 F5 E6 EO 19 BO 21 8E BA 18 20 F5 E6 EO 29 1A80 D8 OD B3 OF DE OF F5 OF F9 10 EE 10 03 1b 43 13 1830 B0 17 8E B9 18 20 F5 E6 EO 19 BO OD 8E BB 18 20 Jur30083 2 9D WADI 11 29 12 S 12 29 12 JE M2 JB 23 1840 F5 E6 8E BC 18 EO 08 90 03 4C BD 18 AD B8 18 CD 1AA0 1D 14 25 14 2D 14 EO 14 FA 14 07 15 OF 15 75 15 1850 B3 18 BO F5 AD BA 18 CD BB 18 BO ED 20 FE 10 20 MABUNMC J6 2B WG 5D 16 499 17 494197 52 17 BE 17 6 217 1860 56 L9 A9 40 18 6D BA 18 20 10 19 A9 40 18 6D B8 TC D 479 18100 QD OU dA 4255294355044 6D 5 1870 18 20 10 19 A9 OE 201019 20 5B 19 A9 40 18 6D 1AD0 51 46 50 47 6C 48 6E 00 06 El E3 E3 E5 FO F4 07 1880 BC 16 48 20 10 19 20 5B 19 68 69 10 20 10 19 A9 JAE0 FE1 E3 E3 ES F0 F4 E6 07 El E6 E6 E9 E3 E8 E5 06 1890 5F 20 10 19 A9 12 20 10 19 AD B9 18 38 ED B8 18 JAF0 E1 EC E5 F2 F4 ES 05 E1 F0 FO ES EC 03 E2 E9 F0 18A0 18 69 40 20 10 19 EE BA 18 AD BA 18 CD BB 18 90 1B00 05 E3 E1 E4 F2 E5 07 E3 E8 El F2 E9 EF F4 04 E3 18BO AE F0 AC A9 OF 4C 10 19 00 oO 00 00 00 A9 02 4C lBIO0 EE F8 EE 04 E3 EE F8 H2 06 E3 F5 F2 F6 E9 F3 08 18 0 09 BE A
65. 0 installe le nouveau sta SBEJ30 lda 6 En 6 c est le n de port ora CQ le r sultat c est Cn sta BE31 Maintenant affichons la chaine en recopiant d abord son descripteur en page 0 ara ldy 2 copie le descripteur 1 lda 85 y enpageO sta SIP uv dey bpi i 2 iny y 0 dec 18 longueur chaine bmi fin lda 19 y charge un caract re de la chaine ora 80 and 7 positionne poids fort jsr FDED Cout sortie de caract res jmp 2 Si demand on affiche un retour chariot la suite de la chaine en veillant au bit de poids fort fin bit 8 afficher un retour chariot bpl sortie non si positif lda 8D oui on tient compte du poids and 7 fort demand jsr FDED Cout sortie Restituons enfin le vecteur de sortie de caractere c tait l cran 40 ou 80 colonnes ou peut tre un autre p riph rique sortie lda ancvec restitue l ancien vecteur sta SBES3O lda ancvec i sta SBE31 rts et revient au Basic Ajoutons la prise en charge d un ventuel Range Error rgerr ida 2 jmp BE09 et le stockage de l ancien vecteur ancvec ds 2 a Source PRINT S Assembleur ProCODE 0 dsk print 1 org 300 2 0300 A8 4C 3 lda S4C 0302 8D FS 03 4 sta 3F5 0305 AS 10 5 lda z deout 0307 8D F6 03 6 sta S3r6 030A AS 03 7 ida debput 030C 8D F7 03 8 sta p 030F 60 9 Its 10 0310 C9 B 1l debut cmp 83 0312 FO O3 i2 beg ox 0314 4C C9 DE 13 jmp SDECS 0317 20 Bl OO 14 ok jsr
66. 0A 0 depasst 0 nonrep Ei al depasst curseuri 1 minute 1 inactif 2 22 fois fini l re minuta measage d alerte jdcnx imminente effal 1 ldy lda beq jsr iny bne jsr jsr jap dfb dfb asc dfb asc dfh jsr lda bee lda ste cmp beq Smp beq jnp lda beq lda cle ade tax des idy jar yda jsr Jar dec jap lgx ldy jsr jsr ldx dex lda jsr Gex bpi l x L jsr jsr lda bne jmp lda sta jmp ldy ld beq jsr iny bne jsr ist lda sta jap d fb afb asc dfb asc dfh lda sta lds sta sta bit bpl lda bne lda sta rta jsr 1dy lda 0 decin y 62 anvoi 1 curseurv initepel deb2 7 S1F 40 S41 20 12 9564 91P 540 541 tpt 13 42 aconnexion imminente 0A 0 initcpt carrecu L13 90 1 carrecu 7 est ce correct transfome RC sen envoi 5 annulation fin d accept 1 c r Qon correction effacer 7 racule d un cran finacc nbcar rien lhor nbcar lver position pu envoi posit on nbcar debl lhor lver position curseuri lgatt affiche un point repo93 tionne Car car l annulation curseur en d but sde zone saffich Lon points EN envoi 20 lhor lver position curseurv nbcar 21 finacc 0 nbcar densais en d but de zone Curseur visible 1 zone vide on sort sinon cn recommence 0 pas da car S1g0 y effacer 2 envoi 1
67. 1 sur le Macintosh Remarque Si APPEL d tecte quelque chose l instruction s assure de la validit de l appel en liminant les impulsions inf rieures 25 centi mes de seconde Exemples l0 REM Exemples d utilisation d APPEL 20 APPEL ET 30 XF NOT ET THEN 20 40 REM APPEL Pom s n 34 BAS ne fonctionne pas en local Syntaxe de l instruction BAS nombre But D cale l cran Vid otex vers le bas Explication nombre est une variable ou expression enti re qui indique l amplitude du d calage en lignes nombre doit tre compris entre O et 24 inclus Remarque BAS vide le tampon d entr e des caract res voir PURGE pour le Macintosh Exemples 10 REM Exemples d utilisation de BAS 20 BAS 10 30 BAS N 10 40 BAS N AS Voir aussi HAUT BIP Syntaxe de l instruction BIP But Provoque l mission d un bip sonore Exemple 10 REM Exemple d utilisation de BIP 20 BIP Voir aussi ALERTE CADRE Syntaxe de l instruction CADRE x 71 x2 y2 1ype lignage couleur C couleur F But Trace un cadre l cran du Minitel utilisateur Explication xl yl x2 et y2 coordonn es du rectangle dans lequel doit s inscrire le cadre xZ et x2 doivent tre compris entre 1 et 40 inclus yZ et y2 doivent tre compris entre 1 et 24 inclus Poms n 34 type est une variable ou expression enti re qui indique le type decadre afficher lignage est une variable ou expression enti re qui in
68. 2 B0 4C 12 D4 20 E7 19 8D 55 19 20 60 19 JB20 E3 F5 18D0 A0 00 2C E2 1B 10 06 B9 25 1A 4C E0 18 B9 FD 19 1B30 F4 05 J8E0 F0 OB p 55 19 F0 OF C8 C8 C8 C8 DU ES AD SS 19 1B40 E5 EE 18H00 20 10 19 4C F 19 CELA 09 PC E2 LEO 06 H9 25 1B50 05 E9 1900 1A 4C 07 19 B9 FD 19 20 10 19 Cg CA D0 EB F0 E3 1B60 E7 EE 1910 2 E6 1B 30 1C 8D 2F 19 8E 30 19 A2 00 Al 1A 29 1B70 E5 03 7920 10 F0 F8 AO 2F 19 82 18 AE 30 19 A0 FB 19 60 00 1B80 E1 F2 1930900 48 8E 53 19 8C 54 19 20 A5 19 A9 00 20 10 14 1B90 EC ES 19404590 F6 20 A5 19 68 20 0D 14 AE 53 19 AC 54 19 20 1BA0 EC E9 1950 FB 19 60 00 00 Q0 A9 1F 4C 10 19 A9 IB 4C 10 19 1BB0 F6 EF 1960 2C E6 IB 30 1C 8E EB 1B A2 00 Al IA 29 08 DO 5 1BCO EE 08 1970 AE EB 1B 18 60 Al 18 29 ZE AE EB 1B 38 20 FC 19 1BD0 E3 F4 1980 60 8E A3 19 8C A4 19 20 A5 19 A9 01 20 10 14 90 lBE0 C2 20 1990 0B 20 A5 19 20 OA 14 29 ZE 20 FC 19 AE A3 19 AC lBF0 30 30 Pom s n 34 50 NEE us Anaa aa naen aana Mt F e num ro de Pom s que vous avez entre les mains contient un puissant ensemble de routines en langage machine formant une librairie d instructions t l matiques qui s a joutent celles du Basic Microsoft 2 0 et plus Afin de donner un exemple de s programmation sur la base de ces nouvelles fonctions nous avons pens quil serait judicieux d crire un serveur r pondeur t l matique interrogeable distance I ne faut cependant pas s y tromper malgr sont caract re d monstratif ce serveur est parf
69. 3 Pom s 12 rue d Anjou 78000 Versailles 1 39 51 24 43 Backups may be mude coced using standard copying P UNPROTECTED x COMPATIBLE E e Apple Ile lc or Is ures Eu APPLEWORKS ENHANCEMENT P Di TIT X Reguires AppleWorks 20 or newer D m sii ilis is all acl LS k ppleWorks Macro Power Tum any series of keystrokes into a new one keystroke command Adds many new features to your Word Processor Data Base and Spreadsheet
70. 3 VP Expert faire offre Daniel Ronxin Laignelet 35133 Foug res 99 99 33 71 Vends Apple e 65C02 128Ko Moniteur ambre 2 lecteurs 140Ko Solution du n 33 PI ETTI I TH R T Un RJO OUT IN I E R E IL ITIER E RE R 1 E 1 RE O STI n G SELI G N E U R ILE RRE DEE ELM DROE EMI ENSE NO CUN ITEIHIE HI E N T FHEoTLTELSETERETEEL S 9 Va au fast foot D barras e Verticalement 1 Cuirs questres 3 Vocif rante 4 Certaine argile 6 Peut tourner la psychose Nacr s 8 Retouch s 10 Exhaler Chevilles Poms n 34 Horizontalement 1 Courroies 2 Tel Balzac 3 Vraiment protestante 4 Opaline S Flotte Bye bye 6 Il peut s agir d une zone 7 Mal vieil Arc en ciel 8 Empot s 10 D goutter Fins des fl aux 2 Vit sur la Loire mais pas dans la Loire 7 Permet aux IBM d y voir clair 9 9 Lunch De moins en moins ventilateur pav num rique Joystick 5000 F Machine crire Underwood lectronique marguerite avec m moire 3500 F M Calvet 45 97 44 82 Recherche Compilateur C Aztec d origine complet avec documen tation pour Apple e Norbert Steinberg 24 avenue du Moulin 78230 Le Pecq dom 39 58 42 71 O Bx 64 46 2650 Contact Pour partager exp rience en assembleur prendre contact avec Emmanuel Bougeard 3Bis boulevard des 3 croix 35000 Rennes ie week end 99 59 37 06 Recherche programmes d
71. 3200 Frs 1590 8E 0A 16 20 F5 E6 8E 0B 16 AD 06 16 C9 04 90 03 lt e f 15A0 4C BD 18 AD 07 16 OD 08 16 C9 08 BO F3 A9 OF 20 Disquette Demo 40 Frs 25B0 10 19 20 5B 19 18 A9 4C 6D 06 16 20 10 19 20 5B Carte pour Apple lle ou lic 2800 Frs 15C0 19 18 A9 40 6D 07 16 20 10 19 20 5B 19 18 A9 50 15D0 6D 08 16 20 10 19 20 5B 19 A9 49 AE 09 16 FO 03 15E0 38 E9 01 20 10 19 20 5B 19 A9 5C AE OA 16 F0 03 O COPY II PLUS v8 1 395 Frs 15F0 18 69 01 20 10 19 20 5B 19 A9 59 AE 0B 16 F0 03 O PROGRAM WRITER Manuel FR 630 Frs 1600 18 69 01 4C 10 19 00 00 00 00 00 00 AO 00 B9 1A D FONTWORKS v2 06 Manuel FR 630 Frs 1610 16 F0 06 20 10 19 C8 DO F5 60 1B 39 7F 1B 5C 1B 1620 49 1B 59 1B 4C 1B 47 1B 50 20 00 20 60 19 20 F5 C LABEL SHOP v1 0 FR 240 Frs 1630 E6 EO 00 FO 0C A0 07 B9 4D 16 20 10 19 88 10 F7 Etiquettes couleur Justification Fontes 1640 60 A0 07 B9 55 16 20 10 19 88 10 F 60 43 69 3A T 1650 1B 04 66 3A 1B 43 6A 3A 1B 04 66 3A 1B 20 BE DE ype d impression Tous formats 1660 20 E3 DP 249 8 30 04 24 82 30 03 4C 76 DD 20 74 IUMO I6 4C 99 16 A9 00 8D CC 16 20 60 IS 9069 13 1680 D0 WS 4C 28 17 C9 16 F0 44 G9 19 E r g t 1619 0700 02 EECC 6 AD CC 16 60 00 02 C9 097 9D 0 Nos prix sont TTC 16A0 A9 09 8D 00 02 DO 09 90 07 C9 0A BO 03 CE 00 02 American Computing 16B0 20 52 E4 A2 00 A0 02 20 E2 E5 AD CC 16 AD 00 91 2a lt 16C0 83 C8 A5 6F 91 83 C8 A5 70 91 83 60 00 20 AC 19 Residence les Floralies 16D0 B0 03 4C 95 16 AA 2
72. 3560 3570 3580 3590 9595 3600 36710 3620 3630 3640 3645 3680 3690 3700 3729 3720 37 90 3999 4000 5000 6000 fAcmBer 3 RS ES ON NOT E GOTO 10000 ON E GOTO 3380 33 59 9500 3 369 500 5005 33 50 009 0 GOSUB 4000 GOTO 3330 GOSUB 5000 GOTO 3330 IF R lt OUI THEN R amp ALERTE R ponse incorrecte 0 GOTO 3330 PRINT D open FI 1255 PRINT D wrlte FIS r0 PRINT 0 PRINT M OS PRINT TES PRINT NO PRINT D close amp VIDECRAN amp DEPLACE 6 12 amp AFFICHE Le fichier a t r initialis amp DE PLACE 11 14 amp AFFICHE faites E INVERSE amp AFFICHE Sonmaire E ACCEPTF A ON A8 0 OR A8 8 GOTO 100 10 GOTO 500 REM S changer le mot de passe VIDECRAN amp VIDRECT 1 1 40 6 4 6 DE PLACE 14 4 amp PARAMT 1 7 4 0 0 0 amp AFF ICHE Mot de passe amp PARAMT 0 7 0 0 0 510 amp DEPLACE 1 23 6 AFFICHE Pour renonc er faites amp INVERSE amp AFFICHE Sommaire DEPLACE 1 11 amp AFFICHE Taper le no uveau mot de passe amp INVERSE amp AFFICHE Envoi amp DEPLACE 1 16 amp AFFICHE Taper le nouveau pour contr ole amp CADRE 2 12 35 1372 0 54 0 OCABRE 25 175 35 19 2 4 0 540 RIS u CmSEBRET 27 137 0 RRISgES ON NOT ES GOTO 10000 ON ES GONO 560005539 90 8590 7595 39590 500 3 600 10010 GOSUB 4000 GOTO 3560 GOSUB 5000 GOTO 3560
73. 4 CHRS 24 3196 amp DEPLACE 2 14 amp AFFICHE gt IS 2 CHRS 24 3198 amp DEPLACE 2 15 amp AFFICHE IS 3 CHRS 24 3200 FOR I 1 TO 7 6 DEPLACE 2 16 I E A FFICHE MSS I 1 CHRS 24 NEXT 3220 amp ACCEPTF A ON NOT A GOTO 10000 3230 ON A GOTO 3240 3250 3140 3235 3240 500 3 260 10010 3240 3235 GOSUB 5000 GOTO 3220 3240 GOSUB 4000 GOTO 3220 3250 NO NO 1 3252 ON NO 0 GOTO 3170 NO 1 amp ALERTE C est le premier message l GOTO 3220 3260 NO NO 1 3262 ON NO LG GOTO 3170 NO LG amp ALERT E C est le dernier 1 GOTO 3220 3299 REM effacer le fichier 3300 amp VIDECRAN amp VIDRECT 1 1 40 6 4 amp DE PLACE 10 4 amp PARAMT 1 7 4 0 0 0 amp AFF ICHE Effacement fichier amp PARAMT O0 e 4 0 305040 3310 amp DEPLACE 5 10 amp AFFICHE Cette comma nde supprime l ensemble 6 DEPLACE 5 11 amp AFFICHE des messages stock s 3320 amp DEPLACE 5 13 amp AFFICHE On ne peut annuler un effacement 3325 RS amp DEPLACE 5 22 amp AFFICHE Pou r effacer amp INVERSE amp AFFICHE QUI Envoi 3327 6 DEPLACE 5 23 amp AFFICHE Pour renonc er amp INVERSE amp AFFICHE Somm aire e 3330 R t ACCEPT 10 16 0 0k pour tout e 36 3340 7390 3360 3380 3390 3400 3410 3420 3499 3500 3510 3520 3530 3540 3550
74. 60 OP Te TEXT 65 IF FLAG THEN CS HARD COPI APPLE II GS APPLE II E APPLE II C E T Badhan 70 IF FLAG THEN PRINT D PR 3 R VEILLEZ VOUS 80 PRINT A IF FLAG THEN PRINT A 90 FOR I 1 TO 21 Extension m molre 512K 8 MO avec patch Super AppfeWorks f m moire cache 110 IF FLAG THEN HTAB 80 GOTO 130 RAMKEEPER Alimentation permanente de 1 cu 2 cartas m moire en slot extension GS IIGS IIE RAMFACTOR RAMCHARGER M moire de 512K 5 MO partitionnable sous dili rents syst mes d exploitation Sauvegarde permanente avec RamCharger Patch sur Apple IE DISQUE DUR 3 5 BJX 20 MO Disque Winchester 3 5 externe compact et rapide parlitionnabie sous diff rente syst mes Livr avec son s lecteur de programmes el uliliteires en nombre IE TRANSWARP Acc l rateur 3 6Mgz de le m moire principale auxiliaire et des acc s Rom Vitesse r glable ur la carte au clavier et ligne de programme IIC Z RAM ULTRA 1 2 3 Extension m moire de 256K 1 MO avec possibilit horloge et ou CP AM Patch RamDisque sous DOS ProDOS CP AM Compatible I 128K 128K Rom 3 5 384K APPLE FOR EVER Patch Super AppleWorks Tableau de bord de configuration 22 600 lignes 22 600 fiches 2 042 coupar coller buffer d impression sauvegarde par auto segmentation dale et heure l cran et en cat gorles base de donn es 120 HTAB 40 130 NEXT I 140 PRINT Aou hah 150 VTAB
75. 9 FO C9 40 FO 18 8A An 00 D9 7 Rue Charles Peguy 16E0 26 1A FO 09 C8 C8 C0 22 DO F5 4C 95 16 C8 B9 26 16F0 1A 4C 8D 16 8E 26 17 20 AC 19 B0 03 4C 95 16 8D 42300 Roanne 1700 27 17 A0 00 AD 26 17 D9 49 1A DO 10 C8 AD 27 17 Tel 77 72 98 75 1710 09 49 1A IR 08 CB B9 49 1A 46 8D K6 GO G8 C800 1720 2A D0 B 46 95 16 00 QO 20 AC 19 BO 03 4C 95 16 1730 C9 13 F0 F4 89 40 FO F5 C9 4A BO F1 29 0F 4C 8D 1740 16 20 5B 19 A9 59 4C 10 19 A9 FF 8D 51 17 4C CC 19A0 A4 19 60 00 00 AE EO 1B AC El 1B 60 A9 CO 8D C5 1750 08 00 A0 02 B9 ED 1B 99 F5 03 88 10 F7 60 A9 OF 13 B0 19 8D C619 20 560 939 90 01 60 EE C5 19 DO F EE 1760 4C 10 19 20 B7 00 F0 07 C9 2C F0 07 4C C9 DE A2 19C0 C6 19 DO FO 60 00 00 8C EC 1B 8E EB 1B 48 AO OA 1770 00 F0 03 20 F5 E6 A9 41 8D C1 17 8A FO 2E C9 06 19D0 A9 C6 20 AG FC AD 00 CO C9 9B FO 03 88 DO F1 68 1780 90 03 4C BD 18 20 FE 10 8A 69 40 8D BB 17 69 10 19E0 AC EC 1B AE EB 1B 60 8D EA 1B 8E EB 1B 8C EC 1B 1790 8D BD 17 A0 OC B9 B7 17 20 10 19 88 10 F7 EE Cl 19F0 60 AD EA TB AE EB dB AC BG MB 60 60 60 7E 00 19 17A0 17 AD Cl 17 C9 59 D0 EB 20 C4 17 60 A9 OC 20 10 1A00 48 5E 00 19 43 5D 19 27 00 23 19 23 00 5B 19 30 17B0 19 20 FE 10 4C C4 17 DF 67 12 5F 40 1B 50 IH DE 1A10 00 7D 19 41 65 7B 19 42 65 40 19 41 61 7C 19 41 7C0 41 40 iF 14 AD O6 B9 DO 17 20 10 19 88 10 F 60 1JA20 75 5C 19 4B 63 00 23 A3 24 A4 26 A3 27 DD 29 BC 17D0 0A 64 12 20 41 40 1F 20 F5 E6 8A FO 14 C9 19 BO 130720 Ap 2E BE 2F F6 30 DB S2 AB 88 AF 2C AH SD AE 17E0 10 69 4
76. 96 26 Rect top 36 Rect left 188 Rect bottom 60 Rect right 300 PENSIZE 3 3 FRAMEROUNDRECT VARPTR Rect tep 12 12 PENNORMAL Diog Faux WHILE Dlog 1 AND Dlog lt gt 6 Dl1og DIALOG 0 WEND WINDOW CLOSE 2 RETURN Te Dialogue message enregistr s DialAffiche WINDOW 2 160 60 351 283 Am TEXTFONT O TEXTSIZE 12 BUTTON 1 1 Pr c dent 16 16 8 88 184 IF NombreMessage 1 THEN BUTT ON 1 0 BUTTON 2 0 Suivant 104 168 17 6 184 BUTTON 3 1 Vider 16 200 56 216 BUTTON 4 1 Annuler 72 200 176 216 TEXTFONT 4 TEXTSIZE 9 TEXT MODE OG xNumMessage xNom xPrenom xTelephones FOR Index 0 TO 6 xLigneMessagesS Index NEXT GOSUB Mag NumMessage NombreMessage 1 NombreMessage STR NombreMess age IF LEFT NombreMessage 1 THEN NombreMessage o RIGHT NombreMessageS LEN NombreM essages 1 FIELD 1 16 AS uN 16 AS uPS 1 6 AS uT 28 AS u1 28 AS u2 298 AS u3 28 AS u4 28 AS u5 28 AS u6 28 AS uzs LectureMac GET 1 NumMessage xNom uNS xPrenom uPs xTelephone uTS xLigneMessageS 0 ul xLigneMessageS 1 u2 xLigneMessageS 2 u3 xLigneMess ges 3 u4 xLigneMessages 4 u5S xLigneMessageS 5 u6 xLigneMessages 6 u S xNumMessage Message 4STR Nu mMessage 1 NombreMessag es GOSUB MaJBis EDial25 Dlog Faux WHILE Diog 1 AND Dlog 5 D1og DIALOG 0 59 s d
77. A 20 58 B9 60 1B 1B AD 83 12 0 C 01 LB 19 F0 AD AC AC 8D 85 A0 84 84 0F AD FO 83 FO A5 DO Es 88 08 C7 81 02 10 9 98 49 119 GE BA 85 85 85 FS 8C 4C BD A9 43 BD A9 88 43 20 39 BO BO 4C AS B9 12 19 9 119 4C 10 DO C 9 C 03 D0 84 83 81 25 A9 DO 53 91 A5 20 39 EP F5 E 94 CA 85 10 18 0B 10 6A 18 10 6A 10 1B 21 11 10 81 23 EH 83 A9 no 19 E9 8D 4C 05 A5 88 25 82 16 F3 F0 83 20 C7 1B DO C4 9C C8 96 19 A0 20 F 7 JA A0 20 F7 3A 19 20 A9 19 12 22 SE 88 49 19 C8 8D DO 9r 43 00 81 98 82 Pom s n 34 14D0 03 4C 76 DD AD 84 14 A0 01 91 83 88 38 31 83 60 J4E0 20 F5 E6 E004 90 025 4C1BD 18 8E F9 14850 5B 19 14F0 18 A9 4C 6D F9 14 4C 10 19 00 20 F5 E6 EO 00 FO COl puter ive Ze 7 P Jp00 02 A2 BH GE E2 NB 60 2 5B 19 A9 5C 4C 10 19 20 JEN Q FEVER OE 7T 15420 F55 EG SE 22 Hb 20863 E BE 7 1520 15 20 F5 E6 8E 74 15 AD 71 15 0D 72 15 C9 08 90 Carte digitaliser pour Apple IIGS 1530 03 4C BD 18 A9 OE 20 10 19 20 5B 19 18 AD 71 15 f 1540 69 40 20 10 19 20 5B 19 18 AD 72 15 69 50 20 10 320x200 pts 16 Niveaux de gris 1550 19 20 5B 19 A9 49 2C 74 15 F0 03 38 E9 01 20 10 Manuel en Francais 1560 19 20 5B 19 A9 59 AE 73 15 F0 03 18 69 01 4C 10 1570 19 00 00 00 00 20 F5 E6 8E 06 16 20 F5 E6 8E 07 1580 16 20 F5 E6 8E 08 16 20 F5 E6 8E 09 16 20 F5 E6 Prix
78. A EE E9 1B AC 0A30 4C 66 09 07 1F 40 41 20 12 64 1F 40 41 44 0890 E9 1B B9 D8 1A FO 2D 30 F3 EE E4 1B 4C 6F 08 A9 0A40 65 63 6F 6E 6E 65 78 69 6F 6E 20 69 6D 6D 08A0 74 8D C2 08 A9 1A 8D C3 08 AC E4 IB F0 13 EE C2 0A50 65 6E 74 65 2E 2E 2E 0A 00 20 05 0B AD 46 08B0 08 DO 03 EE C3 08 EE C2 08 DO 03 EE C3 08 868 DO 0A60 0D DO 05 A9 01 8D 46 OB C9 0 FO 07 C9 05 08CO ED 6C SE 1A 4C C9 DE A9 00 8D 51 17 A9 FF 8D E2 0 70 4C 7A 0B AD 40 0B FO 51 AD 82 14 18 6D 40 08D0 1B 20 F5 Ee 8E 82 14 20 F5 E6 8E 83 14 EO 19 90 0A80 CA AC 83 14 20 48 OB A9 2E 20 10 19 20 48 08E0 03 4C BD 18 20 F5 E6 EO 02 90 03 4C BD 18 8E 47 0A90 40 0B 4C 63 09 AE 82 14 AC 83 14 20 48 OP 08F0 0B AC 83 14 AE 82 14 20 48 0B 20 FE 10 20 BE DE 0AA0 10 AE 3D OB CA A9 AE 20 10 19 CA 10 F8 AE 0900 49 00 85 52 20 7B DD 20 6C DD AS A0 85 85 A5 Al 0AB0 AC 83 14 20 48 OB 20 F9 10 AD 40 OB DO 03 0910 85 86 A0 00 B1 85 AA 18 6D 82 14 8D 82 14 A0 02 OACO 0B A9 00 8D 40 OB 4C 58 09 A0 00 B9 E4 OA 0920 B1 85 88 99 08 00 CO 00 DO F6 CA 30 09 B1 08 20 0AD0 20 10 19 C8 DO F5 20 F9 10 20 OA 0B A9 01 0930 C7 18 C8 4C 2A 09 20 F5 E6 8E 3D OB EO 00 FO 04 OAEQ 0B 4C 63 09 IF 40 41 20 12 64 IF 40 41 52 0940 E0 29 90 03 4C BD 18 AD 82 14 18 6D 3D 0B C9 29 OAFO 6E 20 19 41 61 20 65 66 66 61 63 65 72 2E 0950 90 03 4C BD 18 4C D6 0B A9 00 8D 45 0B 8D 44 0B 0B00 0A 00 4C 74 16 A9 00 8D 44 0B A9 00 8D 41 0960 EE 45 OB 20 05 OB 20 F9 10 EE 41 OB DO OD EE 42 0B10 42 0B 2C E6 1B 10 04 A9 FD DO 02 A9 F8 8D 0970 0B D0 08 EE 43 0
79. B DO 03 4C 0A 0A 20 02 0B AD CC 0B20 60 20 FE 10 AO 06 B9 35 OB 20 10 19 88 10 Pom s r 34 0B30 0B40 0B50 0B6 0 0 B70 A2 0B80 0B90 0 BAO 0BBO 0BCO0 0BDO0 OBE 0 HE 0C00 0C10 0C20 0C 30 0C 40 0C50 0C60 0C70 0C80 0C90 0CA0 0CBO 0CCO 0CD 0 OCEO OCF 0 0D00 0D10 0 D20 0D30 0D40 0D50 SEO 0D70 0D80 SIE OBFO 0D60 0D30 0DA 0 0DBO 0DCO ODDO ODEO ODF0 00 00 0B 16 4C 6B 84 90 AE A9 0B 4C 00 02 AE 83 83 0B 42 ec 45 90 02 01 0C 20 00 86 D0 00 A9 6C 90 8b B1 84 30 A0 01 2D 29 45 56 40 119 A0 83 A5 B9 0B 8D 07 84 18 00 10 10 20 84 44 F0 E 4C 01 83 01 79 52 00 08 4C A5 4C D0 20 20 12 A5 88 A9 E4 20 37 00 19 20 00 02 C8 81 01 EC E2 A5 85 8D D0 19 12 48 A5 0B E6 03 6A E9 A0 8D C8 20 B 30 C9 10 A0 C2 Ja G7 20 81 D0 C6 A9 F5 8E 64 GO 0B AD H5 F0 EG 00 A0 00 74 0B 4n A5 83 07 E JE 85 03 08 01 A3 AC 85 45 EE AD AD D0 A0 A5 A9 65 00 B7 19 20 25 B9 03 40 83 CO 60 A9 8E E0 0E 1000 1070F 1020 1030 1040 1050 1060 1070 1080 1090 10A0 10B0 10C0 10D0 10E0 10F0 1100 1110 1120 1130 1140 1150 1160 1170 1180 1190 11A0 11B0 11CBr 11D0 1180 ILE 1200 1210 1220 1230 1240 1250 1260 1270
80. Deplace 2 16 Index Affiche w MessageS Index 1 NEXT AttenteLecture AcceptF Dr ON Dr 1 GOTO DeconnexionF ina cti0 AttenteLectureR Lecture J3 Guidelmpl0O Inactl0 Sommair eBis AttenteLectureS Deconne xion Inact10 GuideImp10 GOSUB GuidelIndisponible GOTO AttenteLecture SommaireBis GOSUB VideVariables GOTO Sommaire Inactl0 GOSUB spTouchelInactive GOTO AttenteLecture AttenteLectureR Retour NumMessage NumMessage 1 IF NumMessage l GOTO Lecture2 NumMessage 2 Alerte C est le premier message 1 GOTO Att enteLecture AttenteLectures Suite NumMessage NunMessaget i IF NumMessage NombreMessage 1l GOTO Lecture2 NumMessage NombreMessage s1 Ale rte C est le dernier 1 GO TO AttenteLecture e Effacer le fichier Effacer VidEcran VidRect 1 1 40 6 4 Deplace 10 4 ParamT 1 7 4 0 0 0 Affiche Effacement fichier ParamT 0 7 0 0 0 0 Deplace 5 10 AfficheR Cette commande supp rime l ensemble Deplace 5 11 AfficheR des messages stok s Deplace 5 13 AfficheR On ne peut annuler un effacement R Deplace 5 22 Affiche Pour effacer Ligne Affiche Inverse Affiche OUI Envoi Deplace 5 23 Affiche Pour renoncer Ligne 3 Affiche Inverse Gees Affiche Sommaire Q SN SN AttenteEfface v Reponse Accept 10 16 0 Ok pour tout effacer 3 Reponse Dr ON Dr 1 GOTO DeconnexionF Att enteEfface2 Ina
81. ECRAN couleur But efface le contenu de l cran en utilisant la couleur d sign e Explications couleur est une variable ou expression enti re optionnelle qui d signe la couleur utiliser pour effacer le contenu de l cran 0 noir 0 de gris l rouge 50 de gris 2 vert 70 de gris 3 jaune 90 de gris 4 bleu 40 de gris 5 magenta 60 de gris 6 cyan 80 de gris 7 blanc 100 de gris Remarque Si couleur est omis le noir est utilis Exemples 10 REM Exemples d utilisation 20 REM de VIDECRAN 30 VIDECRAN 40 VIDECRAN 2 50 VIDECRAN C 60 VIDECRAN C I 1 Voir aussi VIDLIGNE VIDRECT Pom s n 34 VIDLIGNE Syntaxe de l instruction VIDLIGNE ligne couleur But efface une ligne en utilisant la couleur d sign e Explications ligne est une variable ou expression enti re indiquant la ligne effacer ligne doit tre compris entre 1 et24 inclus couleur est une variable ou expression enti re qui d signe la couleur utiliser pour effacer la ligne e 0 noir 096 de gris l rouge 5096 de gris s 2 vert 70 de gris 3 jaune 90 de gris e 4 bleu 40 de gris S magenta 60 de giis 6 cyan 8096 de gris 7 blanc 100 de gris Exemples 10 REM Exemples d utilisation 20 REM de VIDLIGNE 30 VIDLIGNE LR Co 40 VIDLIGNE 4 3 50 VIDLIGNE 4 CO 2 60 VIDLIGNE L 1 ASC N 48 Voir aussi ALERTE VIDECRAN VIDRECT VIDRECT Syntaxe de l instruction VIDRECT
82. ETURN ArretServeur DrArret Vrai RETURN VideVariables Essai 0 Pointeur 0 Noms Prenom Telephones FOR Index 0 TO 6 Messages Index NEXT RETURN Souris Appel Dr RETURN s Fin et d connexion Quitte VidEcran Deplace 10 12 Affiche Au revoir GOTO Deconnexion DeconnexionF VidEcran Deplace 3 12 Flash Affiche Minitel inactif depu is 2 minutes Deplace 9 14 Flash Affiche D connexion forc e Deconnexion DeCnx CLOSE RESET GOTO RepriseAttente Erreur RESUME Erreur2 Erreur2 VidEcran Affiche D sol probl me ser veur GOTO Deconnexion e Ouverture d un nouveau fich ier NouveauFichier DrInverse Faux WINDOW 2 116 44 379 275 475 TEXTFONT Os TEXTSEZE 12 PENPAT VARPTR Gris 0 MOVETO 8 120 LINETO 255 120 MOVETO 8 200 LINETO 255 200 PENNORMAL MOVETO 16 16 PRINT Mot de passe de 4 7 caract res MOVETO 16 32 PRINT A gt Z et 0 gt 9 MOVETO 16 56 PRINT Nom jusqu 16 carac teres MOVETO 16 72 PRINT affichables par tous 1 es Minitel MOVETO 16 96 PRINT T l phone jusqu 16 caract res MOVETO 16 112 PRINT affichables par tous 1 es Minitel MOVETO 56 141 PRINT Mot de passe MOVETO 16 165 PRINT Nom MOVETO 16 189 PRINT T l EDIT FIELD 1 160129 2 48 144 EDIT FIELD 2 94 F53 24 8 168 EDIT EIELDB 3 54 177 24 8 192 EDIT
83. Exemples 10 REM Exemples d utilisation de MODE 20 MODE M 30 MODE M A B 40 MODE 2 Voir aussi PARAMT Pom s n 34 MTH uniquement sur l Apple Syntaxe de l instruction MTH mode But Modifie le recodage des caract res issus de l instruction AFFICHE Explication mode est une variable ou expression enti re qui indique le type de recodage de certains caract res e mode 0 mode litt raire par d faut mode lt gt 0 mode math matique Apple Minitel litt raire math matique o o g Ta autres voyelles accentu es idem a a autres voyelles accentu es idem c t Tr lettres non accentuables idem Remarque Tous les Minitels n ayant pas les m mes ROM d affichage les r sultats peuvent varier l g rement d un mod le l autre Exemples 10 REM Exemples d utilisation de MTH 20 MTH 1 30 MTH M NORMAL Syntaxe de l instruction NORMAL But Passe en affichage non invers Exemple 10 REM Exemple d utilisation de NORMAL 20 NORMAL Voir aussi INVERSE PARAMG PARAMT 19 1 HE EELGISZZEUCPIFICR 2 I BE 5 s PARAMG Syntaxe de l instruction PARAMG couleur C couleur F lignage flash But Passe en mode semi graphique et tablit les param tres d affichage Explications couleur C est une variable ou expression enti re repr sentant la couleur des caract
84. ICHE amp INVERSE amp AFFICHE Correction amp NORMAL amp AFFICHE Pour l annuler mars 6 LIGNE amp AFFICHE 4 INVERSE amp AFFICHE Annulation amp NORMAL amp ACCEPTF A ON NOT As GOTO 10000 ON AS GOTO 1100 70 0 990 1070 500 500 1065 10010 700 amp ALERTE Touche interdite 0 GOTO 1050 GOSUB 5000 GOTO 1050 amp VIDECRAN amp DEPLACE 6 12 amp AFFICHE Enregistrement en cours PRINT D open FI 1255 PRINT D read FIS r0 INPOT LG LG LG 1 Pom s n 34 11590 1140 1150 1160 1165 1169 1170 3000 3010 3012 3013 3014 3015 3016 3017 3018 3020 3022 3023 3024 3028 3030 3040 3048 3050 3060 3065 3066 3070 3075 3100 3110 3120 3130 3135 3140 3142 Pom s n 34 PRINT DS S write FIS r0 PRINT LG PRIN MOS PRINT TES PRINT NOS PRINT D write FIS r LG PRINT N PRINT PRS PRINT TLS FOR I 0 TO 6 PRINT MS IJ NEXT PRINT D ciose FOR I 0 TO 6 M I NEXT REM ccc dernier cran amp VIDECRAN 5 DEPLACE 6 12 amp AFFICHE Votre message est enregistr DEP LACE 11 14 amp AFFICHE faites 6 INVERSE amp AFFICHE Sommaire amp A CCEPTF A ON A 0 OR AS 8 GOTO 1001 0 PO 4 GOTO 500 REM fonctions de service amp VIDECRAN amp VIDRECT 1 1 40 6 4 amp DE PLACE 10 4 amp PARAMT 1 7 4 0 0 0 amp AFF
85. IYImEERIE GI x EZ I FT lt EAU Er ZS Ze H Xe VI DEET ILES FuIHEYM PoM LINK 3 0 La r ussite commerciale me semble promise cette s rie et il faut que nous assurions cette r ussite j incite fortement tous ceux que l anglais ne rebute pas trop s offrir au moins TimeOut SuperFonts en plus de SuperMacroWorks Sachons le le nom de Beagle Bros ne signifie plus la m me chose qu avant ce qui tait un atelier d artisans d contract s et sympathiques devient maintenant une entreprise moderne et performante rivalisant avec les pros du logiciel une puissance commerciale qui s impose par l excellence de ses produits Beagle prend la liste des principaux succ s de vente en mati re de compl ments AppleWorks Copy Plus Pinpoint accessories MultiScribe Visualizer SideWays SuperMacroWorks Pinpoint Spelling Checker et y substitue sa version int gr e AppleWorks et souvent meilleure que les autres Sinc rement non seulement je n changerais pas un GS avec AppleWorks SuperMacroWorks et TimeOut contre 2 ou 3 barils d ordinateurs X avec Windows mais je ne l changerais m me pas contre un Mac avec Microsoft Works Cette strat gie de Beagle est certainement la bonne une telle s rie de bons utilitaires r ellement int gr s est effectivement un besoin des utilisateurs Certaines de ces applications au moins SuperFonts sont tellement au dessus du lot de ce qui existait d j qu e
86. LACE 3 12 amp FLASH amp AFFICHE Minitel inactif depuis 2 m inutes DEPLACE 9 14 amp AFFICHE D connexlon forc e PRINT DS close amp DECNX GOTO 40 Jag m akan a a LE AC EN ia a amp VIDECRAN 6 AFFICHE D sol probl me serveur amp DECNX PRINT DS close PR INT erreur PEEK 222 END de tp D M n dd LG fh ta Les sources Procode pour Apple JL pr sent s ici doivent permettre chacun d am liorer d adapter ses propres besoins les nouvelles instructions serveur Ils sont pr sents en format texte sur la disquette d accompa gnement de ce num ro et sont r cup rables par tout autre assembleur Sok debut Source PL O Assembleur ProCODE so 1 lst off dek gomx link 2 1 put pi 1 put p1 2 put p1 3 put pl 4 put pl ap put pl date 511 Source PL 1 Assembleur ProCODE 0701 1535 MC jarai chkcom SDEBE chkatr DD6C chrget B1 chrgot 57 cout FDED data 18 error 8412 errout BEO09 facmo AU0 forpnt B5 frmevi 50D7 B fretop 6F getbytc SE6ES getspa E452 kbd c000 n serr 5DD 6 movsgstr SESE2 ptr B ptzgat SDER3 Sne rr SDECS status 51A varnam 81 fincmd varpnt 583 org 3801 ida 3E6 vecteur d j Si cmp f lt debut install bne 0 lda 3F7 100 cmp debut beq ok 0 ldy E2 8auve ancien 1 lda S3F5 y vectaur Pom s n 34 la
87. LOADAWD SYS T C A 2000J CALL 151 J 4D98 60 J 4F8A 10 J 4F91 13J BSAVE AWD SYS T 0C AS 2000 J Encore une partie et j teins Garder un vieux avec un joystick pour les jeux des enfants n est plus un bon calcul les grands du jeu sur Apple Broderbund Epyx sortent maintenant syst matiquement de magnifiques jeux d action arcade et simulation de superbes animations en Double Haute R solution Apr s Air Heart de Broderbund voici California Games d Epyx qui vous permet de faire du surf du v lo cross du skate board du freesbee etc Sous l Apple la plage Range moi cette disquette loin d ici tu vois bien que je travaille Apr s les diverses s ries de simulation des Jeux Olympiques dhiver et d t la Double Haute R solution va nous offrir des simulations encore plus r alistes puisque nous allons refaire nos parties de sports des rues l o nous jouons sans arbitre avec le copain qui ne sait pas rattraper une balle contre celui qui ne sait pas la lancer Street Sports Base Batl Basket Ball ete toujours d Epyx Ne touche pas ce joystick et laisse moi crire mon article Bien entendu la Super Haute R solution du GS permet aussi de magnifiques animations et simulations sportives essayez donc World Games GS du m me Epyx d cid ment tr s en forme en ce moment Mais cela n emp che pas les frangais de travailler aussi de bons jeux sur Apple on par
88. NE passe l affichage en mode soulign Remarque Dans le cas du mode texte LIGNE envoie un attribut latent qui ne sera valid par le Minitel utilisateur qu la r ception d un espace ASCH 32 Exemple 10 REM Exemple d utilisation de LIGNE 20 LIGNE Voir aussi PARAMG PARAMT SANSLIGNE 18 Pom s n 34 LOCALISE ne fonctionne pas en local Syntaxe de l instruction LOCALISE colonne ligne tat But Retourne la position courante du curseur Explication colonne et ligne sont des variables enti res dans lesquelles LOCALISE retourne Ja position courante du curseur tat est une variable enti re dans laquelle on pourra trouver au retour dans le programme Basic e tat Osile Minitel utilisateur ne r pond pas e tat l 1 sur le Macintosh si le Minitel utilisateur r pond norinalement Remarques e si tat 0 le contenu de colonne et ligne est ind fini e LOCALISE vide le tampon d entr e des caract res voir PURGE pour le Macintosh Exemple 10 REM Exemple d utilisation 20 REM de LOCALISE 30 LOCALISE COS LIS ETS Voir aussi DEPLACE MODE Syntaxe de l instruction MODE mode But Change le mode d affichage Explications mode est une variable ou expression enti re indiquant je mode d affichage utiliser e mode 0 caracteres normaux mode 1 double hauteur e mode 2 double largeur e mode 3 double taille Remarque MODE provoque le passage en mode texte
89. O drap chkcom ptrget varnam noneh Serr varnam 1 nornch 1 sulte miserr varpnt forpnt varpnt4 forpnt41 0 Long chaine longueur attendue nom chaire retour drapeau alerte positionne le curseur double hauteur 2 Minit r pond pas cherche espace pour la chaine chaire en 201 1a d place attand variable senti re 3i fnct ou 9 senl ve 1 stocke tat dans variable enti re attend var chaine pour afficher la chaine par d faut charge 1g ce la Pom s n 34 lda bec beg jap Sok sta sta 1 dy 0 lda dey sta Sc py bae ldy i cpy beq lda sta jsr iny bne Sfinch ldx 2 CDA beq lda jar inx bna tinp lda clc ACC tax ldy jsr jmp n ds acceptf jar jst sta sty lda and bai np Sal lda sta sta inc deb3 jor deb4 0 inc bne inc bne inc bne jnp 1 jer lda beq lda and sta jsr lda beq jsr 11 lda cnp beq cnp 110 jnp nonr p lda sta fnrecu lda cup bne lda 00 cnp bee lda bee 01 bec sbe Sol ldy sta ldy tya ata rta Pom s n forpnt y chaine lgatt 81 elle est plus Sok longue que la 1g Sok attendue string strtoolL too long nbcar n 2 sprend l adresse forpnt y de la chaine Ptr y LO 0 LO afflche la cha ne set la stocke partir de 201 nbcar tinch ptr y 201 y envoi 1 nbcar lgatt finp L LL envoi Compl te 8vec
90. OOT 3 C ble et Gestion bancaire AR 35 De Thierry VICAIRE TV10 30 dec 87 21h03 Je vous ennuie encore avec deux questions 1 J aurais besoin d un c ble de 3 m pour relier mon Minitel 1B mon MacPlus quel serait ie prix 2 Concernant le programme de gestion de compte are du num ro 20 de Pom s est il compatible HFS fonctionne t il obligatoirement avec Basic 2 0 ou son RunTime est il suffisant la ventilation des d penses peut elle servir ventiler les recettes 1 300 00 F franco 2 Ce programme ne fonctionnera normalement en HFS qu avec la version 3 0 du Basic Microsoft Basic 2 0 ou simplement RunTime 2 0 conviennent mais pasen HFS Non seules les d penses sont ventil es 14 Graphisme et assembleur AR 911 De Jean Louis ROCHE JLR10 27 dec 87 23h06 Probl me Un petit bonhomme traverse l cran 7 formes shapes d finissent le mouvement et un petit programme Basic s occupe de l affichage Cela fonctionne mais je me heurte un clignotement de l cran M me travail en assembleur mais apr s de vains essais je constate que ca clignote toujours on est loin du d filement harmonieux que j attendais J en conclus qu il y l i a une astuce de programmation certainement bien connue depuis la pr histoire de l informatique Nous ne publions pas le listing accompagnant ce message car la solution est effectivement connue H suffit de te
91. P E 5 1 140Ko 200 00F E P ES 1 800Ko 200 00F C1 MaxMoniteur 140 Ko 150 00 FO Ordico 140Ko 200 00 FO Dominos 140Ko 20000F COGO src 140Ko 200 00 FO Logiciels pour Macintosh Excel efficace 400Ko 195 00 FO Excel efficace 800Ko 175 00F C0 MacAstuces 200 00 F C Pom Link 3 0 450 00 FO Clv Pom s 200 00 FO InterPom s 2 0 450 00 FO Disquettes de logiciels domaine public pour Macintosh Mac AU BO CO DO EU FO CO WO TO S O 809 0 F pardisquette exemplaire s 60 00 F soit F Reliures toil es pour 6 num ros de Pom s un an Abonnements pour six num ros partir du la revue Pom sseule 225 00 FO la revue et les disquettes Apple 110K 525 00 F CJ la revue et les disquettes Apple 800K 62500 FC la revue etles disquettes Macintosh 625 00 F O la revue Pom s les disquettes Apple 140Ko 5 1 4etles disquettes Macintosh 925 00 F O la revue Pom s les disquettes Apple J 800Ko 3 1 2 et les disquettes Macintosh 1025 00 F O Envoyez ce bon et voire r glement ditlons MEV 12 rue d Anjou 78000 Versailles Nom Adresse R glement par CB Visa Euro MasterCard num ro de ia carte 2a ____ ___ Montant mw Signature Remise de 10 sur Pom Link 3 1 pour les abonn s Oa Ch quebancaire J Ch que postal O Mandat CJ date d expiration D tecteur d appels t l phoniques Cet appareil pour Apple ou Macintosh autorise une surveillance de 1a ligne t l phonique pour l utilisation de
92. QOoTO 820 IF ES GOTO 990 850 PO 2 6 ACCEPT 13 6 0 16 PRS E 860 870 875 880 PO 3 890 900 905 ON NOT E GOTO 10000 ON ES COTO 990 810 700 875 870 500 880 10010 GOSUB 4000 GOTO 850 GOSUB 5000 GOTO 850 amp ACCEPT 13 7 0 16 TLS E8 ON NOT E GOTO 10000 ON ES GOTO 990 850 700 905 900 500 910 10010 GOSUB 4000 GOTO 880 GOSUB 5000 GOTO 880 910 NN 0 915 V NN 11 920 PO 4 930 9 35 940 amp DEPLACE 1 V amp ACCEPT 1 V 0 28 MS NN E ON NOT E GOTO 10000 ON ES GOTO 990 980 700 935 940 500 950 10010 GOSUB 5000 GOTO 915 GOSUB 4000 GOTO 915 950 NN NN 1 ON NN 7 GOTO 990 GOTO 915 980 NN NN 1 ON NN lt gt 989 990 1000 1002 1004 1006 1010 1020 1030 1040 1050 1060 1065 1070 1099 1100 1203 110 1110 1120 1 GOTO 915 NN 0 GOTO 880 amp VIDECRAN amp DEPLACE 1 3 amp AFFICHE Voici votre message tel qu il sera amp AF FICHE enregistr DEPLACE 4 7 E AFFICHE Nom NS amp DEPLACE 4 0 6 AFFICHE Pr nom PR amp DEPLACE 4 9 amp AFFICHE T l ph TS FOR T 0 TO 6 amp DEPLACE 6 11 I amp A EFPIGHE MS I NEXT amp DEPLACE 1 21 amp AFFICHE Pour le valider MOSS 6 LIGNE E AFFICRE amp INVERSE amp AFFICHE Envoi NORMAL amp AFFICHE Pour le modifier k 6 LIGNE 6 AFF
93. R cha ne But Identique AFFICHE mais ajoute un retour chariot la fin de la chaine de caract res Voir aussi AFFICHE ALERTE CHARIOT ALERTE Syntaxe de l instruction ALERTE message bip But Explications message est une variable ou une expression Chaine la longueur de la cha ne de caract res doit tre comprise entre 0 et 36 inclus Les caract res portant des codes diff rents sur l ordinateur serveur et le Minitel sont recod s bip est une variable ou expression enti re qui indique si le message doit tre accompagn s d un bip sonore bip 0 pas de bip bip lt gt 0 mission d un bip Remarques e la ligne 0 est effac e avant affichage du message d alerte e il est possible d utiliser ALERTE pour effacer la ligne 0 en passant une cha ne de longueur 0 comme message e la position courante du curseur est r tablie apr s ex cution de l instruction ALERTE De m me l ensemble des attributs Vid otex sont pr serv s et restitu s Exemples 10 REM Exemples d utilisation d ALERTE 20 ALERTE Touche 4AS T invalide B 30 ALERTE CHS 0 40 ALERTE Communication interrompue 1 Voir aussi AFFICHE AFFICHER MTH APPEL Syntaxe de l instruction APPEL tat But D tecte la pr sence ou l absence d un appel t l phonique Explications tat est une variable enti re contenant au retour Osi aucun appel est d tect 1 siun appelest d tect
94. S u2 S 28 AS u3 28 AS u4 28 AS ups Z AS u6 28 AS u 7S Lecture3 VidEcran ParamT 0 2 0 0 0 0 18 24 27 36 42 54 72 56 Pom n 34 Affiche CHRS 18 CHRS 64 39 Deplace 2 3 Mode 1 AfficheR Consultation des me ssages enregistr s Mode 0 ParamT 0 2 0 0 0 0 Affiche 4CHRS 18 4 CHRS S 64 139 Deplace 9 5 ParamT 0 6 0 0 0 0 Affiche Pr c dent Ligne Affiche Inverse Affiche RETOUR Deplace 11 6 ParamT 0 6 0 0 0 0 Affiche Suivant zm Ligne Affiche Inverse Affiche SUITE o Deplace 15 7 ParamT 0 6 0 0 0 0 Affiche Fin Ligne Affiche inverse AfficheR SOMMAIRE ParamT 0 2 0 0 0 0 AfficheR CHR 18 CHR 6 4439 Affiche CHRS 18 CHR 64 39 Deplace 1 12 ParamT 0 4 0 0 0 0 Affiche CHRS 18 CHRS 64 39 Deplace 1 16 ParamT 0 4 0 0 0 0 Affiche 2CHR 18 CHRS 64 139 Deplace 1 24 ParamT 0 2 0 0 0 0 Affiche CHRS 18 4CHRS 64 139 Lecture2 GET l NumMessage Nom uNS Prenom uPS Telephone uTS Messages 0 u1 Message 1 7u2 Message 2 2u3 Message 3 u4 Messages 4 7u5 Mess ge 5 u6 Message 6 7u7 Deplace 2 10 Affiche Message n STRS NumMessage 1 Depiace 2 13 Affiche Nom Pom s n 34 Deplace 2 14 Affiche Prenoms Deplace 2 15 Affiche Telephones FOR Index 1 TO 7
95. SE amp PARAMT 0 7 4 0 0 0 amp AFFICHE En registrement de votre message amp CADR EE 1 598 3 0 0 2 U 6 DEPLACE 1 5 amp AFFICHE Votre nom NM se E LIGNE amp AFFICH INVERSE amp AFFICHE Suite amp DEPLACE 1 6 amp AFFICHE Pr nom e MT amp LIGNE amp AFFICH INVERSE amp AFFICHE Suite amp DEPLACE 1 7 amp AFFICHE T l phone HE TOU EM nt T ME amp LIGNE amp AFFICH INVERSE amp AFFICHE Suite amp CHARIOT 6 AFF ICHE lt FOR I 11 TO 17 amp DEPLACE 1 1 amp AFEIGHE en IP e a E E LIGNE amp AFFICH INVERSE amp AFFICHE Suite NORMAL 6 MODE 2 Message pr NEXT amp DEPLACE 1 20 amp AFFICHE Pour valider votre message amp LIGNE amp AFFICHE amp INVERSE amp AFFICHE Envoi E DEPLACE 13 21 amp AFFICHE Pour 1 annuler amp LIGNE amp AFFICHE amp INVERSE amp AFFICHE Sommaire amp DEPLACE 13 5 amp AFFICHE N amp DEPLACE 13 6 6 AFFICHE PRS 802 803 805 810 PO 1 820 830 825 840 845 amp DEPLACE 13 7 amp AFFICHE TLS FOR I 11 TO 17 amp DEPLACE l I amp AFFIC HE MS 1 11 NEXT ON PO GOTO 810 850 880 910 ACCEPT 13 5 0 16 N E ON NOT ES GOTO 10000 ON E GOTO 840 830 700 935 930 500 840 100 10 GOSUB 4000 GOTO 810 GOSUB 5000 GOTO 810 IF N THEN amp ALERTE Nem indispensa bec 7 Qes
96. SaisieTelephone SaisieMessage LigneMessage 0 SaisieMessage2 NumLigne LigneMessaget 11 Pointeur 4 Deplace 1 NumLigne Accept l NumLigne 0 28 Mes sage DbigneMessage Dr ON Drz1 GOTO DeconnexionF Val idation SaisieMessage3 EnrMe ssage Guidelmp6 Inact6 Somma ire SaisieMessaged Deconnexi on GuideIlmp GOSUB GuideIndisponlble GOTO SaisieMessage2 Inacte GOSUB spTouchelnactive GOTO SaisieMessage2 SaisieMessage4 LigneMessage LigneMessage 1 IF LigneMessage 7 THEN Valida tion GOTO SaisleMessage2 SalsleMessage3 LigneMessage LigneMessage 1 IF LigneMessage 1 THEN Sais leMessage2 LigneMessage 0 GOTO SaisieTele phone cran de validation Validation VidEcran Deplace 1 3 AfficheR Volcl votre message tel qu il sera AfficheR enregistr Deplace 4 7 Affiche Nom 4Noms Deplace 4 8 Affiche Pr nom 4Prenoms Deplace 4 3 Affiche T l ph 4Telephone FOR Index 0 TO 6 Deplace 6 114Index AfficheR Message Index NEXT Deplace 1 21 Affiche Pour le valider LL Ligne Affiche Inverse AfficheR o Normal Affiche Pour le modifier Envoi Ligne Affiche Inverse AfficheR Correction Normal Affiche Pour l annuler avale JI SH 7 Ligne Affiche Inverse AfficheR Annulation Normal AttenteValidation AcceptF Dr ON Dr 1 GOTO DeconnexionF Enr egistrement EnrMessage
97. Valid ation GuideIlmp Sonmaire Som maire ChoixlImp 7 Deconnexion EnrMessage ChoixImp Alerte Touche interdite 0 GOTO AttenteValldation GuideImp GOSUB GuideIndisponible GOTO AttenteValidation Enregistrement Enregistrement VidEcran Deplace 6 12 Affiche Enregistrement en co urs FIELD 1 2 AS zNombre 8 AS zM ot 16 AS zNom 16 AS ZTel GET 1 1 NombreMessage CVI zNombres NombreMessage NombreMessage 1 LSET zNombreS MKIS NombreMess age PUT 1 1 FIELD 1 16 AS uN 16 AS uPs 1 6 AS uT 28 AS u1 28 AS u2 28 AS u3 28 AS u4 28 AS u5 28 AS u6 28 AS u7 LSET uN Nom LSET uP Prenom Lett uT TelephoneS LSET ul Messages 0 LSET u2 MessageS 1 LSET u3 Messages 2 LSET u4 Messages 3 LSET u5S Messages 4 LSET u65 Messages 5 LSET u7 MessageS 6 PUT 1 NombreMessage11 FOR Index 0 TO 6 Messages Index NEXT fs Dernier cran VidEcran Deplace 6 12 AfficheR Votre message est e nregistr Deplace 11 14 Affiche faltes Inverse pg fg be NA Af C LA x Affiche Sommaire AcceptF Dr IF Dr Faux THEN DeconnexionF IF Dr 8 THEN Deconnexion Pointeur 4 GOTO Sommaire te Fonctions de service Service VidEcran VidRect 1 1 40 6 4 Deplace 10 4 ParamT 1 7 4 0 0 0 Affiche Fonctions de servic e ParamT 077 0 0 0 0 Affiche Sommaire AttenteMot MotPasses Secret 9 12 0 Mot de pa
98. XT DMP Assemblage par ProCODE o F PF P f f f f P P P P A P f p P R p P 88 F f lt P 3 amp P z 2 HARD COPIE FEXTE 40 FT 80 COLONNES e p C EE EE EZE E EE EE EES EE EE EE EE EEE ERE E EE E EAR 5 D 6 ORG S300 7 8 ACL EQU 56 Adresse de d but de ligne 9 LIGNE EQU SB Num ro de ligne 10 GET EQU SFDED Ecriture d un caract re 11 PAGE2OFF EQU SCO54 S lection page 1 12 PACEX2ON EGU Scoss S lection page A 13 ROBOCOL EGU COIF Test 40 ou 80 cclonnes 14 15 nnmnnn e E E E mm EE E vm pm mm ml J6 D but du programme 17 A om me om e a aa mm a a e EENHEETEN 18 19 ERT LDA 0 D but Hard Copie ligne O 20 uCTI PHA Sauvegarde num ro ligne 21 22 Fmmmmmmm aana nemeni mn 209 Calcul de l adresse de d but de la ligne 24 Tome e rm e e e e e E e e e e E E e e e e E e E E E EE e e e em 25 26 PHA 27 LSR 28 AND 3 29 ORA 53 Routine VTAB 30 STA ADL 31 PLA 32 AND 18 33 BCC HCT2 34 ADC S7E 395 Pet STA ADL 36 ASL 34 ASL 38 ORA ADL 39 STA ADL 40 41 Fe O 42 Ecriture d une ligne 43 mm mm mm 44 45 LOY 0 zY pointe dans la ligne 46 47 HC 3 LDX 7F Est on en mode 48 CPX RD80COL 4 80 ou 40 colonnes 49 BCS RCTS Si en 40 colonnes 50 51 CARACTERE EN PACE iA 52 LDA 0 53 STA PAGE2ON Activation page ZA 54 LDA ADL Y 55 STA PAGE2OFF Retour en page 1 56 BMI HCT4 57 AND S 3F
99. accessoires Pinpoint ET applications TimeOut devront donc utiliser KeyPlayer le programme de macros de Pinpoint Mais KeyPlayer n automatise que les fonctions AppleW orks pas celles de Pinpoint ni celles de TimeOut et ne marche pas avec AppleWorks francais Bien entendu vous tes compl tement perdu dans le d dale des infonnations qui pr c dent cela prouve que vous tes normalement constitu j ai du mal m y retrouver moi m me Ne nous plaignons pas trop de notre difficult comptabiliser notre fortune et simplifions Si vous utilisez AppleWorks 1 4 fran ais vous ne pouvez rajouter AppleW orks qu un seul programme de macros Super MacroW orks et un scul programme d extensions Pinpoint Vous ne pourrez pas les utiliser en m me temps il faudra quitter l un pour utiliser l autre Et vous n aurez acc s qu certains accessoires de Pinpoint Si vous utilisez AppleWorks 2 0 am ricain le tableau joint cet article devrait vous clairer un peu plus UitraMacroWorks OU SuperMacroWorks TimeOut UltraMacros le dernier n de Randy Brandt est bel et bien encore plus dou que son a n SuperMacroW orks Mais il partage avec lui le temp rament fier et A ind pendant de son auteur Car quoi qu en dise Beagle ce n est pas vraiment une application TimeOut comme les autres Il ne se loge pas dans le bureau d AppleW orks mais dans la place laiss e libre par celui ci la carte lang
100. age de la m moire auxiliaire c est d ailleurs pourquoi il est le seul TimeOut qu on puisse recommander au m me titre que Super MacroW orks ceux qui n ont que 128Ko de m moire Il n est pas un subalterne docile qui reste sa place tant qu on ne l appelle pas comme les autres TimeOut Bien entendu il est compatible avec les autres TimeOut mais c est pour les commander Il m a fallu fouiller mais jai pu d couvrir page 26 de la documentation une de ses fonctions les plus int ressantes il automatise galement les fonctions des applications TimeOut UltraMacros est une sorte de langage de programmation complet pour AppleW orks et TimeOut qui int gre toutes les commandes de l Applesoft y compris les manipulations de chaines et en rajoute m me IF THEN ELSE Il permet d introduire ses propres routines machines dans AppleW orks avec les macros Peek Poke et Call de cr er des macros avec et G des macros r veil qui se d clenchent lheure choisie des fichiers t ches qu on lance depuis le s lecteur du ProDOS il teint provisoirement l cran quand vous allez prendre un caf i corrige le bug du Control dans la d finition des codes imprimantes Mais il ne reconnait pas la version fran aise 1 4 d AppleW orks ni les macros d j existantes de SuperMacroW orks fran aises ou non Les macros que vous avez et aurez pour la version frangaise de SuperMacroW orks ne tourneront pas sur UltraMacros
101. aitement fiable pratique et son ergonomie pourrait faire rougir de honte les programmeurs de la plupart des serveurs Vid otex dits serveurs kiosque Si vous ne programmez pas et comme l accoutum e cette application est disponible pr te lancer sur la disquette d accompagnement Mac 24 de Pom s Un r pondeur t l matique pour quoi faire I est inutile de pr senter ici le traditionnel r pondeur t l phonique mat riel pas tr s pratique il faut enregistrer un message tout en ayant l air d contract dynamico branch c est la mode et intelligent ce qui en ce qui nous concerne requiert beaucoup d efforts ainsi propos du programme Envoi Vid otex Pom s 33 Le mini protocole utilis par ce pro gramme qui envoie les images cr es par Paint w Minitel n est pas reconnu par tous les Minitel demande d identification Dans certains cas l image Vid otex n est donc pas mise Afin de rem dier cela nous avons plac sur la disquette d accompa gnement de ce num ro une version plus universelle Les disquettes d accompagnement Macintosh maintenant en 800Ko La taille des syst mes d exploitation des utili taires polices de caract res n allant pas len diminuant il devient tr s difficile de tout loger sur une disquette simple face 400Ko INous passons donc aux in vitables 8 00Ko ce qui nous permet pour ce
102. alne y Sessai ds Jsr envoi oc1 ds dey oc2 ds bpl okl oc3 ds 0 jsr recoitl reponse dg bcs 1 Sfin jar dec essal jar bit essai sta bne Sok sty lda 0 lda beq Sreponse and 1 cmp 61F bmi bne 0 imp jsr recoitl 2 lda cup 3E ldy bcc Sek ata jJsr recoitl dey cmp 3F tya bcc Sok sts lda 1 jar Sreponse ldy l jar sta varpnt y sta dey sty tya lda sta Ivarpnt Y and rts bmi essal dg 1 Jm chalne hex 11B02663A1B 3 lda ldy Rm m m mm sta fixe dey t tya sta fixe jsr envollB Jar lda 49 jar jm envoi sta sty me lga r flash and bmi mp flash Jsr envoilB 4 ld da 548 ldy jmp envoi sta dey rr E ki ak tya gr sta 2 2222 2 2 2 jar jar qr ida S0E sta jop envoi sty lda and Le bni Source PL 4 TA Assembleur ProCODE wx sta dey EQ C ENSEM TREES tya ident sta TER MC I F rts ident ida I cherche 3 fois a sta Sessal la r ponse init Sdebut ldy 0 d lda interc y beq 0 nit jar jsr envoi stx iny txa bne d Ora 50 jsr recoiti ata bes 1 ata dec esssi ata lda Sessai 51 lda bne 0 cmp sta Sreponae bne jmp Sfin lda Sinterr dfb 1B 3A 66 3 27 57 7B 0 sta 1 emp 51 est ce le 1 sta bne 0 lda jsr recoitl oui attend ler asl bec Sdebut octet asl sta ocl asl getbytc nosiot ESCO 5 2 442 142 c00c 831 err CO status l datatl noslot attand 2 me octet attend 3
103. an emo aa WEND IF Diog 5 THEN GOSUB MaJ GO TO BDial25 Dlog DIALOG l ON Dlog GOTO Precedent Suivan t Vider Annuler Precedent IF NumMessage 2 THEN BDial25 NumMessage NumMessage 1i IF NumMessage 2 THEN IF BUTT ON 1 THEN BUTTON 1 0 IF NumMessage lt NombreMessage 1 THEN IF BUTTON 2 0 THEN BUTTON 2 1 GOTO LectureMac Suivant IF NumMessage NombreMessage l1 THEN BDial25 NumMessage NumMessage 1 IF NumMessage NombreMessage 1 THEN IF BUTTON 2 THEN B UTTON 2 0 IF NumMessage 2 THEN IF BUTT ON 1 0 THEN BUTTON 1 1 GOTO LectureMac Vider GOSUB Confirmation IF NOT Dr THEN LectureMac Dr Faux Annuler WINDON CLOSE 2 RETURN Mad PENPAT VARPTR Gris 0 MOVETO 8 24 LINETO 184 24 MOVETO 98 72 LINETO 134 72 MOVETO 8 160 LINETO 184 160 MOVETO 8 192 LINETO 184 192 MaJBis MOVETO 12 16 PRINT xNumMessages MOVETO 12 40 PRINT xNoms MOVETO 12 51 PRINT xPrenoms MOVETO 12 62 PRINT xTelephones FOR Index 0 TO 6 MOVETO 12 88 11 Index PRINT xLigneMessageS Index NEXT RETURN re Dialogue confirmation Confirmation WINDOW 1 100 120 411 189 Iw Ee era TEXTFONT O TEXTSIZE 12 C Fichiers BoucleConfirm DP INSTR C IF DP THEN CS RIGHTS CS LEN C DP GOTO BoucleConfirm BEEP MOVETO 16 24 PRINT Voulez vous effacer le contenu du fichier MOVETO 16 40 PRINT wem CS nons BUTTON 1 1 Annuler 72 56 176 72 BUTTON 2 1 0K 192 56 296
104. an Bird et une nouvelle application qui se charge en prenant une partie du bureau d AppleWorks fonctionnant en overlay un segment de programme charg momentan ment du disque d AppleWorks Nul besoin de sauver puis recharger l tat pr sent de la m moire AppleWorks comme avec Pinpoint C est l videmment une ouverture fantastique pour AppleWorks loin de fournir comme Pinpoint des accessoires suppl mentaires dans une application ou des applications ext rieures la premi re TimeOut transforme AppleWorks en une sorte de super syst me d exploitation pilotant des applications int gr es On peut parfaitement imaginer par exemple un assembleur TimeOut assemblant sous AppleWorks des sources constitu es de fichiers traitement de texte Disons que TimeOut r ussit avec AppleWorks sans menus d roulants ni fen tres mais avec une transparence parfaite ce quia t rat mon humble avis sur IBM avec Windows un int grateur d applications Ou bien disons que de m me qu il existe un atelier du programmeur Apple Programmer WorkShop sur GS il existe maintenant un atelier de l utilisateur Apple works sur c e et IIGS on peut tout faire sans sortir de son atelier Telle tait la philosophie de Bob Lissner l auteur d AppleWorks il faut bien s r int grer l interface utilisateur mais ce ne sont pas les menus d roulants souris fen tres etc qui font l int gration Il s agit
105. asse par l option 3 est fiable les caract res frapp s au clavier sont remplac s l cran par des par souci de discr tion et le nouveau mot est demand deux fois pour tre l abri des fautes de frappe I 9 Pom s n 34 Programme REPOMDEURHR 3 IF PEEK 104 256 PEEK 103 lt gt 7681 THEN POKE 103 1 POKE 104 30 POKE 7680 0 PRINT CHR 4 repomdeur 6 PRINT CHRS 21 HOME 10 PRINT CHR 4 pom link 2 1 11 amp INIT 2 NS PR TL mm FOR I 0 TO 6 MS I NEXT PO 0 12 DS CHRS 4 FIS f c repomdeur 22 ONERR GOTO 25 23 PRINT DS open FIS 1255 PRINT Ds read FI r0 INPUT LG MOS TES NOS 24 GOTO 30 25 ONERR GOTO 20000 26 MOS ABCDE TES 1 12 34 56 78 NOS M XXXXXXXx 27 PRINT D wrlte FIS r 0 PRINT 0 PRINT MOS PRINT TES PRINT NOS 30 PRINT DS close 38 GOTO 9000 40 HOME PO O ES 0 45 US Attente d un appel Esc menu GOSU B 8000 49 REM attente de l appel 50 amp APPEL A 51 IF PEEK 49152 155 THEN POKE 49168 0 GOTO 9000 52 ON NOT A GOTO 50 55 U Appel recu attente de connexion GOS UB 8000 60 amp CNXR A 7 0 ON NOT A GOTO 10010 75 U Connexion ok serveur actif COSUB 80 00 97 REM E LL ESI EE Eege 98 amp MTH 1 990 4w 6 DEPLACE 1 13 100 amp AFFICHE Q Je 700000098 c ie 101 amp AFFICHE c eo
106. bERERS ERR mamddH e Rt ssossgRRRARRSERdaaBddS ssEAZmaRETaRU SERRRRZZABEN P EN a EM Apple for ever Jean Yves Bourdin ditorial Herv Thiriez Copie de l cran texte 40 et 80 colonnes Yvan B ard E E SE rr aan t l mati 1 que gt d o E x AppleWorks des macro commandes R pom deur o o oo Dimitri Geystor mode d emploi Apple page33 p mode d emploi Mac H AU E e Initiation D OPA Mac Le passage des en iz po x Pom Link vs mode d emploi pagell liste es instructions D A l essai M i Les TimeOut ric Weyland Tm RE Bibliographie Alexandre Duback Alexandre Avrane Jusqu 72 L7 7 Bo te aux lettres avec Page 69 MacWrite Be D Tire St phane Dedeyan f Guillaume Lejeune Fetutes annonces St Page 61 Page 71 ema Les annonceurs American Computing page 49 Apple pages 72e 73 Br joux AE page 8 La Commande Electronique pages 4 et 5 LOGMA S A page 2 ditions MEN 12 rue d Anjou 78800 Versailles T l 1 39 51 24 43 Directeur de la publication Herv Thiriez Imprime en France N d impression 785066 Depot ilegal janvier 1988 Dom suu oa i 3 Ashton Tate et La Co pr sentent c a Project Edit ibintours Nous Design Project Edit ibimdous fie inagrhot informations Soci t Field Name Total
107. cic v2 sul gt v2 2 ade 3F cnxr ldy 5 envoie les C rac cmp vert amp a lda 2 y de connexion amp v1 bne colod jsr envoi retourn e 2 zinc lda 5 9F mode texte dey Serrf Jar envoi bpl a curseuri jer envoilF jsr chkcom virgule 7 59 clc jsr ptrget recherche variable lignagO lda vi sta varpnt enti re Slignaqe adc 41 sty varpnt l to0 jar envoi lda varnam lignaq0 cic and varnam I h1 lda hl wmi al adc 41 jmp miserr 40 jer envoi al bit pint hori jar envoil5B bpl Ga Stype lda coulc lda 15 2 jsr envoi bne a3 t01 rts Sai lda 60 60 essais 1 mn hori Sai sta Sessai coulcar ligne ldy EQ Sok jsr recoitl sattend la r ponse coule SL1 lda chaine y bes 51 carac re u type jer envoi dee essal 2 iny lda essal Stype2 cpy 15 bne Sok 69 tentatives cou1 fd bne L1 peq reponse ion a chou couif rts 1 emp 13 re u 13 2 1B bne Sok non on boucle coulc 1I colonne dy 0 11 jar recoitl soul attend un 11 SLI Ida chaine y cmp 13 scaract re 13 0 Si type 2 laisse jar envoi beg S11 coulcs1 la couleur fond iny cmp 53 z 53 7 ou coulf cpy 11 beq 110 Sh2 scalcule r p tit ne iLl emp 51 re 951 ida caract bne Sok Sinon on boucle sh1 jmp envoi 110 ida 1 drap 1 ok 3D reponse ldy 1 net la r ponse repet chaine dip SIE pha dans var type caract ligne haut vert df 40 sta varpnt y lh y hori dfb 40 dey caract graphO0 dfb SOE 1B tya ahg Y
108. ckford Drive Tempe Arizona 85281 USA Compatibles periphericals Inc 6363 Taft Street Suite 305 Hollywood Florida 33204 USA D D A Technopole rue M Faraday 78180 Montigny Le Bretonneux 1 3045 26 62 Diversified Software Research 34880 Bunker Hill Farmington MI 48018 2728 USA Epyx Inc 600 Galveston Drive Redwood City CA 94063 USA Froggy Software 33 avenue Philippe Auguste 75011 Paris T 43 58 25 98 GS Magazine 320 rue Saint Honor 75001 Paris Gribouille 16 rue dc Poules 67000 Strasbourg Microtech Consulting Company 206 Angie Drive Cedar Falls A 50613 USA Mindscape Inc 3444 Dundce Road Northbrook IL 60062 USA Perlin Electronics Inc 7394 Calle Real Suite B Goleta CA 93117 USA Pinpoint Publishing 5901 Christie Avenuc Emeryville CA 94608 USA Roger Wagner Publishing 1050 Pioncer Way Suite P E Cajon CA 92020 USA Signum Microsystems 120 Mountain Avenue Bloomfield Connecticut 06002 USA Sun Data Ampersand 16 rue Julia 13005 Marseille Sybex 6 8 impasse du Cur 75881 Paris Cedex 18 amp 42 03 95 95 TML System Customer Sales Dcpartment 88237 B Goodbys Executive Drive sr r I ua O x ayuy L Z mW mmm 68 Jacksonville Florida 32217 USA Triad Software 125 North Washington Street Papillion NEbraska 68646 USA VersionSoft 94 rue Lauriston 75116 Paris amp 47 27 71 72
109. commune l Apple et au Macintosh t retenue et pour ne pas dupliquer les exemples voici le mode d utilisation sur chaque appareil Sur l Apple La premi re instruction du programmc Basic serveur doit tre la suivante IF PEEK 104 7681 THEN POKE 7680 0 x 256 PEEK i48 lt S ROKE 108 1 POKE 10M S0 PRINT CHRS 4 mom Xs s s sa e die X SE ze 4 NER gp zg ZA Q Es S P mmm X1 dE uo KG 125 12 o nom est le nom de votre programme Basic La ligne suivante sera PRINT CHR 4 POM LINK 2 1 Les nouvelles instructions sont alors disponibles avec la syntaxe suivante Instruction dans le mode d emploi de Pom Lk ALERTE interdit 2 Sur l Apple amp ALERTE interdit 1 Autrement dit les mots cl des nouvelles instructions sont pr c d s de amp et suivis de Sur le Macintosh L instruction suivante devra tre plac e avant l occurrence de la premi re instruction de Pom Link utilis e LIBRARY Pom Link 2 1 D s lors les nouvelles instructions sont disponibles telles qu elles sont d crites dans leur mode d emploi ALERTE Interdit 1 condition toutefois d avoir plac au d but de votre programme l instruction du Basic Microsoft DEFSNG A Z ou DEFDBL A Z Si vos habitudes vous conduisent utiliser DEF INT ce qui est notre humble avis la meilleure solution ou DEFSTR il vous faudra placer un point exclamation ou
110. ctil Effacer Guidelmpll Sommaire Sommaire Inactll Deconnexion Inactll GOSUB spToucheInactive GOTO AttenteEfface Guide mp11 GOSUB GuideIndisponible GOTO AttenteEfface AttenteEfface2 IF Reponse OUI THEN Repon se s Alerte R ponse inco rrecte 0 GOTO AttenteEfface FIELDS1 2 AS zNombre 8 AS 2M ot 16 AS zNom 16 AS zTelS GET 1 1 LSET zNombre MKIS 0 PUT 1 1 VidEcran Deplace 6 12 AfficheR Le fichier a t r initialis Deplace 11 14 Affiche faites Inverse Affiche Sommaire AcceptF Dr IF Dr Faux THEN DeconnexionF IF Dr 8 THEN Deconnexion GOTO Sommaire Te Changer le mot de passe ChangeMot VidEcran VidRect 1 1 40 6 4 Deplace 14 4 ParamT 1 7 4 0 0 0 Affiche Mot de passe ParamT 0 7 0 0 0 0 Deplace 1 23 Affiche Pour renoncer faite SL Inverse Affiche Sommaire Deplace 1 11 Affiche Taper le nouveau mot de passe Inverse Affiche Envoi Deplace 1 16 Affiche Taper 1e nouveau p our contr le Cadre 25 1295 14 2 0 0 Cadel 29 17535 19 2 0 5 0 n B k a m e s m ita o amam ni d ni bui 58 VerifMot Reponse2 Secret 27 13 0 7 Reponse2 aD ON Dr 1 GOTO DeconnexionF Ver ifMot2 Inactl2 ChangeMot Gui deImpl2 lnactl2 Sommaire Ver ifMot2 Deconnexion Inact12 GOSUB spTouche nactive GOTO V
111. ctor d Applied Engineering ce qui est malin ou l improbable propri taire d un e qui l aurait laiss 64Ko avec une carte 80 colonnes non tendue et aurait fait l une des deux modifications pr c dentes pour charger quand m me AppleWorks Attention la version frangaise que nous diffusons est la version 1 2 Cette version tant d bugu e il ne faut plus faire le patch de Pom s 33 page 67 Si vous avez une version ant rieure contactez votre revendeur Si vous n avez que la version US de SuperMacroworks adressez vous Dimitri Geystor Pom s 33 page 63 Et si vous n avez pas encore SuperMacroWorks Prix 500 00 F TTC abonn s 450 00 FTTC Port 20 00 F omme c est la amp lecture de l arti 8 cle de J Bourdin dans Pom s 33 qui m a fait passer commande au p re No l de quelques programmes de la s rie des TimeOut de Beagle Bros je n ai pas pu refuser quand d il ma demand d expliquer ici pourquoi je suis bien content d avoir pens mettre mes sabots dans la chemin e Le principe continuer AppleWorks La s rie des TimeOut ajoute une quantit de fonctions nouvelles AppleWorks la fois parfaitement ind pendantes les unes des autres et totalement int gr es aussi bien AppleWorks qu entre elles chaque disque TimeOut fournit en m me temps une modification d AppleWorks qui est le noyau int grateur commun v ritable exploit de programmation sign Al
112. d m me si eile peut th oriquement rentrer dans tous les slots sauf le slot 3 du e elle d borde beaucoup droite En cons quence elle est en fait pratiquement r serv e au slot 2 du e et au slot 7 ce qui marche impeccablement sous ProDOS mais pas sous Pascal Ensuite elle accepte les drives Apple 3 5 du GS mais n ob it pas l jection manuelle ce qui n est pas grave c est si facile par programme Enfin elle ne reconnait pas les disquettes prot g es du GS raison de plus pour ne jamars utiliser un programme prot g sur GS Ajoutons que comme les drives 800Ko sont pilot s par la carte et pas par l unit centrale elle n accepte pas les programmes qui comme Diversi Cache modifient les routines de lecture criture Bill Basham a d couvert pas mal de bugs dans cette carte mais ils ne vont jamais jusqu la perte d un fichier en m moire ou la ruine d une disquette C est donc malgr tout la solution de loin la plus conomique pour tout Apple II d muni de lecteur 3 5 Voil donc votre e ou e entin niveau vous avez un Apple 88 Ceci dit faites vos comptes une carte acc l rateur plus un 65802 plus une interface pour lecteur 3 5 plus une carte m moire de 1 M ga c est vrai a ronfle et c est au point Mais c est tr s en dessous d un GS et a n est pas un GS pour un prix qui lui est bien voisin Patchworks Voici comment raccourcir le temps de chargement d AppleWor
113. des Ventes Tent O Index 3 Field Types Data Type ITI L Regwired Cuntents are ea 33 SC me Justify Post logical j Format Fired Decimal Pid Choices Decimol H Graphic Thousands L Nagatiue La Currency IF initial Value C Keep New Initial Value H sa informations G n rales CN rum dmn has E OO Om eg pas 76100 jasa reme ferr omine 0 100 RES ECHO i LI Els IH ded Show Procedure Project Edit indem Dieu Snapshot Project Edit iindonr imu KA Gestion club Ulid o atabaas Structus Create New File ar Stractura Creete New File O Croate Structgre for Enisting file File Type yator Farrage ketum Field Size Field Delimiter Relation pmt sn br eet den de Bases de dandan Jalatiseso Q TI aii Project Edi Windows Daisfile 1 mm EVEN Lait men Project Edit Windows Mew Snmpshot i E ya 2 iii in Ge Ee Geteste Facture ES EL i Soci t de Maintenance CRE Prager OF MentenisFes ration nantanteFacturatisw UideoaFacturation WEH 2 DO BSETMEXTUIEB 7Saiziw Cllaentz T VR dE turah jeni fsntanieFucturali W A Fac en Face tue sl lon OTHERUISE PROJECT Path Facturatian Relations mmande Electronique BASE Mac E dBASE Mac est disponible SH C est le plus puis
114. dique si le cadre doit tre trac avec des caract res semi graphiques joints ou dis joints lignage 0 caract res joints e lignage lt gt 0 caract res dis joints Si Type 2 lignage est ignor couleur C est une variable ou expression enti re repr sentant la couleur des caracteres couleur F est une variable ou expression enti re repr sentant la couleur de fond e 0 noir 0 de gris rouge 50 de gris 2 vert 7096 de gris e 3 jaune 90 de gris 4 bleu 40 de gris S magenta 60 de gris 6 cyan 80 de gris 7 blanc 10096 de gris Remarques e le rectangle minimum est de 3 caract res par 3 e apr s affichage du cadre le curseur est plac dans l angle sup rieur gauche du cadre e lors du retour au programme Basic le Minitel utilisateur est en mode texte curseur invisible Exemples 10 REM Exemples d utilisation de CADRE 20 CADRE X1 Y1 x2 Y2 T L CS F 30 CADRE 10 A 9 B 24 1 1 C 2 F A Voir aussi VIDRECT CHARIOT Syntaxe de l instruction CHARIOT nombre But Provogue nombre retour chariot Explications nombre est une variable ou expression enti re facultative 15 TU E WT NANA ET 2 AET e ETSI Z K E ZX Z s E E b A ZE SE Py UT qui indique le nombre de retours laligne effectuer Si nombre est omis CHARIOT provoque un seul retour la ligne nombre doit tre compris entre 0 et 24 inclus Exem
115. double hauteur sollicitation est une variable ou expression chaine qui sera affich e avant la zone de saisie proprement dite Le nombre de caract res de sollicitation doit tre compris entre 0 et 39 inclus V OUS Y Poms n 34 longueur indique le nombre maximum de caract res qu il sera possible d entrer dans la zone de saisie Afin de mat rialiser la zone ACCEPT affiche autant de points que n cessaire longueur doit tre compris entre 1 et 39 inclus retour est une variable chaine dans laquelle sera retourn e la chaine de caract res entr e Si la variable chaine retour n est pas vide son contenu sera utilis comme texte par d faut et affich en d but de zone de saisie La longueur de la chaine de caract res repr sent e par retour ne peut pas tre sup rieure la longueur de la zone de saisie tat est une variable enti re indiquant les conditions de sortie de l instruction e tat 2 0 pas de caract re saisi depuis plus de 2 minutes voir le paragraphe C t utilisateur tat 1 sortie par ENVOI ou retour chanot tat2 2 sortie par RETOUR s tat 2 3 sortie par REPETITION e tat 4 sortie par GUIDE tat 5 sortie par ANNULATION voir le paragraphe C t utilisateur e tat 6 sortie par SOMMAIRE e tat 7 sortie par SUITE e tat 8 sortie par CONNEXION Remarques la somme de colonne longueur de sollicitation longueur ne doit pa
116. e cette p dagogie souriante qui enseignait sans qu il s en aper oive au lecteur ma triser sa machine et peut tre qui sait devenir un jour un auteur Beagle Nous sommes au royaume des pros tenue stricte documentations clean compartiments tanches PLUS LOIN utilisateurs vous tes pri s de parler devant l hygiaphone Gardons cependant confiance les meilleurs programmeurs Beagle dont Rand y et une majorit d utilisateurs ont toujours lesprit Wozniak Randy Brandt qui n a pas perdu l ancienne mentalit pars me ses programmes d allusions de clins d ail et d informations presque cach es Un conseil lisez listez testez tous les fichiers des disquettes TimeOut Randy a m me fond une mini entreprise appel e Jem Software qui diffuse pour un prix d risoire des mini programmes de l ancien style Beagle Si Herm s le Dieu messager y consent je pourrai pcut tre vous entretenir un jour d un certain Patchmania Des cerveaux comme ceux d Alan Bird Randy Brandt ou Mark Simonsen sont siictement incapables de se limiter am liorer le programme du concurrent Ce sont par essence des cr ateurs ils ont d j su avec TimeOut inventer les chemins de l avenir Pr parons nous d autres belles surprises Beagle Bros P re No l 6215 Ferris Square Suite 100 San Diego CA 92121 USA Jem Software Randy Brandt P O Box 20920 El Cajon CA 92021 USA PBI Softwa
117. e l information Allez chiche trouvez le nom et le prix d un programme qui en fasse autant sur une autre machine Sous le capot Pour un prix inf rieur celui d un lecteur 3 5 vous pouvez aujourd hui mettre un disque dur 20 M gas dans votre Apple Vous avez remarqu que les clones IBM sont munis de disques durs bon march videmment un petit malin a r alis une carte d interface entre ces disques durs et l Apple Ji e IIGS Il s agit de la carte Megaboard de Perlin Electronics La carte co te 200 dollars et supporte ProDOS DOS 3 3 Pascal CP M Pour 500 dollars 2 750 F au cours d aujourd hui vous avez la carte et un disque dur de 20 M gas Reconnaissons cependant que la carte Speedisk si elle ne fait qu un M ga est beaucoup plus rapide silencieuse et sans doute durable aucun l ment m canique Savez vous que vous pouvez pour 25 dollars mettre un processeur 16 bits dans votre e ou c I s agit du microprocesseur 65802 vendu par Roger Wagner Publishing et produit par le Western Design Center concepteur du 65816 le microprocesseur du GS Ce microprocesseur reconnait toutes les instructions et tous les modes d adressage du 65816 a les m mes modes mulation et natif mais bien entendu ne fait pas l adressage m moire sur 32 bits par page de 64Ko et ne vous met pas un GS dans le c Il fait tourner les programmes 8 bits existants plus ceux sp cialement crits pour lui un seul aujou
118. e mot de passe cas o vous l auriez communiqu un ami client pour d monstration Hard comment faire L ordinateur Ce programme fonctionne avec Apple Rom minuscules carte langage carte Super S rie Appleou Apple e carte Super S rie Apple ou Apple c ou Apple IIgs sur port s rie int gr ou carte Super S rie Apple Le Minitel Il sera n cessairement bi standard 1B c est dire avec modem retournable aujourd hui c est presque tou jours le cas Le d tecteur de sonnerie Peu importe son type celui dont le sch ma a paru dans le num ro 33 de Pom s convient celui vendu par votre revue pr f r e galement Notez toutefois que la fiabilit de l ensemble est directement fonction de la qualit des composants utilis s Le c ble Minitel Apple Il est maintemant bien connu Vous l utilisez d j avec MinBas Pom s 27 InterPom s 28 T Pom s 30 Clv_Pom s HGR Minitel 33 S il vous manque Pom s en dispose Le port ou la carte s rie de l Apple Sur les Apple ou e la carte s rie sera configur e ainsi sw Map 38 terminal s w2 Um Sur votre IIGS l aide du tableau de bord mettre toutes les options port modem par d faut sauf Data Stop Bits 7 1 Parity Even DCD Handshake No DSR DTR Handshake No Soft comment faire Ce paragraphe ne vous concerne que si vous ne disposez pas de la disquette d accompagn
119. e num ro 34 sur un Apple IIGS ce programme fonctionne indiff remment avec le port s rie int gr ou la carte Super S rie Apple Pour connecter le port int gr du IIGS utilisez un cable pour Macintosh Plus FE Je d sire recevoir d tecteur d appels Apple 500 00 F d tecteur d appels Macintosh 500 00F P c ble Minitel Apple amp SSC 225 00 F c ble Minitel Apple c O 1025700 et T c ble Minltel Mac 128 512K a 225 00 F c ble Minitel Mac Plus IIGS 225 00 F c ble Minitel IBM PCIM na 22 44 225 00 F i i c ble de llaison locale __ amp 225 00F si vous tes abonn s vous b n ficiez d une remise de 10 sur le prix du d tecteur soit 450 F au lieu de 500 F pr ciser le type des deux machines relier Mac 512 Mac Plus Apple e Are IGS IBM PC Envois par avion ajoutez 15 F par c ble et ou d tecteur ditions MEV 12 rue d Anjou 78000 Versailles Nom _ KZ Adresse Se C c En cas de r glement par CB Visa Eurocard Mastercard num ro de la carte date d expiration Montant F Signature Automatiser AppleWorks version francaise 1 4 Utiliser la souris Programme am ricain sur disquette 800Ko sur disquette 140Ko Version francis e sur disquette 140Ko Documentation francaise Disquette Bonus de Dimitri Geystor Documentation am ricaine 500 00 F abonn saPoms 450 00 F Frais de port 20 00 F Banc d essai Pom s 3
120. e seule commande d aller chercher une adresse dans une base de donn es d adresses d ouvrir un fichier traitement de texte et de faire la mise en page d une lettre type contenant vo e en t te l adresse du destinataire choisi et la date petit raffinement cette macro par la m me occasion et sans intervention suppl mentaire renommera le fichier treitement de texte ouvert en lui donnant le nom qui figure dans l adresse Les deux fichiers de macros AND OR ROUND et COMPTE MOTS pr ts l emploi sont inclus dans la disquette d accompagnement de ce num ro de Pom s HGR Minitel sur c Sur les Apple c la configuration de l interface est perdue chaque PR Aussi dans le programme de transformation d images HGR en images semi graphiques Minitel Pom s 33 il convient de modifier les lignes suivantes 40080 PRINT CHR 4 PR 2 PRINT CHR 1 1D CHR 1 3P CHR 1 8B 63040 PRINT CHR 4 PR 2 PRINT CHR 1 1D CHR 1 3P CHR 1 8B Sur la disquette d accompagnement de la revue ce petit probl me avait t r gl Pom s n 34 J L DBazanegue C Piard Sea les destinaient pas a priori une SS publication dans les pages de Pom s SS mais plut t en logiciel dit part 7 Pom s se devait toutefois la fid lit ww de ses lecteurs aussi ce serveur Vid os vous est propos en deux versions qui satisferont les besoins de chacun La version 2 1 dont nous discuterons
121. ege sek Z AA NAN pese cea Aff cheR V Z v J J VN AN ACCRO EE OR uA D CE ZA TE PE E y gt e Affw whewl P d Rx IN e 7 w AfficheR J Nu JAJA L Afficher V VZ f jt li ES AfficheR ka t J 39 337 77 Afficher S ei V Z VZ Ce AfficheR f In AkficheR f Affhchem i Jj Affiche V BaramT 1 2 0 0 0 0 Affiche La revue des Apple Haut 12 Bas 4 Deplace 9 17 PamamT 0 2 Q 0 0 0 Affiche CHR 18 1CHR 86 Deplace 12 18 ParamT 0 3 0 0 0 0 Affiche CHR 18 4CHR98 92 d CM Temp TIMER WHILE TIMER lt Temp 2 WEND Te Seconde page Page2 VidEcran Cadre 1 14405 7 2 50 5 30 Cadre 1 8 40 20 2 0 5 0 Deplace 5 3 Affiche Vous tes bien au TelephoneServeur Deplace 5 5 Mode 2 AfficheR NomServeur Deplace 4 10 Affiche Votre interlocuteur est un Deplace 4 12 Affiche ordinateur Apple pr t enregistrer Deplace 4 14 Affiche vos messages et conf idences Deplace 13 18 Affiche Acc s au menu Inverse Affiche Suite Deplace 18 19 Affiche Renoncer Inverse Affiche Connexion BouclePage2 AcceptF Dr ON Dr 1 GOTO DeconnexionF Som maire Inactl Page2 Inactl In actl Sommaire Sommaire Decon nexion Inacti Inactl GOSUB spToucheInactive GOTO BouclePage2 Sommaire Sonmaire VidEcran VidRect 1 1 40 6
122. ement de ce num ro Il vous faut saisir et sauvegarder sur une disquette ProDOS le programme Basic Repomdeur En ce qui concerne Pom link 2 1 m me pensum il est toutefois plus fiable de reprendre le source et de l assembler car les erreurs sonten principe d cel es plus facilement Sur voire disquette n oubliez pas de mettre ProDOS 8 version 1 1 1 ou plus et Basic System Avant de lancer l ensemble modifier la ligne Basic 26 pour indiquer votre mot de passe la place de ABCDE de 4 7 caract res votre num ro de t l phone la place de 1 12 34 5678 maximum 15 caract res votre nom la place de M Xxxxxxxxxx maximum 15 caract res L ensemble est alors pr t enregistrer fid lement les messages faire simplement RUN REPOMDEUR La premi re t che du programme sera de cr er le fichier le message Erreur 18 s affiche si la disquette est prot g e en criture Changer de nom Petite simplification de programmation le changement du nom et du num ro de t l phone n est pas pr vu La m thode est la suivante effacer le fichier de message par DELETE FIC REPOMDEUR puis modifier la ligne 26 et RUN REPOMDEUR 34 Au menu Quatre options sont propos es l cran de l Apple 1 Activer Ie serveur votre ordinateur se met l coute de la ligne et attend patiemment le premier appel On sort de ce mode par ESC 2 Lire les messages vous avez pu aussi
123. er esprit de regles inuti les et parce que le progres et l exp rience doivent trev cuscomme un enrichissement et non comme un changement syst matique de m thode Et comme derriere chaque utilisateur se cache un homme nous avons en d finitive encore plus le sens des affaires Macintosh Il Madneshili Apple k logo Apple et Macintosh sont des marques d pos cs de Apple Computer Inc Geet cu une ararque d pos e de Aldus Corporation Excel est une arque d put e de Micrasnf Corporalnn Cricket Draw at Cricket Graph sont distribu s par AJpha Systemes k A e Revues Pom s n 8 3500FUDJ n 14 4000FO n 19 4000F 0 n 24 40 00F0 n 29 45 00F 01 n 34 4500 FD n 10 40 00F 0 n 15 4000F0 n 20 40 00F n 25 40 00F 0 n 30 45 00F 0 n 11 4000 FD n 16 4000FDJ n 21 40 00F 1 n 26 40 00F0 n 31 45 00 F C n 12 4000FE n 17 40 00F LJ n 22 4000FO n 27 4500FL1 n 32 45 00FL Disquettes d accompagnement de Pom s pour Apple en 140Ko 5 25 pouces n 1 2 60 00 FO n 7 60 00F 0 n 12 60 00F0 n 17 60 00 FL n 22 6000F DJ n 27 6000F 0 n 32 60 00F 0 n 3 60 00F C n 8 600F0 n 13 60 00 FE n 18 6000 FE n 23 60 00 FO n 28 60 00 F D n 33 6000 FD n 4 6000F0 n 9 6000F0 n 14 60 00 FLJ n 19 60 00 FD n 24 60 00 FL n 29 60 00FL n 34 6000 FC n5 6000FLJ n 10 60 00 FC n 15 6000 FC n 20 60 00 FO n 25 60 00FO n 30 60 00FO Disquet
124. erifMot GuideImpl2 GOSUB GuideIndisponible GOTO VerifMot VerifMot2 IF LEN Reponse2 lt 4 THEN Alerte Minimum 4 caract re s 1 GOTO VerifMot VerifMotBis Reponse3 Secret 27 18 0 7 Reponse3S Dr ON Dr 1 GOTO DeconnexionfF Ver if MotBis2 Inacti3 ChangeMot Guidelimpi3 Inacti3 Sommaire VerifMotBis2 Deconnexion near 13 GOSUB spTouche Inactive GOTO VerifMotBis GuideImp13 GOSUB GuideIndisponible GOTO VerifMotBis VerifMotBis2 IF Reponse2S lt gt Reponse3sS THEN Alerte Les deux mots de pa sse diff rent GOTO VerifM ot Mot Reponse2 FIELD 1 2 AS zNombreS 8 AS 2M ot 16 AS zNom 16 AS zTelS GET 1 1 LSET zMot Mots PUT 1 1 VidEcran Deplace 6 12 AfficheR Le mot de passe a t chang Deplace 11 14 Affiche faites Inverse Affiche Sommaire AcceptF Dr IF Dr Faux THEN DeconnexionF IF Dr 8 THEN Deconnexion GOTO Sommaire Te sous programmes divers spToucheInactive Alerte Touche inactive ici Faux RETURN GuideIndisponible Alerte Guide indisponible F aux RETURN spCadresChoix Cadre 4 10 6 12 2 0 5 0 Affiche 1 o Cadre 4 13 6 15 2 0 5 mo Affiche 2 2 Cadre 4 16 6 18 2 0 5 0 Affiche 3 RETURN ChoixImpossible Alerte Choix impossible l RETURN spAfficheEtat PRINT ChaineEtats PRINT RETURN OuvreFichier Fichier FILES 1 PR p IF LEN Fichier THEN Dr Vra i ELSE Dr Faux R
125. euls caract res romains sans italique ni gras Les rapports imprim s permettent soit une simple copie de tableau jusqu 200 caract res de large en ultra condens soit du cousu main Dans ce cas on se rapproche de l emploi de masques des bases de donn es classiques on cr e des cases correspondantes aux colonnes choisies on en d termine la longueur et la place sur le rapport on ajoute du texte libre ca et 13 on peut dater rien que de tr s classique Les fiches de sommaire sintercalent loisir Il est possible de m moriser huit formats de rapport Avec de l habitude les rapports d OverVue sont pr sentables malgr leur limitation un seul type de caract re Notons qu OverVue peut imprimer sur quatre colonnes et accepte toutes les hauteurs de papier c est donc un pr cieux g n rateur d tiquettes La fusion de fichier est ce qui rend Over Vue relationnel Les deux fichiers peuvent tre juxtapos s chacun gardant ses caract ristiques propres ou superpos s s ils sont du m me type On peut aussi ins rer un fichier entier au milieu d un autre gr ce la fonction coller Enfin la fonction Lier permet une r elle fusion relationnelle on pr cise quelle est ta colonne de chaque fichier qui contient les donn es de type commun puis quel nom donner la colonne nouvelle qui accueillera le r sultat de la fusion Ces op rations sont sans danger dans la mesure o les deux fichiers d origine subsistent
126. ff y jsr envoi dey bpl Gi rta Seff afb 3 0F 103 912 SF Scoul dfb 40 1B 950 51B S0E pos dfb 41 40 51F 14 pef s vidrect vidrect jsr getbytc cpx 41 bcg Sertf stx Shl jsr getbytc cpx 25 bcs err stx Gei jsr getbytc cpx E41 bcs Serrf sta Sh2 jsr getbytc cpx 25 pcs Serrf stx Sv2 jsr getbyte stx Scoul cpx 8 bcc deb Serrf jmp norslim deb lda b1l cmp b2 bcs Serrf lda Svl cmp Sv2 bcs Serrf jsr curseuri bc1 Jar envollF lda S40 ele adc vl jar envoi lda 540 ele adc Shi jer envol lda LEE jsr envol jsr envoil ida 940 clc adc coul pha sr envoi Jer envoll8 pla adc 910 Jar envoi lda SSF jsr envoi laa 5i2 sr envoi lda h2 sec sbc h1 enc adc 940 jsr envoi inc Sul lda Svl cmp v2 bcc Sbcl peq Sbcl lda F zattend les 5 param tres couleur gt 8 ahli gt h2 zvl gt v2 envol LE S40 vi 540 N blanc r p tition zx fola boucle passe en texte et Shi h2 vi v2 coui envol retour jl S jadi Qm P Source PL SP Assembleur ProCODE range error nerslin m strtool lda jmp errout 1ilegal quantity errer 2 aec uie Gem PO Rr d A m c um uum chaine trop longue ldx jnp P BO error sstring too long W I e LLL envoi un caract re dicli ME UD E e m envoicar jsr i
127. fiche Pour valider votre m essage Pom s n 34 Ligne Affiche Inverse Affiche Envoi Deplace 13 21 Affiche Pour l annuler Ligne Affiche Inverse Affiche Sommaire Deplace 13 5 AfficheR Nom Deplace 13 6 AfficheR Prenom Deplace 13 7 AfficheR Telephone FOR Index 11 TO 17 Deplace 1 Index AfficheR Messages Index 11 NEXT ON Pointeur GOTO SaisieNom Sa islePrenom SalsleTelephone S aisleMessage SaisieNom Pointeur i Accept 13 5 0 16 Noms Dr ON Dr 1l GOTO DeconnexionF ErS aisleNom Inact3 EnrMessage G uideImp3 Inact3 Sommaire ErS aisieNom Deconnexion Inact3 GOSUB spToucheInactive GOTO SaisieNom GuldeImp 3 GOSUB Guide ndisponible GOTO SaisieNom ErSalsleNom IF Nom THEN Alerte Nom indispensable 1 GOTO Sai sieNom IF Dr 1 GOTO Validation SaisiePrenom Pointeur 2 Accept 13 6 0 16 Prenom D e ON Dr 1 GOTO DeconnexionF Val idation SaisleNom EnrMessage Guidelmp4 Inact4 Sommaire S aisieTelephone Deconnexion Inact4 GOSUB spTouchelnactive GOTO SaisiePrenom GuldeImp4 GOSUB Guidelndisponible GOTO SaisiePrenom SalsleTelephone Pointeur 3 Accept 13 7 0 16 Telephone Ge ON Dr 1 GOTO DeconnexionF Val idatlon SaisiePrenom EnrMess age GuldeImps5 Inact5 Sommair e SaisieMessage Deconnexion Inact5 Pom s n 34 GOSUB spTouchelnactive GOTO SaisieTelephone GuideImp 5 GOSUB Guidelndisponible GOTO
128. h d 1 position horlz dfb 41 5 61 dfb 44 6D guide posv da 1 position vert dit 43 561 a dfb 45 51 annulation ptrcmd ds 1 pointeur sur cmd dfb 49 5 61 a dfb 3 46 950 sonmaire rega da 1 dfb 43 969 i dfb 47 56C corraction regx d9 1 dfb 48 569 i dfb 48 6E suite regy da T dfb 543 S6F o dfb 0 vecteur da 3 sancien vecteur R capitulation POM LINK 2 1 Apr s avoir saisi cette r capitulation sous moniteur vous la sauvegarderez par 0980 16 FO E6 AD 00 02 29 F 8D 46 0B 20 05 0B BSAVE POM LINK 2 1 A 801 L5104 0990 0B FO 03 20 21 0B AD 46 OB C9 0D F0 04 C9 09A0 03 4C 59 0A C9 20 90 BB AD 40 0B CD 3D OB 0801 AD F6 03 C9 3E DO 07 ADF703C9 08 FO IA AO 09B0 4C D8 09 EE 40 OB AC 40 OB AD 46 0B C9 2C 0810 02 B9 F5 03 99 ED 1B 88 10 F7 A9 4C 8D F5 03 A9 09C0 A9 2E C9 3A DO 02 AS 2E 99 00 02 2C 51 17 0820 3E 8D F6 03 A9 08 8D F7 03 A9 00 8D C6 1A AD B3 09D0 A9 2A 20 10 19 4C 63 09 A9 01 8D 45 0B 20 0830 FB C9 06 DO 08 AD CO FK DO 03 CE C6 1A 60 AO 00 09E0 A0 00 B9 F3 09 F0 06 20 10 19 C8 DO F5 20 0840 8C D3 IB 8C E4 IB EE D3 1B AC D3 1B C0 OC D 03 09F0 4C 63 09 07 1F 40 41 20 12 64 1F 40 41 46 0850 4C C9 DE 09 A0 99 D3 1B 20 B1 00 F0 04 C9 2C DO 0A00 20 64 65 20 7A 6F 6E 65 QA 00 AD 44 OB FO 0860 E5 A0 FF 8C E9 1B EE E9 1B AC E9 1B B9 D8 1A CD 0A10 75 OB A9 01 8D 45 OB 8D 44 OB 20 FE 10 A0 0870 D3 IB DO 18 A2 00 E8 EE E9 1B AC E9 1B B9 D8 1A 0A20 33 0A F0 06 20 10 19 C8 D0 F5 20 F9 10 20 0880 DD D3 1B DO 07 EC D3 1B FO 15 DO E
129. ident 21 d b 519 930 500 da enligne arr init 22 0 dfb 519 541 565 da fixe dfb 1 8B6 invers 9E or SAO dfb 6 519 542 65 da flash att ligne 24 dfb 519 541 561 da gr str localise 25 dfb 4 519 541 975 da ident str node 26 dfb co 19 54B 563 da init str mtn 27 accent dfb 0 da inverse dfb 1 5BD nornDnal 9D or SAO acti dfb 23 itable pour Le da xligne str paramg 2 dfb 24 recodaga des da localiae str parant Ap dfb 26 caract res da mode atr reinit 31 dfb 27 6 i sp ciaux da mth str rouleau 32 dfb S 2c da normal str saisie 33 afd 2Dp da parang str sangligne 34 dfb 2E gt da Garant str secret 35 dfb s2F v da reinit str servoff 36 dfb 530 da rouleau atr txt 37 dfb 531 da saisie Str videcran 38 dfb 5 38 da sansllgne str vidligne 39 dfb 3C da secret str vidrect 40 dfb 3D da serveuro dfb O0 dfb SSE da txt cmd dg 15 contiend la cmd dfb 5S6A da videcran cn ds 1 S SCo slot dfb S7A r da vidligne nD ds 1 810t 510 dfb Sp B da vidrect drap ds 1 pour mode math dfb 0 ancvect ds 2 vecteur pr c dent nocar ds 1 n de caract re act2 datb 41 565 8 deuxc ds 1 a rr si c nocmd d 1 n de la commande dfb 542 565 amp controle dfb 41 4D senvol suit 13 noslot ds i in du port s rie dfb 543 565 e dfb 42 952 retour pint dfb 60 8FF sur 11968 dfb 48 65 e dfb 43 53 r p tition pos
130. ks mais l Apple lui m me qui grandit Les deux faces d une disquette 5 25 ne lui suffisent d j plus pour stocker toutes les polices de TimeOut Super Fonts Il faut donc s rieusement songer aux extensions n cessaires m moire lecteurs de disques L indispensable TimeOut SuperFonts TimeOut Superfonts de Mark Simonsen est une vraie merveille Il imprime les fichiers textes AppleWorks enti rement en caract res graphiques proportionnels vous donne le choix entre quatre qualit s d impression possibles dans les styles italiques inverse gras soulign ombr silhouette indices exposants du Mac tous combinables sur la m me ligne avec les dessins HGR ou DHGR mais pas SHGR ou les parties de dessins que vous voulez avec les polices que vous voulez jusqu 64 dans le m me texte la disquette en fournit 47 et d autres disquettes de polices sont promises bon march Le e ou c est wansform en Macintosh ou en GS monochrome d ailleurs il utilise les polices du Mac qui sont aussi les polices syst me du GS Seule diff rence avec le Mac vous travaillez votre texte sur l cran texte dAppleWorks et il faut choisir l option imprimer sur cran pour voir l avance ce que donnera votre impression graphique Ii reconnait toutes les options d impressions du traitement de texte AppleWorks auxquelies il ajoute les siennes enfin Poms n 34 la vraie justification droite avec AppleWorks
131. ks 1 4 pour ceux qui le chargent depuis un disque 3 5 un dur ou un disque Ram et ou qui ont une horloge dans l Apple GS et autres NLOCK APLWORKS SYSTEM J BLOAD APLWORKS SYSTEM AS2000 Pom s n 34 TSYS I POKE 14677 44 Plus de lt Pcessez une touche pour continuer POKE 14157 208 POKE 14158 19 1 Ne demande plus la date BSAVE APLWORKS SYSTEM A 2000 TSFF l Le patch suivant permet aux heureux propri taires d un GS et d une carte Ram 1 M ga type Apple slinky cartes Apple Ramfactor AST Sprintdisk etc de faire croire AppleWorks 1 4 qu il est sur un eet non sur un GS le faisant ainsi se charger et mettre son bureau dans cette carte en n occupant que le Bank 0 de la Ram GS UNLOCK APLWORKS SYSTEM BLOAD APLWORKS SYSTEM A 2000 TSE F J POKE 13609 44 J BSAVE APLWORKS SYSTEM A 2000 T255J Regardez cette occasion le code que vous changez et vous verrez comment AppleWorks s y prend pour reconna tre qu il est sur un GS Voici eomment Merci Dominique Ottello permettre AppleWriter ProDOS version fran aise de marcher avec le port imprimante int gr du GS en court circuitant sa routine d initialisation du port s rie C est donc vous qu il appartient de configurer ce port en passant par le tableau de bord G control esc Pour cela il faut d abord avoir remplac le ProDOS de la disquette par un ProDOS 8 plus r cent qui autorise les interruptions PREFIX AW J B
132. l seulement de l expression visible d une autre int gration celle des op rations que fait l utilisateur et des donn es qu il manipule Tous les couper coller les accessoires de bureau etc ne sont qu un p le substitut un pauvre faute de mieux de l int gration vraie C est parce que Beagle est totalement fid le cette inspiration initiale dAppleWorks que TimeOut est une telle r ussite Une cons quence d sagr able de cette int gration est que la s rie des TimeOut ne marche et ne marchera sans doute jamais que sur la version am ricaine 2 0 d AppleWorks et pas sur la version frangaise 1 4 Non que cela soit techniquement impossible mais il faudrait alors adapter et traduire chacune des applications Eric Wetland T imeOut pr sentes et futures ce qui repr sente norm ment de travail L investissement est sans doute trop grand pour tre rentable moins qu un taux spectaculaire de ventes de SuperMacroWorks en France n am ne Beagle r fl chir qui sait Second point savoir il vous faut de la place sur le bureau de la m moire Bien s r vous pouvez choisir de charger en m moire certaines applications seulement au d marrage d AppleWorks et TimeOut vous permet d appeler ensuite sous AppleWorks en cas de besoin une autre application depuis le disque y compris le disque Ram type Speedisk il vous permet galement de vider la m moire et le bureau des applications dont vous ne
133. l que de commencer une entrepr se deux dans un garage et de la retrouver 10 ans plus tard dans les 200 plus grandes entrepr ses am ricaines Ce qui est plus rare c est de conserver les vraies valeurs et d avoir le sens de la famille De 1984 1987 Macintosh a beaucoup progress Sa m moire sest consid rablement tendue de 1 8 m ga octets ses menus se sont sophistiqu s h rarch s s sa biblioth que delo ciels est devenue acp n Cependant il n a jamais oubli ce qu il avait appr s de plus mportant l homme Apres Macintosh Plus et Macintosh SE Macintosh II en est une nouvelle preuve edd dI ded id ah Lid kem sk EA mm ja Le Le nis isis d ras jE ju ya d km SM E 22 wa nY i i5 CL M BBDO et celui de la famille aussi Les menus d roulants sont toujours pr sents bien qu ils se d roulent beaucoup plus vite Les capacit s graphiques sont toujours les m mes 16 millions de couleurs pr s C est une machine toujours aussi intuitive disposant de 1 8 m gaoctets de m moire vive et m me plus d un disque dur interne de 20 80 m gaoctets pour que toute la logique de votre travail y trouve son aise Ouvert tous Macintosh II est aujourd hui ouvert tout gr ce ses 6 connecteurs d extension Mais pace au juste les hommes ont ils le sens de la famille Parce qu ils n aiment pas renoncer ce qui leur est familier ni sencombr
134. lda jsr lda cnp cnp bcs jnp cnp bcc lda cnp bne jmp inc ldy lda cmp bne lda cmp bne lda sta bit bpl lda jsr jap lda sta jsr 1dy lda beg jer iny bne jsr jnp dfb dfb asc dfb lda beq mP ld sta gta jsr ptrey 0 0 f1naff ptr y envoicar 1 getbytc lgatt AU pas0 41 1lgoxk horslim lhor lgatt L41 1goX1l horslinm chaidef E al depasst al initcpt cursaeurv tempo 1 tempo 1 1 tempo 2 1 tpsdepas getcar ig 0 200 87 F Carrecu initcpt al 11 effal carrecu 13 110 10 2 tchfonc 520 debl nbcar lgatt 20 trop nbcar nbcar carrecu Er 21 u pu 22 pu 200 y dsecret 23 envol debl 1 al curseuri 1 curseurv debl Si l affiche 2 tattend lg decia p33 0 zcontrole si les pts tiennent dans l cran tchfonc chalne par d faut 00 iinit compteurs fale l efface 1g Q 1 in t d lai inc les compt sattend un caract 2 compteurs 0 5 n cessaire efface ligne 0 520 retour chariot 2 z oul envoi touche fonction oui carac controle 2 controle longueur 21 rien itransforme E S1 en des 2 sstocke car recu oi secret en cho ren 201 2FF Sien carac hors zone afflche message fin de zone getcar initcpt fnitcptE 2 91F 540 541 520 12 64 91F 40 5 41 Fin de zone
135. le beaucoup d une version frangaise pour Apple de l Arkanoid de l Ata i et Froggy Software nous offre des aventures in dites avec Le justicier du bahut Les Jeux de l Arl sienne Ultima V et Wizardry IV Cela fait longtemps qu on les attend les publicit s sont parues mais l heure O J cris ces lignes je ne connais personne qui ait r ussi acheter autre chose qu une promesse de vente Curieuse strat gie commerciale Bon puisque c est comme ca je te prends au surf et je pulv rise ton high score Bon sang o as tu mis la disquette de California Games J avais dit qu elle devait tou jours rester c t de l Apple 66 16 Bits Si vous avez un GS prenez rendez vous avec votre revendeur il vous remettra Ia derni re version du syst me 3 1 avec le Finder et vous mettra niveau votre machine nouvelles Roms nouvelle chip vid o si son num ro de s rie est inf rieur C725 X XX XX Tout cela gratuitement Mais bien entendu ne jetez rien ni l ancien syst me ni les anciennes Roms Certains programmes ne marchent pas avec lcs nouvelles Roms La solution charger les anciennes Roms en Ram changer les vecteurs Lecteurs GSphiles au travail Nous comptons Sur vous Question Qu est ce qu un Macintosh R ponse Un ordinateur assez ancien de la soci t Apple en noir et blanc dans ses versions grand public mais dont le m rite fut d avoir permis la r alisation d u
136. les lire distance 3 Effacer les messages c est aussi une op ration que vous pourriez faire distance 4 Quitter le programme Le serveur en service Rien de passionnant n apparait sur l cran de l Apple lors du fonctionnement du serveur trois messages seulement Attente d un appel Appel recu attente de connexion Connexion ok serveur actif C t correspondant utilisateur c est plus complet apr s deux pages de pr sentation du r pondeur le menu principal apparait offrant 1 Laisser un message 2 Fonctions de service 3 Quitter ce r pondeur L option 1 invite surune page cran laisser nom pr nom et num ro de t l phone puis 7 lignes de message Un cran de validation s affiche ensuite pour inviter le correspondant et toujours client confirmer corriger ou annuler le message L option 2 qui donne acc s aux fonctions de service demande en premier lieu le mot de passe Seules trois tentatives sont permises avant d connexion forc e m me si l on revient au sommaire apr s chaque essai inf ructueux Le menu des fonctions de service est le suivant 1 Lire les messages 2 Effacer le fichier 3 Changer le mot de passe L option 1 affiche le dernier message re u on acc de aux diff rents enregistrements avec SUITE et RETQUR L option 2 vite les effacements involontaires de fichier en attendant les trois lettres OUI avant de supprimer les messages Le changement de mot de p
137. lied Enginecring elle formate les disquettes 5 25 en 360Ko sous ProDO5 et elle permet de chainer cinq lecteurs en tout Bien entendu c est aussi un compatible PC microprocesseur Nec V30 7 16 MHz trois fois plus rapide que l IBM 640Ko de Ram possibles en mode IBM tous les modes vid o CGA sur votre moniteur Apple coprocesseur arithm tique en option bref on peut faire tourner sur l Apple l adaptation sous MS Dos de Visicalc appel e Lotus 1 2 3 Les avantages principaux de cette carte sont bien entendu dans l int gration qui permet d utiliser tous les p riph riques de l Apple carte horloge imprimante clavier du e IIGS les touches de fonction IBM tant remplac es par des combinaisons avec les touches 4 souris moniteur vid o son Vous pouvez stocker des Dom n 34 donn es et programmes MS Dos sur tout disque format en ProDOS 5 25 3 5 disque dur etc La carte permet m me de lire et crire des disquettes 3 5 format es en MS Dos avec un simple lecteur 3 5 Apple type IIGS Mais il y a ce que les publicit s ne disent pas la carte PC Transporter ne permet pas de formater en MS Dos les disquettes 3 5 avec un lecteur Apple 3 5 ni de d marrer directement ces disquettes Il vous faudra donc avec la carte le duo disk 5 25 type IBM vendu par Applied Engineering pour d marrer le MS Dos Et il est indispensable d avoir acc s un compatible IBM muni d un lecteur 3 5 pour f
138. lisations GOTO AttenteOuverture WINDOW CLOSE i 3 discr tion les caract res du mot de passe sont retourn s l cran sous la forme d ast risque Quitter ce r pondeur Pour ceux qui s aper oivent au dernier moment qu il n ont rien faire l Fonctions de service Vous seul pouvez acc der ces fonctions puisque le mot de passe est indispensable 1 2 3 DemNouveau Lire Rien Quitte Programme 4 GOSUB QuvreFichier GOSUB NouveauFichier Lire les messages Le fonctionnement est comparable la lecture sur l cran de votre Macintosh les boutons Pr c dent et Suivant tant seulement remplac s par les touches Retour et Suite Effacer le fichier Identique la fonction disponible sur le Macintosh avec bien s r demande de confirination Changer le mot de passe Ceci peut tre utilis si par exemple le mot de passe a t communiqu fin de d monstration Le changement de ce mot est dot de nombreuses protections qui garantissent une modification parfaitement fiable MENU 1 3 0 ON ERROR GOTO Erreur RepriseAttente GOSUB VideVariables Cha neEtat S Attente d un appe l CHRS 17 pour i nterrompre le serveur GOSUB spAfficheEtat attente d un appel AttenteAppel MENU 1 5 0 ON BREAK GOSUB ArretServeur MENU OFF MOUSE ON DrzFaux DrArret Faux C g2 r Dlog 0 WHILE NOT Dr AND NOT DrArre t AND CS CHR
139. lles sont en fait des innovations De plus cela permet d assurer un bon d part une bonne assise pour la s rie ce qui permettra des d veloppements nouveaux et peut tre plus risqu s Enfin cela utilise le succ s m rit de programmes Beagle ou SoftWare Touch d j existants AutoWorks FontWorks Triple Dump pour faire encore mieux Mais reconnaissons qu il y a un risque de glissade vers ce conformisme ce renoncement la cr ation et l innovation vraie qu engendrent les situations de concurrence effr n c dans un march ferm allumez votre t l viseur sur n importe quelle chaine pour en voir un exemple Certaines applications TimeOut ne font que doublonner purement et simplement de bons programmes d j existants Elles travaillent souvent mieux et plus vite mais elles font la m me chose elles n innovent pas r ellement L opinion de J Y Bourdin qui se r jouissait dans Pom s 33 de la fusion Beagle SoftWare Touch me semble globalement confirm e par les TimeOut mais ses craintes sur l orientation exclusivement utilisateur imprim e par la nouvelle direction ne sont h las pas non plus sans fondements J en prends pour preuve un signe qui bien que superficiel me para t n anmoins quelque peu inqui tant fini de rire en lisant les documentations Beagle plus de gravures r tros et de l gendes humoristiques plus de complicit entre auteur et lecteur plus de clin d il et plus non plus d
140. lt right gt lt if gt lt del gt lt spc gt lt spc gt lt load0 gt 4 lt sa 0 gt lt load0 gt 3 lt sa 0 gt lt Iload0 gt 2 lt sa 0 gt lt load0 gt 1 lt s a 0 gt lt spc gt mots lt right gt lt del gt lt spc gt lt stop gt Test et retour ou arr t et r sultat END Pour l explication du m canisme de ces macros comme pour ioutes les macros en cascade voir le manuel page 16 La macro appel e renvoie au point d appel de fa macro appelante quand toutes les commandes qu elle contient ont t ex cut es ou quandune condition qu elle contient n est pas remplie si la condition est remplie elle se poursuit normalement Nete dans la macro Compte mots certains groupes de caract res se r p tent r guli rement peu de chose pr s C est l occasion ou jamais d utiliser pour la copie au clavier une autre particularit de la Macro 0 crire le groupe de caract res une seule fois mettre le curseur sur le premier caract re et r p ter G c est dire read jusqu la fin du groupe recopier Maintenant la Macro 0 contient ce groupe qu on peut reproduire autant de fois qu on le d sire en faisant 0 Puis en mode recouvrement on apportera rapidement les quelques retouches suppl mentaires Dans le prochain num ro nous vous pr senteront une macro plus labor e avec recours des macros conditionnelles au cha nage et l incr mentation de variables Elle permettra en un
141. n assez grand nombre de dessins ct de fontes graphiques pour le nouvel ordinateur couleur de cette soci t l Apple IIGS Explication Vous avez d remarquer au milieu du tas de polycopi s et de disquettes qui accompagnait la documentation technique du GS une disquette un peu sp ciale elle ne marchait pas C est en effet une disquette pour Macintosh destin e vous permettre de r cup rer sous ProDOS les fontes graphiques les images MacPaint et les fichiers data divers du Mac Bien entendu la conversion fonctionne aussi dans l autre sens mais les fichiers GSPaint ont des couleurs bien p les sur un Mac Plus Quelques conseils pour piller un Macintosh choisissez le avec suffisamment de m moire pour avoir un disque Ram cons quent Emportez votre drive GS avec vous pour faire un deuxi me drive au Mac s il n en a pas d j un Emportez un stock de disquettes forrnat es en ProDOS La disquette contient aussi une application pour le Mac appel e Emulateur Apple II GS Pom s a Obtenu d Apple l assurance que vous pouvez donner cette application aux possesseurs de Mac Quand vous aurez fini de soutirer pour votre GS toute la substantifique moelle du Mac de votre ami ou de votre patron remerciez le en lui laissant cette application ct regardez le l essayer Vous l avez remarqu si vous voulez reconfigurer voire disque Ram et faire prendre en compte cette modification imm diatement votre machine le
142. nnatique obsol te Le mange disques Depuis le temps qu on l attendait Ca y est il est arriv il estl Merlin 8 16 de Glen Bredon chez Roger Wagner Publications est sorti Enfin la possibilit de programmer en assembleur de facon pratique pour le GS finie la gal re d APW ORCA Pourquoi ne pas en parler dans la rubrique 16 bits Mais parce qu il marche aussi sur le c et le e vous avez bien lu non seulement le Merlin 8 derni re version du Merlin Pro sous Dos et ProDOS mais galement le Merlin 16 bits tout cela marche sur tous les Apple d aujourd hui Bien entendu il vous faut pr cis ment un Apple 88 microprocesseur 65802 lecteur 3 5 m moire Voir la rubrique sous le capot Entre autres cela signifie qu il est sous ProDOS 8 et ne s occupe pas plus qu AppleWorks du graphisme GS Faudrait il en conclure que m me Glen Bredon estime que le ProDOS 16 nest pas tr s au point et que le graphisme GS ne fait que ralentir les choses dans les applications s rieuses Mais non voyons puisque pr cis ment il vous permet d crire quant vous des applications sous ProDOS 16 des accessoires de bureau de vous r galer avec les outils du GS Un diteur de liens plus rapide produisant du code relogeable un diteur plein cran des biblioth ques de sous routines des biblioth ques de macros incluant des macros d acc s aux outils GS que nous faut il de plus Eh bien un as
143. nstructions de cette librairie qui re oivent des caract res utilisent un tampon d entr e capable de stocker Pom s n 34 1024 caract res Celui ci permet l utilisateur d anticiper les commandes ou le remplissage des zones de saisie Cependant suivant le type de traitement effectu par le serveur il peut tre utile de vider le tampon d entr e pour tre s r de nexploiter que des caract res frais par exemple avec SAISIE Remarque Les instructions suivantes vident le tampon d entr e CNXR BAS e ENLIGNE HAUT IDENT LOCALISE ROULEAU Exemple 10 REM Exemple d utilisation de PURGE 20 PURGE REINIT Syntaxe de l instruction REINIT But R initialisation du Minitel utilisateur Explications Le Minitel utilisateur passe en e mode Vid otex e caract res blanc e fond noir e taille normale non soulign non invers e non flash Remarque REINIT met un espace ASCII 32 afin de valider le mode non soulign et la couleur de fond Exemple 10 REM Exemple d utilisation de REINIT 20 REINIT Voirausi FIXE FLASH LIGNE PARAMT SANSLIGNE TXT ROULEAU ne fonctionne pas en local Syntaxe de l instruction ROULEAU condition Pom s n 34 But Passage en mode page ou en mode rouleau Explication condition est une variable ou expression enti re qui indique le type d affichage utiliser condition 0 mode page condition 0 mode
144. nt utile aux utilisateurs de disque dur Et la possibilit de programmer des macros pour lui avec SuperMacroWorks me semble fort int ressante TimeOut Graph est un bon grapheur en DHGR qui fait vite et bien ce qu on attend de lui et reconnait l essentiel des imprimantes Jl n est pas en couleurs mais AppleWorks non plus J ai particuli rement appr ci sa capacit retracer automatiquement les graphiques d s que vous changez une valeur dans votre fichier tableur Comme ce fichier est en m moire en m me temps que TimeOut Graph on peut percevoir imm diatement ce qu est lint gration vraie En fait AppleWorks est tout simplement dot d sormais de la fonction graphique int gr e qui lui manquait TimeOut SideSpread est de la m me veine il int gre tranquillement AppleWorks la fonction d impression verticale des fichiers tableurs trop larges qui demandait auparavant de sortir d AppleWorks pour utiliser FontWorks ou SideWays et reconnait galement l essentiel des imprimantes TimeOut Quickspell est plus rapide que Pinpoint Spelling Checker pour corriger vos fautes en anglais et fait aussi bien que Pinpoint Document Checker m me en laissant son dictionnaire de 80 000 mots sur disque si vous mettez celui ci sur la carte Speedisk c est quasiment instantan le tout sans avoir besoin de quitter AppleWorks Le superflu TimeOut DeskTools TimeOut DeskTools me semble un produit assez inutile
145. ntosh De plus votre serveur r pondeur t l matique R pomdeur est interrogeable distance depuis n importe quel Minitel raccord une ligne t l phonique I vous sera donc possible tous moments d appeler votre Macintosh pour lire les messages enregistr s et prendre imm diatement les mesures qui simposent en fonction des besoins ou propositions de vos amis et ou clients Le mat riel L utilisation de R pomdeur requiert ia pr sence du mat riel suivant e une ligne t l phonique e un Macintosh 512Ko Plus SE ou II e un Minitel bi standard dit retournable ils le sont pratiquement tous e un C ble de liaison Macintosh w Minitel tel que celui utilis par les programmes destin s l utilisation du Minitel et publi s depuis le num ro 27 si par hasard ce c ble vous faisait d faut les ditions MEV peuvent vous le fournir Pom s n 34 un d tecteur d appel t l phonique que vous pourrez r aliser l aide du sch ma publi dans le num ro 32 de Pom s Cet appareil dont le double connecteur sintercale entre la souris et le Macintosh peut aussi vous tre fourni par les ditions MEV Si vous d cidez de construire vous m me l objet nous vous recommandons de faire tr s attention la qualit et au branchements du relais une isolation galvanique parfaite est indispensable Le synoptique joint cet article indique quelles sont les liaisons effectuer entre les diff rents appa
146. ntre est volontairement d port vers la droite Notes e attention aux apostrophes dans les messages en vid o inverse remplacez les par un si vous ne voulez pas que la suite du message se retrouve dans les endroits les plus inattendus e input accepte non seulement l entr e de caract res mais les d placements par les fl ches et la souris Voici avant de vous quitter une autre macro fort utile pour tous ceux qui font r guli rement de Ia r daction k k k ke ke S ck kokock kckckck kock kckckocok ok ke sk ke qe ke se Ye ck Ck CK EKCk We CKCKCKCKCKCE Se e e CK e s APPLEWORKS 1 4 SuperMacroWorks COMP TzZ MOTS Cette macro permet de compter rapidement le nombre de mots dans un fichier de Traitement de texte Par mot il faut entendre tout groupe de caract res entre deux esraces jusqu deux Compiler se fait du pr c d s curseur d un espace Le compte caract res avec placer les caract res et le curseur aux endroits voulus taper s Le nombre de mots s inscrira la fin la place du double P Cette macro utilise les m moires de la Macro O et les m moires suppl mentaires 1 2 3 et 4 pour stocker les valeurs des unit s dizaines centaines et millzers pendant le d conpte XCckckckck KAKAK ke kx ok ko ck kk KAKAK KAKAK KAKAK kk kkkkkkkk Dimitri Geystor D cembre 1987 START Les macros suivantes s appellent en cascade S lt all gt lt insert gt lt 0 gt
147. num ro 34 de Pomss d ajouter une d mo de dBase Mac en plus des programmes et fichiers publi s dans ces pages Macintosh y rur inte 710g eab le d Jean Luc Dazanegue qu une attention soutenue et particuli rement irritant pour la plupart des correspondants qui g n ralement raccrochent rageusement avant d appeler le maudit concurrent Cela ne va pas toujours jusqu la perte d un client mais peut vous faire perdre une information un rendez vous ou tout simplement un chaleureux et amical Comment vas tu Nous passerons rapidement sur le yau de poil pour en venir notre serveur r pondeur t l matique La g n ralisation du Minitel en particulier avec l annuaire t l phonique et les grandes soci t s de vente par correspondance fait que la tonalit aigu de la porteuse qui est devenue parfaitement famili re est en passe de provoquer le geste r flexe qui consiste en la mise sous tension du Minitel suivi d une pression sur la touche Connexion Fin c est ce que feront la plupart de vos correspondants qui auront alors tout leur temps pour crire voire m me peaufner un message votre attention R pomdeur puisque tel est le nom du serveur que Pom s vous propose vous donnera donc outre le style dynamico branch cit plus haut et que vous ne recherchez pas forc ment la possibilit de stocker un maximum d informations avec l outil de communication qu est votre Maci
148. ode uniquement Apple NORMAL PARAMG couleur C couleur F lignage flash PARAMT mode couleur C couleur F flash invers soulign PURGE uniquement Macintosh REINIT ROULEAU condition SAISIE caract re SANSLIGNE SECRET colonne ligne mode sollicitation longueur retour tat SERVOFF uniquement Apple TXT VIDECRAN couleur VIDLIGNE ligne couleur VIDRECT x1 vi x2 y2 ceuleur 29 crire une routine autonome en assembleur et l appeler depuis le Basic par un CALL ne 4 pr sente que la difficult de manipuler fmm lassembleur Ainsi pour faire un bip il suffit de lire l octet C030 selon un cycle et une fr quence donn es Depuis le Basic on l appellera par un CALL adresse de d but CALL 768 par exemple Si l on veut depuis le Basic donner la routine la longueur du bip et sa hauteur le plus simple sera de metire ces param tres des adresses convenues et depuis la routine d aller les rechercher aux m mes adresses PORE 6 30 POKE 7 150 CALL 768 Dans la routine on r cup re les param tres par lda 6 sta lda 7 Jer Passer les param tres L objet de cet article est de montrer de rappeler comment passer des param tres du Basic la routine assembleur pour appeler notre bip par CALL 766 LG HT ou amp BIP LG 3 3 HT K par exemple Un prochain article pr sentera le passage aller et retour bas sur la r alisation d un INPUT contr l Po
149. ons astucieuses permettent de r cup rer des heures de saisie et d en conomiser autant OverVue appara t presque comme un logiciel int gr qui serait orient vers la base de donn es contrairement Excel qui lui est orient vers le tableur Cependant deux points faibles viennent ternir le tableau l aspect trop spartiate de la pr sentation l cran et surtout l impression amsi que labsence de fonction Annuler OverVue est remarquablement efficace pour les bases de donn es de taille moyenne ne n cessitant pas des rapports la pr sentation irr prochable Elle est agr able utiliser mais donne un sentiment de frustration devant l absence de certaines fonctionnalit s primordiales comme l impression soign e 61 ka um cm ele Guns CES Nouvelles du front Il y a de l angoisse dans l air chez les propri taires d Apple l abandon d sormais officiel par Apple de la production du e et du c signifie t il la condamnation de l Apple Du point de vue d Apple les choses sont claires Apple est une entreprise dont toute la force repose dans l innovation technologique et logicielle Quelles que soient les r ticences de chacun d entre nous au changement nous avons donn de l argent Apple et cet argent est utilis par lui pour rester la t te de l innovation en mati re d informatique personnelle Nul n ignore que ni le Mac II nile GS n ont t pr c d s par une quelconq
150. ont compilables apr s un petit nombre de modifications TML Basic est un ensemble de programmation complet Sachant que TML Basic compile tr s vite en m moire et lance aussit t le programme compil sachant que son debugger int gr vous renvoie en cas d erreur imm diatement dans l dilcur la ligne fautive de votre programme toujours en m moire avec un message d crrcur explicite la diff rence avec un interpr teur devient presque invisible pour le programmeur Il n y a que la vitesse d ex cution du programme qui change mais de facon faramineuse Bien entendu il donne acces aux outils de la Rom permet la programmation structur e et la r cursivit etc L interface avec le FML Speech Toolkit permet de faire parler le GS La documentation est excellente C est un TML et c est un GS donc souris couleurs couper coller Pom s n 34 travers quatre programmcs chacun dans sa fen tre etc De quoi plaindre sinc rement les pauvres programmeurs MS DOS m me turbo essayer la carte Memory Saver de Checkmate Technology qui pour 150 dollars transforme le disque Ram de n importe quelle carte m moire du slot auxiliaire du OS en disque Rom Si vous avez essay Movie Studio et VS Com de VersionSoft crivez moi M me chose pour Gribouille GS de Madeleine Hod lire Les ouvrages sur le GS commencent foisonner Il y a bien entendu de tout Pour ma part je vous conseille les sulvants
151. ormater en MS Dos les disquettes 3 5 Faites les comptes la carte avec 640Ko plus le kit d installation plus le Duo Disk 5 25 tout cela fait 1058 dollars aux prix d Applied Engineering pour mettre le MS Dos dans le GS Rajoutons le fait que la carte en action tire 600 mA et 1075 mA avec le coprocesseur arithm tique et il est pratiquement indispensable de changer l alimentation du e pour celle plus puissante 110 et 220 V vendue 69 dollars par Applied Engineering C est en fait le prix d une configuration quivalente base de compatible lambda made in China vendu dans les supermarch s L avantage est videmment de n avoir qu une seule machine sur son bureau une seule imprimante etc et de pouvoir changer les fichiers entre les syst mes d exploitation ou un Apple dans l IBM Plut t que de mettre vos frais dans voire Apple l ordinateur du patron il serait peut tre malin de faire mettre ses frais un Apple dans son IBM la carte Trackstar 128 de Compatible Peripherals met un le 65C02 128K dans un IBM ou compatible Elle utilise les drives 5 25 IBM pour lire les disques Apple y compris les disques prot g s sauf ceux qui utilisent les demi pistes Elle utilise les p riph riques de l IBM pour l Apple sauf le joystick port Pom s n 34 pour joystick Apple sur la carte elle permet les transferts de fichiers ProDOS MS Dos Et elle ne co te que 300 dollars Mais ce n est pas un GS et vo
152. ortir des limites d un tableau par exemple DIM A 12 PRINT A 16 Devant une erreur dont on ne connait pas le code le plus simple part consulter le manuel du Basic du DOS ou de ProDOS est de supprimer le ONERR qui r cup re les erreurs Un message en clair et accessoirement en anglais s affichera Le num ro des disquettes Pom s repr sente le num ro de la revue laquelle elles correspondent Ainsi la disquette 28 contient tous les fichiers list s dans la revue 28 5 Date avec AppleWriter Pom s 33 9 De Jean Marc MAYER JMM13 02 jan 88 14h04 Je rencontre un petit probl me avec Date et AppleWriter sur un GS Sans programme de boot qui met la date dans les octets BF90 BF 91 l utilitaire me dit vous n avez pas de carte Pom s n 34 horloge ce qui est normal J ai install REBOOT SYSTEM import de CalvaCom mais lors d un boot j ai toujours le message iINSERER REBOCT Que faire En fait vous n avez pas besoin de REBOOT SYSTEM puisque l Apple IIGS comporte une carte horloge C est votre version de ProDOS qui ne la reconnait pas il faut installer la version 1 3 ou 1 4 de ProDOS 8 sur votre volume AppleWriter et tout rentrera dans l ordre les fichiers seront dat s En ce qui concerne REBOOT si vous pr f rez cette solution importez galement MODIF RE BOOT qui permet de changer le nom de volume qu attend cet utilitaire Autre solution transitoire renommer votre volume de travail REB
153. os disquettes il joint des informations des rcvues de logiciels et des articles d initiation Il propose un catalogue de Freeware la carte pour GS ct Mac et offre aux Marseillais l acc s un serveur gratuit 91 79 30 60 code Cal Pom s a galement recu le faire part de naissance d un futur confr re une revue frangaise sp ciale GS et Mac GS Magazine Il est pr vu que chaque num ro co te 50 F et soit accompagn d une disquette 800Ko en kiosque ce sera une disquette Mac quc vous changcrez par la poste avec la disquette GS Par abonnement vous choisirez entre disquette GS et Mac mais vous aurez le droit de l changer contre l autre La disquette contiendra des programmes en domaine public Shareware et des d monstrations de logiciels La revue devrait tre orient e principalement sur les services l utilisateur et au consommateur Bapt me pr vu la mi f vricr Adresses A PBA 290 S W 43rd Street Renton WA 98055 USA A P P L E Coop 290 S W 43rd Strcet Renton WA 98055 USA Alpha Logic Business Systems 4119 North Union Road Woodstock IL 60098 USA Applied Engineering P O Box 798 Carrollton TX 75006 USA Beagle Bros 6215 Ferris Square Suite 100 San Diego CA 92121 USA Broderbund Software Inc 17 Paul Drive San Rafael CA 94903 USA Central Point Software 9700 S W Capitol Highway 4100 Portland OR 97219 USA Checkmate Technology 509 South Ro
154. ose La Ram suppl mentaire doit la fois compatible avec AppleWorks 2 0 seul AppleWorks 2 0 avec Pinpoint AppleWorks 2 0 avec TimeOut AppleWorks 2 0 avec Pinpoint ET TimeOut Pilote ppleWorks ET les fonctions TimeOut Pom s n 34 vous servir tendre le bureau d AppleWorks sauver les fichiers transitoires fichiers ASCII fichiers DIF utilis s pour communiquer entre deux fonctions d AppleWorks entreposer provisoirement la m moire de travail AppleWorks que Pinpoint y sauve de temps en temps stocker les applications TimeOut et les accessoires Pinpoint et m me garder en permanence sous la main ProDOS un s lecteur de programmes et vos applications favorites dont AppleWorks lui m me bien s r 1024Ko c est vraiment le minimum mais il reste le rangement Aie En fait le probl me est plus simple quil n y para t il se r sume au partitionnement ce barbarisme d signant le partage de la m moire entre AppleWorks et son bureau d un c t le disque Ram de l autre Sur le GS pas de probl me le tableau de bord est l pour cela Si vous avez une carte m moire type Multi Ram de Checkmate RamW orks Z Ram ou RamFactor d Applied Engineering les logiciels d installation du disque Ram et de modification d AppleWorks permettent ce partitionnement Si vous avez le nouveau c un M ga ou une carte type Apple dans votre e AppleWorks d vore toute la
155. ou assister une pr sentation alors n h sitez pas contacter votre reven deur agr Apple dBASE Mac est disponible au prix de 3 950 F HT l l l i T l phone BON DE COMMANDE 34 retourner La SEN Electronique 7 rue des Pria 27920 SAINT PIERRE DE BAILLEUL NUM d un Ru c Soci t N en AN NG Na aa Nn Nn Nn SET CET ECC TO TETI khan nah ha ENS Ville Code postal D Je vous commande exemplaires de la prise en main dBASE Mac au prix de 50 F TTC R glement par ch que joint la commande Envoyez moi une documentation compl te sur le logiciel BASE Mac A ASHTON TATE pit Ont collabor ce num ro Alexandre Avrane Jean Luc Bazanegue Yvan B ard Jean Yves Bourdin Jean Jacques Colwhir St phane Dedeyan Alexandre Duback Dimitri Geystor Olivier Herz Guillaume Lejeune G rard Michel Christian Piard Jo lle Piard Herv Thiriez Bernard Tom no ric Weyland Directeur de la publication r dacteur en chef Herv Thinez R dacteurs Alexandre Avrane Olivier Herz Siege social ditiens MEV 12 rue d Anjou 78000 Versailles 1 39 51 24 43 Publicit ditions MEV Diffusion N M P P Impression Berger Levrault 18 rue des Glacis 54000 Nancy tt 83 35 61 44 Photos de co
156. ou expression enti re repr sentant la couleur de fond 0 noir 096 de gris rouge 50 de gris 2 vert 70 de gris e 3 jaune 90 de gris e 4 bleu 40 de gris S magenta 60 de gris 6 cyan 80 de gris 7 blanc 100 de gris flash est une variable ou expression enti re d terminant la fixit ou le clignotement inversion des points du caract re une fois par seconde flash 0 caract res fixes e flash lt gt 0 caract res clignotants invers est une variable ou expression enti re indiquant si les couleurs de caract re et de fond doivent tre invers s ou non invers Q couleurs normales invers lt gt 0 couleurs invers es soulign est une variable ou expression enti re qui indique si les caract res doivent tre soulign s e soulign Q caract res non soulign s e soulign lt gt 0 caract res soulign s Remarque Les param tres couleur F et soulign constituent des attributs latents qui ne seront valid s par le Minitel utilisateur qu la r ception d un espace ASCII 32 Exemples 10 REM Exemples d utilisation de PARAMT 20 PARAMT M CCS S CF FLS I1N SOS 30 PARAMT 2 0 7 1 1 1 40 PARAMT N 4 V 3 0 7 1 1 SO 10 FIXE FLASH INVERSE LIGNE GR NORMAL PARAMG SANSLIGNE TXT Voir aussi PURGE uniquement sur le Macintosh Syntaxe de l instruction PURGE But Vide le tampon d entr e des caract res Explications Les i
157. p ds ds jar bes varnat Serr vaznam l Si miserr sais finsais 0 lg recoit pasrecu 513 Sp control 516 spec 19 spec ESTE 5200 lg lg 200 7 00 9 209 1 1 10 1 200 getsba 0 2 movstr lq 0 varpnt y fretop varpnt y fretop l varpnt y 1 recoit SD pasrecu SF0O 940 accents LO actl y 2 34 1 pasrecu actl y stocke c1 recoiti 0 pasrecu c2 O c1 act2 y 2 c2 act2 y 3 act2 y stocke variable fonction un caract sp cial zou accentu 2 Caract re Stock an 200 re u 1l Carat cherca3ie place pour 1 carac qui 3e trouve en 200 Stange la Chaine attend un 2 me caractere pas recu Bi gt 940 sc est accentu sinon c est un carac 93pACial qu on recode avec la table pas dans la table est dans la table 8auve le 28 carac zen attend un 3 me Pas recu compare le 2 me dang la table compare le 3 me trouv 2 jmp pasrecu 1 cmp 513 beq contzol bit 540 beq 2 cmap LS4A bos 2 3 and 0F jmp stocke sansligne sansi gne jsr envoilB ida Gong jmp envoi IL m om mm e e ums secret ze Gm co SES E secret lds 5FF 3ta dsecret jmp accepti dsecret ds 1 r Ssgrvoff serveuro ldy 2 1 ld vecteur Yy sta 3F5S y dey bpl 1 rta r tx
158. place disponible sur la carte pour son bureau et bigre on ne peut plus rien ranger du tout La solution consiste patcher AppleWorks de facon limiter son UltraMacros OUI OUI OUI OUI app tit de m moire avant toute modification par SuperMacroWorks TimeOut et ou Pinpoint Deux programmes du domaine public se chargent de ce travail pour nous L un publi par Steve Stephenson dans Open Apple volume 3 modifie AppleWorks 2 0 am ricain L autre publi par l cho des Apple d Octobre 87 est ladaptation du premier AppleWorks 1 4 fran ais par J Y Bourdin Les colonnes de Pom s n tant pas destin es tre remplies de listings de programmes du domaine public nous ne pouvons les reproduire ici Mais nous les avons ajout s gracieusement en prime sous les noms de APLWorkS2 0 MOD et APLWorkS1 4 MOD sur la face ProDOS de la disquette Pom s 34 Bien entendu ne les utilisez que sur une copie de votre disquette AppleWorks Conclusion innovation ou conformisme Vous comprenez maintenant pourquoi je suis si content de ce que j ai trouv dans ma chemin e les TimeOut constituent dans leur conception fondamentale une innovation importante et extr mement prometteuse pour tous les utilisateurs d Apple Il et d AppleWorks Cette innovation se situant dans la continuit de l esprit m me d AppleWorks AutoWorks KeyPlayer OUI NON OUI OUI NON OUI 7 NON SA ENUCEOE NIDE
159. ples 10 REM Exemples d utilisation 20 REM de CHARIOT 30 CHARIOT 40 CHARIOT 3 50 CHARIOT N 60 CHARIOT N 2 Voir aussi AFFICHE AFFICHER CNXN Syntaxe de l instruction CNXN But Connexion du Minitel serveur Exemple 10 REM Exemple d utilisation de CNXN 20 CNXN Voir aussi CNXR DECNX CNXR ne fonctionne pas en local Syntaxe de l instruction CNXR tat But Retournement et connexion du Minitel serveur Explication Cette instruction est normalement utilis e lorsqu on a d tect un appel t l phonique l aide de l instruction APPEL tat est une variable enti re dans laquelle on pourra trouver au retour dans le programme Basic e tat 0 si le Minitel de l utilisateur n a pas t connect au bout d une minute dans ce cas le Minitel serveur est d connect e tat 1 1 sur le Macintosh si le Minitel de l utilisateur a t connect dans ce cas un message de copyright est affich pendant 4 secondes sur l cran du Minitel utilisateur Remarque CNXR vide le tampon d entr e des caract res voir PURGE pour le Macintosh Exemple 10 REM Exemple d utilisation de CNXR 20 CNXR ET Voir aussi APPEL CNXN DECNX CURINVIS Syntaxe de l instruction CURINVIS But Rend k curseur invisible Exemple 10 REM Exemple d utilisation 20 REM de CURINVIS 30 CURINVIS Voir aussi CURVIS CURVIS Syntaxe de l instruction CURVIS But Rend le curseur visible E
160. position vert dcs hlm DEB CC SCB SD1 SCA S06 CD S8A 0 dex DER x9 SEC 8D C 58C S 85 940 bmi 1 DFB 94 9C 9D 9D 8 SEG SFS vert lda 10 DFB age San GES 89 SEI S85 vert zpoucle de trac jsr envoi DEB Sei ege gra SCA C8 82 5D6 type scharge type carac l a 13 DEB SBA SE8 SE6 SFA SFA SFA Cg Y jar envoi DER SEA SEA SEB S8D 94 S S8C 85 caract jap 9 DEB 5 6 59C 85 990 994 5 8B colonne itrace la colonne 51 rts DFB 937 91 8B 91 S96 00 v2 Shln jmp Hhorslim W gt a ern 3F colonn termin e NEE a curseurvi vert cnxn W a scg Sul colonne droite curseurv lda 11 i den cnxn dsr ecoit Jmp envoi 40 ldy 2 vert 1 lda 2 y K h2 jsr envoi a corseurinv dey Wawaq 840 bpl Si hori jar recoit curseuri lda 514 vert jmp recoitl jap envoi Pom n 34 decalebas W e e w w s decaleb jsr getbytc epx 25 bcc Sok jump horsl m ok idy il 0 lda dcb y sr envoi dey bpi 0 1 dex bmi Sfin lda 908 jar envoi jap 1 Sfin ldy 7 2 lda S Spage y jsr envoi dey bpl 2 rts sacb d b 43 669 55A4 S1B 4 566 53A 51B df 41 9 41 51V 514 page dfb 43 96A 93A 51B 4 566 63A 51B decalehaut Nom pm pm pm pm m mn mm e I decaleh jar qetbytc cpx 25 bcc ox jmp horsiim Sok ldy fll 0 lda Sdch y Jar nvoi dey bpi 0 1 dex bmi Sfin lda SOA Jar envoi jap 1 Sfin ldy 7
161. quel slot du J e IIGS sauf le slot 3 Elles sont portables sur le GS sont reconnues par AppleWorks pour y tendre son bureau Choisissez entre la carte Apple ch re mais Apple la Ramfactor dApplied Engineering qui est la meilleure et la carte Sprintdisk d AST qu on trouve des prix brad s en ce moment 179 dollars par exemple avec un M ga install chez Microtech Consulting Company L autre compl ment d un Apple pour le mettre niveau c est le lecteur 3 5 Le c est normalement muni de cette capacit Pour ie e il faut une carte d interface Apple nous propose sa carte pour l Unidisk 3 5 Mais ce lecteur tant assez cher on peut lui pr f rer la carte Universal Disk Controller de Central Point Software pour 4 Ae IIGS Cette carte a lavantage d accepter aussi bien les lecteurs 5 25 Apple ou compatibles que les Unidisks 3 5 d Apple que les lecteurs 3 5 800Ko compatibles Mac qui sont tr s bon march que les lecteurs 3 5 simple face 400Ko des vieux Mac qu il faut laisser aux dinosaures Pour 261 dollars plus le port chez Triad Software mon fournisseur favori Pom s n 34 vous aurez une carte et un drive 800Ko qui lira les disquettes GS sans probl me fera tourner Merlin 16 et rentrera AppleWorks les accessoires Pinpoint et les applications TimeOut sur la m me disquette et d marrera automatiquement sur un e 65C02 Cette carte a cependant quelques inconv nients d abor
162. r au programme Basic avec tat 0 Exemple 10 REM Exemple d utilisation d ACCEPTF 20 ACCEPTF ETS Voir aussi ACCEPT SAISIE et SECRET 13 j le I n n See e x x AFFICHE Syntaxe de l instruction AFFICHE chaine sur l Apple A AFFICHE cha ne sur le Macintosh But Affiche une chaine de caract res sur l cran du Minitel utilisateur partir de la position courante du curseur Explications cha ne est une variable ou une expression chaine Les caract res portant des codes diff rents sur l ordinateur serveur et le Minitel sont recod s Sur l Apple AFFICHE fonctionne comme un PRINT un retour chariot est g n r s il n y a pas de point virgule la fin de l instruction seule la cha ne est affich e dans le cas contraire Sur le Macintosh seule la chaine est affich e Remarque Aux ventuels retour chariot ASCII 13 contenus par la chaine de caract res sont ajout s des Line feed ASCII 10 Ceci autorise l envoi direct d un fichier Par exemple sur le Macintosh AFFICHE INPUTS LOF 1 1 envoi la totalit du contenu du fichier 41 sur l cran du Minitel Exemples 10 REM Exemples d utilisation d AFFICHE 20 AFFICHE D but uniquement Apple 30 AFFICHE Page STRS NP 40 AFFICHE C Voir aussi AFFICHER ALERTE CHARIOT MTH AFFICHER uniquement Macintosh Syntaxe de l instruction AFFICHE
163. r le descripteur d une chaine temporaire que FRMEVL a cr e partir des constituants de l expression Le descripteur point e par A0 A1 se pr sente sur l Apple ainsi octet 1 longueur de la chaine Octet 2 poids faible de l adresse du premier caract re Octet 3 poids fort de l adresse du premier caract re Assurons nous d abord que l expression valu e par FRMEVL tait bien une chaine Pom s n 34 jsr DD6C CHKSTR donne type mis match si ce n est pas une chaine Ceci fait nous pouvons sauvegarder le pointeur sur le descripteur de la chaine afficher et nous int resser aux param tres suivants ida SAO FACMO poids faible de l adresse sta 85 FORPNT qui re oit habituel lement le pointeur sur la derni re variable utilis e lda SA poids fort sta 86 Notte TXTPTR est maintenant positionn ainsi 100 4 PRINT Essal1 1 127 IF A T Pour valuer le num ro de slot nous utiliserons GETBYTC qui saute un caract re en l occurence la virgule et qui value l expression suivant ce caract re Le r sultat de cette valuation doit tenir sur un octet de 0 255 sinon nous aurons un Illegal Quantity Error Le r sultat est dans le registre X jar SE6PF5 stx S Getbytc on stocke en 61e n de port Idem pour le sens du bit de poids fort SE6FS Getbytc stx 7 on stocke en 7 le sens du poids fort GE ni Nous avons tous les param tres v nfions si un suit
164. r le disque 3 5 Eh bien ce programme est diffus en Shareware avec d autres indispensables Diversi Copy le plus rapide des copieurs 3 5 Diversi Key qui met des macros partout Diversi Hack un mini Softswitch vous pouvez copier et distribuer gratuitement la disquette la documentation est sur le disque Si le programme vous pla t vous tes invit payer directement l auteur J ai achet Diversi Copy ce qui prouve que l id e est bonne Pour Diversi Cache j aimemis qu un lecteur fasse la comparaison avec le programme de cache fourni avec la carte GS Ram d Applied Engineering La place me manque pour faire aujourd hui un tour d horizon complet des langages sur le GS j ai d nombr jusqu ici en ne comptant que les langages 16 bits au moins trois Pascal deux Forth cinq Basic un C plus les assembleurs Disons seulement qu Apple a fait son travail en sortant son interpr teur GSDasic disponible chez DDA fort ressemblant au Business Basic de l Apple Et parlons de l autre Vous qui commenciez vous mettre au Pascal cause de TML Pascal mais qui regrettiez de ne pouvoir vraiment parler en Basic votre machine r jouissez vous le TML Basic est en vente Attention ce n est pas un simple compilateur qui viendrait en compl ment d un intcipr teur comme c taitle cas avec l Applesoft S il est vrai qu il compile les programmes du GSBasic et que la plupart des programmes 100 Applesoft ser
165. r72 Rect top 52 Rect 1eft 68 Rect bottom 76 Rect rlght 180 PENSIZE 3 3 FRAMEROUNDRECT VARPTR Rect Eed ke 12 2 PENNORMAL Dlog Faux WHILE Dlog lt gt 1 AND Dlog lt gt 6 Dlog DIALOG 0 WEND IF Dlog 6 THEN Dr Faux GOTO SortieConfirm Dlog DIALOG 1 IF Dlog 1 THEN Dr Faux GOTO SortieConfirm FIELD 1 2 AS rzNombre 8 AS zM ot 16 AS zNom 16 AS zTelS GET 1 1 LSET zNombreS MKIS O PUT 1 1 CLOSE Dr Vral SortieConfirm WINDOW CLOSE 1 RETURN fe Initialisations Initialisations FOR Index 0 TO 3 Gris Index amp HAA55 NEXT Faux 0 Vrai 1 top 0 left 1 bottom 2 right 3 MENU 1 0 1 Fichier MENU 1 1 1 D marrer avec un ichier existant MENU 1 2 1 D marrer avec un n ouveau fichier MENU 1 3 1 Lire les messages enregistr s MENU 1 4 0 MENU 1 5 1 Quitter MENU 2 0 1 Pom s MENU 2 1 1 1988 JLB CP 6 ditions MEV 39 51 24 43 WINDOW CLOSE 1l RETURN l ouverture de la nouvelle version X de ce gestionnaire le fichier se N pr sente sous la forme d un tableau chaque colonne repr sente un champ chaque ligne une fiche Comme sur Works on peut obtenir une pr sentation par 3 fiches lensemble d une fiche apparait l cran Ces deux modes de pr sentation ne sont pas param trabies et la seule police disponible est le Monaco 9 Le manuel d utilisation est sobre lui aussi les cents premi res pages survolent tous les aspec
166. rapi jsr readpi and F jsr acr s in ldx x ldy y EE a x ds 1 Sy ds 1 parapi ldx CN idy n0 rts gueules u m mm mm mm LL re oit un caract gec si recu sg clc 8i pas re u avant x tps recoit lda c sta strac sta strec 1l 1 jsr recoit bec 2 rts 2 inc strec bne 1 inc strec l bne 1 EE a strac ds 2 EE E E a attendre une seconde W KENE ENEE wait sty regy atx regx pha ldy 10 1 lda C6 isr SFCA8 lda kb cnp Cen beq 52 dey bna 1 2 pia ldy regy lax regx rts Tuam m Wm ND M P a m m rm registres t m mm e e e ee Pom s n 34 savareg gta rega dfb S48 S6F o commande str accept S atx regx dfb 41 75 0 Btr accepti 2 sty regy dfp 48 75 u str affiche 3 rtg GED 4B 963 c str alerte 4 restreg lda rega afb 0 str appel 19 ldx regx adrcom da accept str bip 6 ldy regy da acceptf str cadre SA rts da affiche atr chariot Wi ace rts da alerte str cnxu 8 acr rts da appel Str cnxr 10 da bip stt curvis 11 d cadre str curinvis 12 Source PL DATA da chariot str bas 13 da cnxn str haut 14 Assembleur ProCODE da cnxr Str decnx 15 da curseurv str deplace 16 da curseuri Str anligne 17 accentO0 dfb 500 519 548 da decaileb str fixe 18 dfb 3E 500 19 943 da decaleh dfb 1 BF flash F or SAO df b 519 S27 S00 da decnx dfb 1 5A8 gr 88 or SAO dfb 519 923 500 da depiace str
167. rd hui Merlin 8 16 Il suffit d enlever le 65C02 et de mettre la place le 65802 L autre solution consiste acheter une carte acc l rateur Transwarp d Applied Engineering pour le e avec un 65802 int gr Roger Wagner la vend pour 245 dollars et votre e tourne plus vite que le GS si videmment Zip Chip voir Pom s 33 est moins cher et ne prend aucun slot mais ce n est pas un 65802 il ne fait pas tourner Merlin 16 Toujours pour mettre votre e ou c niveau il faut tendre sa m moire Si vous avez un nouveau c poussez le un M ga voir Pom s 33 Si vous avez un ancien c v rifiez qu il a les Roms pour le lecteur 3 5 sinon faites le mettre niveau par Apple Pour l tendre un M ga les seules solutions seront ensuite la carte Z Ram d Applied Engineering ou la carte Multiram CX de Checkmate Technology sur lesquelles vous pouvez ajouter une carte 65816 pour faire tourner Merlin 16 Si vous avez un e vous pouvez l tendre avec une des cartes qui se mettent dans le slot auxiliaire Ramworks d Applied Engineering ou Multiram e de Checkmate Technology Ces cartes ont l avantage de remplacer la carte 80 colonnes donc de ne pas prendre un slot de plus Elles ont l inconv nient d tre technologiquement d pass es et de ne pas tre portables sur le GS Le plus int ressant ce sont sans doute les cartes au standard Apple Slinky qui se mettent dans n importe
168. re Inc 1163 Triton Drive Foster City CA 94404 USA Pinpoint Publishing 5901 Christie A venue Emeryville CA 94608 USA a ment de la couleur des caract res ou de la couleur de fond seule idem mais exprim en pourcentage de La version 3 0 de Pom Linkvaplusloindans routine detemporisation pour allouer des niveau de gris l exploitation des ressources Minitel Elle d lais r glage du d lai imparti la connexion ouvre laporte lar alisationde serveurstr s affichage des caract res mis et re us calcul automatique de la dur e de com puissants debugging munication en minutes enti res sur affichage de la date et de l heure l Apple en secondes surta Macintosh instruction accept sans effacement des fonctions utilitaires sur l Apple bugde Parmi les instructions nouvelles gestion du mode t l informatique points ONERR sur le Macintosh change mise en mode t l informatique mise en instruction accept num rique contr l e ment decurseur chargementdesic nes mode Vid otex instruction sp cialis es pour le change syst me 32 Pom s n 34 matique interrogeable T ux e r pondeur t l matique que nous vous proposons ici n est qu une illustration des multiples possibilit s des routines Pom Link 2 1 I n en est pas moins complet fiable et convivial A Il se distingue de 90 des mw serveurs kiosque par la rapidit et tle contr
169. reils On peut noter que la pr sence de l appareil t l phonique n est pas indispensable D marrage du serveur Fichier D marrer avec un fichier existant D marrer avec un nouveau fichier Lire les messages enregistr s Quitter L article D marrer avec un fichier existant permet l utilisation d un fichier qui contient d j le mot de passe votre nom ou raison sociale et votre num ro de t l phone Le mot de passe vous sera indispensable si vous comptez lire vos messages distance depuis un autre Minitel alors que les deux derniers l ments seront employ s pour l affichage sur l cran du Minitel de votre correspondant d un texte que nous pournons qualifi d cran de reconnaissance Par exemple pour les ditions MEV nous affichons Vcus tes bien au 1 Editione MEN ce qui rassure tout de suite voie correspondant sur le bon aboutissement de son appel SS ST 24 43 Cet article du menu Fichier conduit naturellement l affichage de la fen tre de s lection de fichiers habituelle Note au lancement du progranune laf en tre de s lection s affiche permettant ainsi un d marrage direct du serveur Si vous appeliez R pomdeur pour effectuer une autre op ration d marrage avec un nouveau fichier lecture des messages faites simplement un clic sur le bouton Annuler Fichier D marrer avec un fichier existant D marrer avec un nouveau fichier
170. res couleur F est une variable ou expression enti re repr sentant la couleur de fond s 0 noir 096 de gris rouge 5096 de gris 2 vert 70 de gus 3 jaune 90 de gris e 4 bleu 40 de gris 5 magenta 60 de gris 6 cyan 80 de gris s 7 blanc 100 de gris lignage est une variable ou expression enti re qui indique si les caract res doivent tre affich s avec des caract res semi graphiques joints ou disjoints lignage 0 caract res joints e lignage lt gt 0 caract res disjo ints flash est une variable ou expression enti re d terminant la fixit ou le clignotement inversion des points du caract re une fois par seconde e flash 0 caract res fixes flash lt gt 0 caract res clignotants Exemples 10 REM Exempies d utilisation de PARAMG 20 PARAMG CCS CFS LIS FLS 30 PARAMG 7 0 1 1 40 PARAMG CC 1 AS CF INT L 2 0 Voiraussi FIXE FLASH GR LIGNE PARAMT SANSLIGNE TXT PARAMT Syntaxe de l instruction PARAMT mode couleur C couleur F flash invers soulign But Passe en mode texte et tablit les param tres d affichage Explications mode est une variable ou expression enti re d signant la taille des caract res mode 0 caract res normaux e mode 1 double hauteur e mode 2 double largeur e mode 3 double taille couleur C est une variable ou expression enti re repr sentantla couleur des caract res couleur F est une variable
171. rtie Faux RETURN DrErreur Faux FOR Index 1 TO LMot C MID Mot S Indaex 1 IF C AND CS OR C Q AND C j THEN testO K DrErreur Vral testOK NEXT IF DrErreur THEN BEEP DrInve rse 1 GOSUB Signale EDIT F IELD 1 Mot 160 129 248 1 44 DrSortie Faux RETURN DrSortie Vrai Dr Vrai RETURN EditD IF DrInverse THEN GOSUB Sign ale DrInverse Faux Pom s n 34 NumEdit DIALOG 2 EDIT FIELD NumEdit RETURN Ki EN RETURN 7 Bloque RETURN ReturnD IF DrliInverse THEN GOSUB Sign ale DrInverse Faux NumEdit NumEdit 1 IF NumEdit 4 THEN NumEdit 1 EDIT FIELD NumEdit RETURN Signale Rect top 4 DrInverse 1 40 Rect fleft 8 Rect bottom 36 DrInverse 1 40 Rect right 255 INVERTROUNDRECT VARPTR Rec t top 4 4 RETURN Te Lecture des fiches sur le M acintosh Lire Fichier FILES 1 PR p IF Fichier THEN RETURN MENU 1 1 0 MENU 1 2 0 MENU 1 3 0 OPEN R l Fichier 244 FIELD 1 2 AS zNombre 8 AS zM ot 16 AS zNom 16 AS zTel GET 1 1 NombreMessage CVI zNombre IF NombreMessage 0 THEN CLOS E GOSUB DialMessage0 GOTO RetourLire GOSUB DialAffiche CLOSE GOTO RetourLire RetourLire MENU 1 1 1 MENU 1 2 1 MENU 1 3 1 RETURN Dialogue pas de message DialMessage0 WINDOW 2 100 120 411 19 lu 32 TEXTFONT O TEXTSIZE 12 BEEP MOVETO 16 24 PRINT Ce fichier ne contient pas de message BUTTON 1 1 0OK 192 40 2
172. s tre sup rieure 40 ACCEPT provoque le passage en mode texte lt le curseur est invisible lors du retour au programme Basic C t utilisateur e ACCEPT place le curseur sur la premi re position de la zone de saisie ou si une chaine par d faut est utilis e sur la position suivant cette chaine e si l on tente d entrer plus de caract re que n en pr voie la zone de saisie ACCEPT met un bip et affiche le message Fin de zone dans la ligne 0 la touche CORRECTION d place le curseur d une position vers la gauche en effagant un caract re Si le curseur se trouve sur la premi re position de la zone de saisie une action sur la touche CORRECTION provoque l affichage du message Rien effacer dans la ligne O sile curseur ne se trouve pas sur la premi re position de la zone de saisie une action sur la touche ANNULATION vide la zone de saisie et place le curseur sur la premi re position Si le curseur se trouve sur la premi re position de la zone de saisie ANNULATION provoque un retour au programme Basic avec tat 5 toutes les touches de fonction provoquent un retour au programme Basic sauf CORRECTION et ANNULATION dans le cas cit pr c demment Si le clavier du Minitel n est pas sollicit pendant une minute ACCEPT met un bip et affiche le message D connexion imminente dans la ligne Si rien ne se passe pendant la minute suivante il y a retour au programme Basic
173. sant syst me de gestion de base de donn es relationnelle pour Macintosh A la diff rence des autres bases de donn es vous l utilisez sans aucune connaissance de la program 2 mation Commencez par cr er et relier vos fichiers La modification d une information entrainera la mise jour des autres Automatiquement et imm diatement Et souvenez vous qu avec dBASE Mac tout est r alisable sans programmer Cliquez simplement la souris et vous visualiserez vos fichiers de mille et une facons Toujours sans faire appel la programmation En ins rant des polices de caract res issues de MacDraw vous cr ez les rapports les plus simples aux plus sophistiqu s Ils apparaitront l cran m La Commande Electronique LA 7 RUE DES PRIAS 27920 SAINT PIERRE DE BAILI EUL T L 32 s2 54 02 TELEX LCE 180 855 FAX 32 52 54 46 tels qu ils seront imprim s Nous ne parlons pas simplement du texte et des graphiques Avec dBASE Mac vous pouvez m me incorporer des photos au sein des fichiers Toujours sans programmation vous importez des donn es issues de dBASE III PLUS ou de n importe quel fichier ASCII Tout cela gr ce au syst me d aide int gr et aux menus d roulants du Macintosh Mais si vous voulez aller encore plus loin un puissant langage de programmation permettra de d velopper des applications Vous d sirez une documen tation compl te
174. sembleur et un diteur de liens co r sidents en m moire avec l diteur qui relient et assemblent jusqu 12 000 lignes de code par minute sans qu il soit n cessaire de passer par des modules s par s suivez mon regard Et aussi un Sourceror 16 bits ce magnitique d sassembleur qui a autant fait pour l Apple que le Locksmith ce propos la derni re version du Locksmith 6 0 R vision C d Alpha Logic Business Systems fonctionne sur le GS Sans compter la compatibilit avec tous les sources Merlin existants et la possibilit de charger et assembler les fichiers APW avec un minimum de travail d dition Voil le genre d outils qui remet les montres l heure et les choses leur place le langage privil gi de l Apple c est l assembleur n en 43 P u ESIE CECR z TW e a LELAI HR IUJ Kat EI CX mE c EEEESENLGEEA 70 188 RR 70 ee Dee ee 64 d plaise aux adeptes d autres jargons C est lui qui a fait et qui fera les plus grands programmes et les plus grands succes de l Apple Apple for ever cela passe par Merlin for ever Avec Merlin 16 TML Pascal et TML Basic l avenir du GS est assur Documax de Signum Microsystems est exactement le genre de programmes qui me pousse crire dans ces colonnes Un co t ridicule 25 dollars avec la documentation sur le disque une interface utilisateur parfaite implantable pas de protection des possibilit
175. service qui vous tient et qui nous tient c ur c est bien l assistance t l phonique pour la mise en ceuvre de nos programmes c est une charge importante mais elle nous semble capitale Nous comprenons que ceux qui manifestent leur fid lit par un abonnement en attendent plus d efficacit aussi nous travail lons des solutions rendez vous au num ro 33 Comme tout service gratuit cette assistance comporte un sympathique sottisier qui occuperait bien un num ro com plet tel Ie cas de cet utilisateur d InterPorn s au demeurant peu aimable qui avait quelques soucis de communication il s agissait d un pirateur de base d pourvu de mode d emploi quiexigeait une aide Heureusement notre flegme nous aide Sondage nous recevons l heure de ces lignes encore bien des r ponses d pouillement dans le prochain num ro mais d j une dominante apparait un succ s pour la rubrique Apple Ai for ever doutez vous encore de l inventivit des d veloppeurs et des programmes de communication Toutc reproduction int grale ou partielle effectu e par quelque proc d que ce soit sans l accord crit d ditjons MEV constitue une contrefacon Loi du 11 mars 1957 articles 425 et suivants du Code P nal Droits de traduction de reproductien et d adaptation r serv s pour tous pays Herv Thiriez 6 Dom e n 34 a Et a g Yvan BEARD e programme
176. sr cpx bcc jmp stx ldy lax jsr J sz sr lda sta 3sr jar lda sta lda sta ldy lda tax clc adc sta ldy lda dey 0 dsecret SFF drap getbytc lhor getbytc lver 25 a hor slim getbytc 2 Salt horslim dblh lver lhor position curseuri chxcom EO 32 frmevl chkstr facmo forpnt facno l forpnt4l EO forpat y lhor lher 2 forpnt y cherche ordre suivant dana table n de la commande on a trouv tinitialise le saut vers la routine concern e saute syntax error ce n est pas secret iposition horiz position verti mode dble haut 0 ou 1 seulement positionne le curseur Lnvisibdble value Chaine sc est 1 chaine r cup re pointeur sur chaine temporaire jr cup re adrusse da la chaine Christian Piard 39 111 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 129 130 131 132 133 134 135 136 137 138 139 141 142 143 144 145 146 147 148 15Q 151 152 153 Bs P mM MR m m 40 1 Stfinaff pasQ0 1lgok 1gokl debsais debi deb2 50 1 11 110 2 20 21 22 23 trop 1 2 1qd0 tpsdepas 0 sta ep y bna dex bmi lda jsr iny jar stx CES cpx jmp lda clc adc cmp bcc jmp jmp lda sta sta inc jat jar inc bne inc bne inc bne jnp jsr lda beq lda and sta jar
177. sse 7 MotPasseS Dr ON Drs1 GOTO DeconnexionF Att enteMot2 Sommaire Service Gu ide mp8 Inact8 Sommaire Atte nteMot2 Deconnexion GuideIlmp8 GOSUB Guideindisponibie GOTO AttenteMot Inact8 GOSUB spTouchelnactive nteMet IF Essai 2 THEN Alerte Erre ur encore un Essai 1 GOTO AttenteMot VidEcran Deplace 10 12 Affiche D sol d connexion forces GOTO Deconnexion AttenteMot 3 Essai 0 VidLigne 12 0 VidLigne 15 0 GOSUB spCadresChoix Deplace 8 11 Deplace 32 12 GOTO AttenteMot Affiche Lire les messages EN i Affiche f AttenteMot2 Deplace 8 14 Inverse IF MotPasse Mot GOTO Attent Affiche Effacer le fichier Affiche Envoi I eMot 3 Deplace 8 17 Deplace 15 15 Essai Essai l Affiche Changer le mot de pa Affiche Pour renoncer IF Essaisi THEN Alerte Mot sse Inverse de passe erron 1 GOTO Atte Deplace 15 22 x Affiche Votre choix A T gt Inverse Jusqu 72 points avec Mac Write Affiche Envoi AttenteService ChaineS Courier Helvetica et Times aussi utilisables avec une Ere E ImageWriter en tailles 27 30 56 42 54 et 72 Accept 29 22 0 1 Chai e D Malheureusement le menu style de MacWrite n autorise que les gt tailles allant de 9 24 points C est pourquoi afin de d tourner le ON Dr41 GOTO DeconnexionF Att probl me nous avons cr avec un diteur de fichiers un enteService2 Service
178. ster l octet C019 et de n afficher que lorsqu il est positif c est dire qu il n y a plus de balayage en cours 1 BIT CO19 BPL Sl routine d affichage Cette solution n est valable qu en assembleur pour une question de vitesse pas question de tester en Basic ou m me d appeler depuis le Basic ce micro programme avant XDRAW 17 Clv Pom transfert 8l De Alexis APLOGAN AA11 29 dec 87 11h55 Avec Clv pom s ie n arrive pas r cup rer les applications import s de CalvaCom Lors de la transformation par BinHex 4 la lecture de l application est interrompue par ERREUR CRC 2483 Merci de votre r ponse Il est probable que vous ayez import votre application en mode enregistrement de textes ce qui a conduit un recodage des caract res accentu s donc une erreur de checksum if convient de se mettre en mode enregistrement de programmes 10 Help Patchworks 171 De Laurent AIUTI LA24 26 dec 87 14h5 R f Pom s 33 Patchworks page 67 Le patch qui remplace le caract re damier par le caract re souris return sur AppleWorks 1 4 ne fonctionne pas AppleWorks se plante et bloque le GS Pourtant j ai ex cut la lettre les indications Y at il une erreur dans les Pokes Amicalement Que vous dire Non il n y a pas d erreur apr s ex cution des pokes nous obtenons le r sultat escompt if ne peut que s agir d une erreur d adresse lors de la manipulation
179. t txt lda SOF jmp envoi Z a um mm mm m e cmo memme m me videcran Boum m um m m m rm eer e e lt d O videcran sr chrgot beq hoi cmp beq coulsul jap anert noi ldx 0 bed coulnoi Scoulsui jsr getbytc cou nol ld 41 sta S pos 1 txa peq Snoir cmp 8 bcc 00 err jmp horslin 00 jsr curseuri txa adc 540 sta Coul adc 310 sta couls2 0 ldy 212 1 lda Geff jsr envoi dey bpl 1 inc pos i lda pos l cmp 559 bne 0 19r llqne0 Ets no r ida 12 jar envoi er curseuri doit etre entre 41 et S49 Carac entre 1 amp 1 0 parametre C est noir n de couleur r init positicn curseur invisible efface une ligne 24 lignes en tout 42 1 pasrecu 1 1 recoltl 1 spas trouv attend 2 me carac jap ligne0 Seff dfb S0F 103 12 SF Seoul dfb 40 5 51B 50 1B OE pos dfb 341 940 1F 14 1igne0 ldy 6 va en ligne 0 01 lda ligne0 y et l efface jar envoi dey bpl 01 rts ligne0 dfb SOA 64 13 20 541 BAD SIE za nF 45 vidligne LE a mm pm vidligne jsr getbytc Tata beq Serr cmp 25 bes Gert adc 40 sta Spos l jsr getbytc jsr curseuri attond n ligne de 1 24 couleur da 0 7 curseur invisible txa cmp 8 hcc St err jmp nors in et adc 540 sta Ccoul adc 110 sta S couls2 ldy 12 1 ida Se
180. tes d accompagnement de bom e pour Apple en 800Ko 3 5 pouces n 29 80 00 FD n 34 80 00F D n 30 80 00 FO n 31 80 00 FO Disquettes d accompagnement de Pom s pour Macintosh n 14415416 150 00 FL n 20 8000FL n 25 80 00FL n 30 80 00 FO n 21 80 00F LJ n 26 80 00 FJ n 31 80 00F n 17 8000F0 n 22 80 00 FL n 27 80 00F F1 n 32 80 00 F C n 32 80 00FL n 18 8000 FO n 23 80 00 FL n 28 80 00 FC n 33 8000F0 n 13 n 18 n 28 n 33 n 6 n 11 n 16 n 21 n 26 n 31 n 33 n 19 n 24 n 29 n 34 40 00 F C 40 00 FO 40 00 FO 45 00 F 45 00 F O 60 00 FO 60 00 F C 60 00 F O 6000F1 60 00 F C 60 00 F D 80 00 F J 80 00 FD 80 00 FC 80 00 FL 80 00 F O pour les envois par avion ajoutez 15 F par num ro et ou par disquette soit par exemple 90 F pour un abonnement avec ou sans disquettes Recueils de la revue Pom s regroupent quatre num ros de Pom s n 1 revues 1 4 140 00FL n 2 revues 5 8 140 00FO n 3 revues 9 12 140 00 FO Disquette 1 4 200 00FF1 Disquette 5 8 200 00F C1 Disquette9 12 200 00 FO Logiciels pour Apple es Pom Link3 0800Ko 450 00 F C Clv Pom s800Ko 200 00F O InterPom s 2 0 800Ko 200 00 FO BananaSott 140Ko 200 00 FO Edit Vid otex 140Ko 200 00 FO Ludologic 140Ko 80 00 F O Pom Link 3 0 140Ko 450 00 FLY Clv Pom s 140Ko 200 00 FO interPom s 2 0 140Ko 200 00 F O E
181. teur ou la partie ma tre fonctions de Service ainsi par exemple si votre correspondant d sire passer plusieurs messages de suite il trouvera lors des nouveaux affichages de la fen tre de saisie ses nom pr nom et num ro de t l phone affich s par d faut mais modifiables et le curseur plac sur la premi re position de la zone de saisie du message Dans le m me esprit avant d enregistrer le message on le pr sente tel qu il sera r ellement enregistr permettant ainsi au correspondant une ventuelle modification ou pourquoi pas annulation Fonctions de Ceci vous est destin L cran qui suit ce choix est un passage oblig pour aller vers les fonctions de service il faut ici frapper le mot de passe Le serveur autorise trois essais au terme desquels l ind licat est d connect Afin de sc prot ger des ind licats fut s il n est pas possible de faire plus de trois essais m me en revenant l cran pr c dent entre deux tentatives Notons que par souci de service z 3 3 A Repom deur m FinMenus CO MENU ON Ly MENU s RETURN D DemExistant les indentations indique la continuit de la ligne R pom deur 1988 Christi an Piard Jean Luc Baz negue RETURN DemNouveau RETURN et Pom s LIBRARY Pom Link 2 1 DEFINT A Z Arreter DIM M Griis 3 t 3 MM ce essage 6 Gris 2 Rect MENU 1 2 1 MENU 1 23 1 ON BREAK GOSUB Bloque BREAK Dr Faux ON GOSUB Initia
182. tialise le mode non lign ou non soulign Explications e sile Minitel utilisateur est en mode semi graphique SANSLIGNE passe l affichage en mode non lign caract res semi graphiques joints si le Minitel utilisateur est en mode texte SANSLIGNE passe l affichage en mode non soulign Remarque Dans le cas du mode texte SANSLIGNE envoie un attribut latent qui ne sera valid par le Minitel utilisateur qu la r ception d un espace ASCII 32 Exemple 10 REM Exemple d utilisation 20 REM de SANSLIGNE 30 SANSLIGNE Voir aussi PARAMG PARAMT LIGNE SECRET ne fonctionne pas en local Syntaxe de l instruction SECRET colonne ligneynode sollicitationlongueur retour tat But G re une zone de saisie contr l e Explications SECRET est en tous points identique ACCEPT mis par le fait qu au lieu de retourner les caract res frapp s par l utilisateur sur F cran de son Minitel on retourne uniquement des caract res ast risque Voir aussi ACCEPT ACCEPTF SAISIE SERVOFF uniquement sur Apple Syntaxe de l instruction SERVOFF But Lib re l interpr teur ampersand en restaurant l ancien vecteur Exemple 10 REM Exemple d utilisation de SERVOFF 20 SERVOFF Voir aussi INIT TXT Syntaxe de l instruction TXT But Passe en mode texte Exemple 10 REM Exemple 20 TXT d utilisation de TXT Voir aussi GR PARAMG PARAMT VIDECRAN Syntaxe de l instruction VID
183. touche d identification de la macro Pour plus de d tails sur la syntaxe des macros reportez vous au manuel fran ais qui accompagne SMW Voici le listing de la macro AND OR ROUND Vous trouverez ce fichier sur la disquette d accompagnement de Pom s Une derni re remarque Ie pav explicatif entre les deux traits d ast risques n est nullement n cessaire pour le bon fonctionnement des macros mais c est une bonne habitude prendre il fait exactement les dimensions d un cran et rappelle en quelques lignes les fonctions et commandes qui suivent ak e V 9 Qe oko KOK S K e kO kO ko ko ke k Se ke je Se e ke e Sok kak ka ka kk O k ke kok Se K Se oe ke koko k APPLEWORKS 1 4 SuperMacroWorks AND OR ROUND La version fran aise 1 4 d Appleworks ne contient pas les fonctions ROUND AND et OR de la version am ricaine 2 0 fait possible de les WA et O de ce est tout introduire avec les macros WR Mais il fichier Cempilez avec puis allez dans un tableur et exp rimentez Les macros vous guident par des messages il ne vous reste qu introduire les valeurs ou expressions ckckckck k k k k k kk k k k k kk k k k k k kckck kckck kckck kk k k k kk k kk k kok ko Dimitri Geystor Novembre 1987 Pom s n 34 Dimitri Geystor START O asp aif msg lt msg gt OR premi re expression p uis RETUPRN input 1 if lt msg gt lt msg gt OR de uxi me expression puis RETURN
184. toujours Le seul probi me que l on peut rencontrer ici est la place disponible en m moire vive OverVue dispose en outre d un diteur de macros commande tr s complet Chaque fichier peut g rer jusqu vingt macros Une fois crites et titr es elles apparaissent dans le menu Do et peuvent tre lanc e par un raccourci clavier La d finition de ces macros ne s op re pas par enregistrement d une s quence de commandes mais par un diteur de texte ce qui rend leur r alisation plus difficile Elles peuvent effectuer toutes les fonctions dOver Vue sauf les entr es sorties Finder elles peuvent s interrompre pour demander l utilisateur d entrer une r ponse On dispose l d un v ritable langage de programmation En ce qui concerne l ouverture sur l ext neur OverVue est plus dou pour l importation que pour l Exportation L exportation n est en effet possible que par l album le presse papiers et l criture d un rapport sur disque et non sur l imprimante Pour l importation les formats texte avec choix de trois s parateurs virgule tabulation et retour chariot Sylk et Dif sont accept s En d finitive OverVue est une gestion de fichier originale et simple d emploi Elle est particuli rement efficace et puissante gr ce la gestion en m moire vive C est pour l instant le seul programme proposer des fonctions aussi tendues pour le contr le de la saisie Ses macros en combinant des foncti
185. ts du logiciel permettant un rapide apprentissage de base Pour je reste il faudra se plonger dans les 208 autres pages arides mais efficaces Sobri t tel semble tre le mot cl pour d finir l aspect d OverVue 2 1 S il fallait choisir un mot pour en d crire les fonctionnalit s efficacit serait sans doute le plus appropri En effet OverVue 2 1 g re les fiches enti rement et uniquement en m moire vive Cela lui conf re une rapidit impressionnante dans les op rations de tri Mais cette rapidit est utilis e galement pour effectuer un contr le pr cis de la saisie au moyen de trois fonctions astucieuses Non Duplicatas permet d avertir l utilisateur lorsqu une m me valeur est introduite deux fois dans une colonne Non nique avertit l utilisateur s il vient d entrer une valeur qui n existait pas dans la colonne Enfin Clairvoyance pennet au cours de la saisie de laisser OverVue deviner ce que vous tes en train de taper en fonction de ce qui existe d j dans la colonne il termine ainsi la frappe pour vous Parfois si plusieurs valeurs ont le meme d but deux ou trois lettres simposeront pour assurer celte clairvoyance Une fois qu Over Vue a affich vid o inverse la valeur qu il a devin vous pouvez soit la valider soit poursuivre normalement votre frappe pour un au amp e mot Ces trois fonctions se monent extr mement confortables et acc l rent r ellement la saisie sans
186. ue tude de march pas plus que l Apple j de Wozniak ne l avait t Nous faisons de bons produits et Je march suivra c est ainsi qu Apple raisonne depuis Wozniak avec quelques checs Apple II Lisa mais avec principalement ma foi pas mal de r ussite Il est clair que la technologie 8 bits seule cst une technologie d pass e Ne nous voilons pas la face le point d entr e dans la gamme Apple le bas de gamme d Apple c est le GS Est ce donc la fin de l Apple videmment pas D abord parce qu il y a trois millions d Apple install s dans le monde c est plus que toute autre machine C est un norme march Ensuite parce que le GS est un Apple part enti re Le GS a t produit par Apple sur la demande des utilisateurs qui voulaient une machine la fois moderne et compatible Cette machine j en suis persuad a de gigantesques possibilit s avez vous pluch le moniteur du GS Ses possibilit s sonores Les programmes les cartes les interfaces pour le GS commencent foisonner Le 65832 processeur 32 bits compatible pattc patte avec le 65816 du GS esten cours de production Les acc l rateurs GS vont bient t sortir Et ces machines 32 bits acc l r es conti nueront faire tourner l Integer le kor ever Basic et r pandre la philosophie Wozniak Bref Apple for ever D autant que la technologie Apple 8 bits n est pas morte Faire tourner AppleWorks a
187. ul Eminet Edition du P S I 280 F Il ne faut pas rechercher dans cet ouvrage une description exhaustive des possibilit s de PostScript I s agit plus d une pr sentation qui permet peut tre de d buter dans ce langage Les exemples de ce livre sont pour Alexandre Avrane Alexandre DubacK l essentiel tir s de l excellent PostScript Language Tutorial and Cookbook chez Addison Wesley Publishing Compagny fort beau livre bien fait r alis avec go t et l gance dont le seul inconv nient est d tre en anglais Pour un livre qui traite du summum de la ma trise de l impression sur Laser Writer et autres imprimantes PostScript on se demande pourquoi l auteur pourtant ing nieur chez Apple liste des programmes sans montrer le r sultat de leur ex cution avait il une machine sous la main Cela ne simplifie pas la compr hension de l ensemble On retrouve dans cet ouvrage brutalement recopi le programme paru dans Pom s 24 qui imprime joliment PostScript aucune r f rence au nom de l auteur merci pour lui Si l on ajoute le m lange des polices de caract res et le manque de go t dans la mise en page et les croquis voici un livre bien d cevant ImageWriter II Manuel de r f rence Apple Computer France InterEditions Comme toutes les documentations d origine Apple celle ci est bien faite claire et pr cise De plus les erreurs qui apparaissaient dans les ditions ant rie
188. ur d monstration de cette prem re partie nous montrerons un nouveau PRINT capable d envoyer une chaine de caract res un p riph rique sans utiliser les fastidieux PRINT D PR slot Il permettra galement d indiquer si les caract res devront tre envoy s au p riph rique avec le bit de poids fort 1 ou 0 Cette caract ristique est capitale pour l mission de codes graphiques vers une imprimante puisque les huit bits doivent tre significatifs AppleSoft met syst matiquement le bit de poids fort 1 Cela servira galement aux utilisateurs de LaserJet de Hewlett Packard pour laquelle le bit 7 positionn 1 pose un probl me Ce PRINT ne fonctionnera que sous ProDOS en raison de la m thode de sortie de caract res adopt e mais le principe du passage des param tres est valable galement sous DOS 3 3 Un nouveau PRINT La syntaxe de notre instruction sera PRINT Ghaine slot poids Fort F Chaine sera une variable ou expression chaine du type Hello AS A 13 Hello STRS I 2 LEFTS AS 3 Slot sera une expression num rique repr sentant le num ro de port du p riph rique destinataire sous la forme jl SLOT Sa Poids fort sera galement une expression num riq ue qui vaudra 255 ou 127 selon que les codes des caract res iront de 128 255 ou de 0 127 pour les p riph riques qui n utilisent que 7 bits Minitel par exemple ce param tre sera sans effet visible
189. ures ont apparemment disparues Cet ouvrage est donc indispensable lorsque l on veut utiliser fond l imprimante ImageWriter pratiquement tou jours sous employ e Ween cripl Pom s n 34 4 Transmission 9 L De Arian ZELWER A210 11 jan 88 22h35 S il vous plait une question Ayant c t du Mac un A c avec lecteur 3 5 pouces est il possible de r cup rer les fichiers textes sous ProDOS Appleworks et les reprendre sous MacWrite ou Word Puis je changer des fichiers par liaison directe entre ces deux machines Merci de votre aide AZ10 Avec interPom s sur le Mac et InterPom s sur le c et un c ble de liaison ad hoc vous pourrez transmettre les fichiers 9600 bauds Si vous transmettez le fichiers AppleWorks vous h riterez de codes de contr le qu il faudra liminer en traitement de textes sur le Macintosh Un conseil demander AppleWorks l impression dans un fichier texte ASCII sur disque puis transmettez ce fichier nouvellement cr plus de codes de contr le peu de questions de pr sentation r gler l arriv e sur le Macintosh 5 Bonjour et S O S 4l De Jean Pierre BCULETEX JPB12 12 jan 88 08h31 J ai un probl me avec un fichier texte DOS 3 3 et ce message Erreur code 107 Que doua je faire Amiti s PS quoi correspond le num ro de chaque disquette Mac dans le bon de commande Erreur 107 Bad Subscript error vous tentez de s
190. us n aurez pas les caract res accentu s fran ais sur l cran Ou une machine d avenir chacun donc de faire ses choix Le mien est ni l un ni lautre un ordinateur dans un autre est une machine bloqu e qui ne pourra plus voluer et aussi bien l IBM PC que l Apple e sont des machines technologiquement d pass es d ailleurs abandonn es toutes deux par leurs constructeurs respectifs Ce ne sont pas des investissements d aujourd hui J avoue galement n prouver qu une jouissance tr s mod r e la compilation en DBase III Et plut t que d utiliser Lotus 1 2 3 ou Word Perfect sur IBM essayez donc Vip Professional de Vi p Technologies parfait clone de Lotus 1 2 3 mais avec l interface graphique souris du GS ou Word Perfect de Word Perfect Corporation sur GS Ces deux programmes existent d ailleurs aussi pour e c Vip Professional n cessitant une extension m moire type Ramworks ou Multiram Peut tre la carte PC Transporter serait elle un bon moyen de mettre niveau un e qui n aurait que 128Ko et des lecteurs 5 25 mais c est le m me prix qu une unit centrale de GS La seule machine qui peut concurrencer un GS c est le Mac Bon je sais le patron Eh bien faites lui faire un tour au Sicob ou la prochaine Apple Expo Une entreprise ne peut pas se permettre longtemps sans dommage conomique ce qui peut au contraire tre l int r t bien compris du particulier utiliser une info
191. uverture CP amp JLB Photogravure Graphotec 21 chemin de la Tour 92350 Le Plessis Robinson t 1 46 30 44 49 Pom s est une revue ind pendante non rattach e Apple Computer Inc ni Apple Computer France S A R L Apple le logo Apple Mac et le logo Macintosh sont des marques d pos es d Apple Computer Inc IBM est une marque d pos e de International Business Machine PC et AT sont des marques d pos es de la Soci t IBM ditions MEV 1988 ditorial Pom s sur Minitel aujourd hui Pom s est bien plus la revue des Apple que celle des Apple avec un cahier Mac comme Minitel 27 Kruptos InterPom s T Porm s Clv nous vous proposons nouveau des program mes communs aux Apple et au Macintosh Il s agit de Pom Link et R pom deur deux de ces programmes qui don nent un seul num ro la valeur d un abonnement 1 39 53 04 40 tel est le num ro de t l phone que Pomrn s met la disposition de votre Minitel 24 heures sur 24 D s aujourd hui vous y d couvrirezle r pondeur t l matique de ce num ro r pondeur pr t enregistrer vos messages et pour quoi pas vos commandes vo ci donc la possibilit d essayer un nouveau programme de communication avant d acheter la disquette Qui dit mieux Ce nouveau num ro de t l phone est promis bien des d veloppements mais rancon dusucc s pardonnez nous en cette p riode de mise en service quelques tonalit s occup S ilest un
192. vec un bureau de 1 M ga suffit 80 des besoins d un utilisateur d butant Simplement l Apple 8 bits passe quasiment dans le domaine public je veux dire dans la production Taiwanaise bas prix rejoignant les compatibles IBM Le successeur de l Apple c se trouve d sormais dans les supermarch s des USA un ordinateur compatible e 65C02 avec 1 M ga de Ram souris sortie RVB drive 5 25 int gr acceptant les disques 3 5 avec pav num rique avec tous les interfaces du fe plus l interface parall le et un port d extension muni d un processeur 3 6 M gaherz plus rapide que le GS C est le LASER 128 EX de Video Technology produit en Chine vendu aux USA par Central Point Software qui produit Copy pour le et le Mac Son prix 500 dollars soit moins de 3000 francs ce prix on a d sormais un Apple presque comme on a le t l phone Apple for everyone Si Apple abandonne le c il n abandonne pas ses utilisateurs il a cr aux tats Unis avec la coop rative A P P L E une Apple Programmers and Developers Association APDA qui fournit tous et pas seulement aux d veloppeurs patent s les informations documentations outils de d veloppement ctc n cessaires pour programmer sur les machines Apple Les plus grands d veloppeurs en sont membres tout aussi bien que le bidouilleur de banlieue Les outils sont vendus prix co tant et bien entendu sans aucune garantie
193. x7 y1 x2 y2 couleur But efface un rectangle en utilisant la couleur d sign e Explication x1 yl x2 et y2 coordonn es du rectangle effacer x et x2 doivent tre compris entre 1 et 40 inclus y7 et y2 doivent tre compris entre 1 et 24 inclus couleur est une variable ou expression enti re qui d signe la couleur utiliser poureffacer le rectangle 0 noir 096 de gris l rouge 50 de gris S 2 vert 70 de gris 3 jaune 9096 de gris e 4 bleu 40 de gns 5 magenta 60 de gris e 6 cyan 80 de gris e 7 blanc 100 de gris Dom n 34 Remarque x2 doit tre sup rieur ou gal xZ y2 doit e sup rieur ou gal y7 Exemples 10 REM Exemples d utilisation 20 REM de VIDRECT 30 VIDRECT X1 Y1 x2 Y2 CcoS 40 VIDRECT 10 10 20 15 2 50 VIDRECT X X1 3 X X2 9 20 C 1 Voir aussi VDECRAN VIDLIGNE Pom Link 2 1 les instructions ACCEPT colonne ligne mede sellicitatien lengueur reteur tat ACCEPTF tai AFFICHE cha ne sur l Apple AFFICHE cha ne sur le Macintosh AFFICHER cha ne uniquement Macintosh ALERTE message bip APPEL tat BAS nombre BIP CADRE x4 vi x2 y2 type lignage couleur C couleur F CHARIOT nombre CNXN CNXR tat CURINVIS CURVIS DECNX DEPLACE colonne ligne ENLIGNE tat FIXE FLASH GR HAUT nembre IDENT valeur l valeur 2 valeur 3 tat INIT dot INVERSE LIGNE LOCALISE colonne ligne tat MODE mode MTH m
194. xemple 10 REM Exemple d utilisation de CURVIS 20 CURVIS Voir aussi CURINVIS DECNX Syntaxe de l instruction DECNX But D connexion du Minitel serveur et du Minitel utilisateur Exemple 10 REM Exemple d utilisation de DECNX 20 DECNX Voir aussi CNXN CNXR 16 Pom s n 34 DEPLACE Syntaxe de l instruction DEPLACE colonne li gne But Positionnement du curseur Explications colonne et ligne sont des variables ou expressions enti res indiquant la position du curseur colonne doit tre compris entre 1 et 40 inclus ligne doit tre compris entre 1 et 24 inclus Exemples 10 REM Exemples d utilisation 20 REM de DEPLACE 30 DEPLACE 2 10 40 DEPLACE 2 LIS 50 DEPLACE CO 2 L N 1 Voir aussi LOCALISE ENLIGNE ne fonctionne pas en local Syntaxe de l instruction ENLIGNE tat But Permet de s assurerde la pr sence du Minitel utilisateur Explication tat est une variable enti re dans laquelle on pourra trouver au retour dans le programme Basic e tat Osile Minitel utilisateur ne r pond pas e tat 1 1 sur le Macintosh si le Minitel utilisateur r pond normalement Remarque ENLIGNE vide le tampon d entr e des caract res voir PURGE pour le Macintosh Exemple 10 REM Exemple d utilisation de ENLIGNE 20 ENLIGNE ET FIXE Syntaxe de l instruction FIXE But Passe en affichage non clignotant Pom s n 34 Exemple 10 REM Exemple d utilisation de FIXE
195. y inc ldy cpy bne jup ora sta Jar beq emp bne vecteur y 1 S4C 3rS dehut 3F6 debut 3F7 0 deuxc SFBB3 6 ok SESCH ok deuxc 0 cmd nocmd cx cm 12 11 snerr AQ cmd y chrget fincnid LAS So sinatalle nouveau vecteur amp sest on sur un Mic 2 sinit longueur cmd cherche la commande transforme en minuscule et stocke les caract jusqu 1 virgule Quel serait l int r t d un serveur si l ordinateur ne sait pas que le t l phone sonne Rendez vous page 75 ou pour les bricoleurs dans le num ro 32 ldy sty inc ldy lda Cp bee ldx inx inc ldy lda SFF ptrcmd ptrcad ptremd commande y cmd 2 9 ptrcmd ptrcmd commande y cmd x Compare chacune des commandes compare d abord la longueur puis le nom lui meme 2 trouve SL 2 3 sautind pas eu bne cpx beg inc ldy Ida Seq bui inc jn ida sta lda sta lay beg ne ne Ing inc bne inc dey bne jmp jmp 2 cmd trouve 100 ptrcmd ptrcmd commande y pas eu EE nocmd 1 lt adrcom sBgawtind 1 gt adrcon sautind 2 nocnd sautind sautind 2 3autind 2 sautind i 53 sautind 2 1 adrcom anerr Source PL 2 Assembleur ProCODE pre accept mm accept accepti a0 s0 lga sta lda sta jsr stx jsr stx cpx bcc Jmp 1

Magazine Pom`s : la collection

Contents

Download Pdf Manuals

Related Search

Related Contents