fe adeaziAe ÉHÉPECE IS gas erding tours EINEL BLP

lletobre 1356 Fe. ele

Rédacteur: Réal Gagnon 390 Bl. Central Nord Duberger P.Q. 61P 3P9 Collaboration: Simon Rioux, Yves Gagnon Ce bulletin est conçu avec l'aide du traitement de texte QUILL (PSION) at de TASPRINT QL (TASMAN SOFTWARE). L'impression se fait sur une imprimante NX-10 de STAR .

Es INFOS : Sinclair News Entre deux octets

PROG : Enregistrement numerique

(2468) PROG : Definition de WINDOW

CQL) PROG > Micre-lusique (PAGE à QL : Connection a un MODEN

268 : Animation en Langage Machine

Avec l'automne qui arrive, l'avenir des ordinateurs SINCLAIR se précise, Le SPECTRUM est plus en forme que janais avec l'arrivée du SPECTRUM +2. Le QL quant à lui attend son heure, soit de renaissance ou de mort, Mais je pense que l'on peut être optiniste à son sujet car les pourparlers se poursuivent pour la faire renaitre de ses cendres encore toute chaudes...

C SINCLAIR NEWS | SUM N'EST PLUS...

Le magazine SUM a cessé de paraître, Un arrangement avec le aagazine TINE DESTGNS offre cependant aux abonnés de SUM de poursuivre leur abonnement avec TIME DESIGNS. I] est à noter qu'avec le retrait de SUM, TIME DESIGNS devient le plus gros magazine anéricain dédié aux ordinateurs SINCLAIR.

TIME DESIGNS MAGAZINE parait à tout les 2 sois (comme SIN...) et contient environ 36 pages. L'abonnement coute $15.00 US,

TIME DESIGNS MAGAZINE, 29722 Hult Rd. , Colton, OREGON 97017 USA

JOYSTICK COMPATIBLE KEMPSTON...

Dans un nunéro précédent de SIN nous avions parlé que les interfaces JOYSTICKS du SPECTRUM pouvez fonctionner sur le 2068, Ce qu'il y a d'important de vérifier c'est si l'interface à un connecteur conne le ZX8i (46 pins) ou un connecteur comme le SPECTRUM (56 pins), Il faut en prendre un avec le connecteur comme le 7X81. CHEETAH et DATEL en manufacture un. Voila le message est lancée!

SINC-LINK...

Le TORONTO TIMEX-SINCLAIR USER CLUB produit à chaque 2 aois un NEWSLETTER appelé SINC-LINK. 11 contient des articles pour le 1X81, le 2068 et le QL. Le cout de l'abonnenent est de $20.00 par année (6 nos).

TSU6 P.O. Box 7274 Stn. A , TORONTO, ONTARIO, MSW 1X9

= E E E

NOUVEAU MARCHAND QL...

Un nouveau commerce a fait apparition pour le QL. Il s'agit de MARKEL ENTERPRISES P.0. Box 2392, Secaucus, NJ 07094-0992 USA tél. 718-627-1293

COMPILATEUR BASIC 2068...

NOVELSOFT annonce la sortie d'un compilateur BASIC pour le 2068, TIMACHINE compilerait toutes les commandes BASIC ( sauf les commandes 1/0 comme SAVE... ) en langage machine et accepte les calculs en virgule flottante (comme SIN,COS...). Sur la néme cassette, il y a une version pour le 2068 et une autre pour le SPECTRUM. TIMACHINE se vend $19.99 US plus $3.00 pour les frais de poste.

NOVELSOFT, 106 7th STREET, TORONTO, CANADA MOV 3B4

LES MICRODRIVES...

Lors du rachat de SINCLAIR par AMSTRAD, M. Alain Sucre a clairement indiqué son intention d'abandonner les aicrodrives. Pour nous heureux propriétaires de QL, cette nouvelle était à prime abord une catastrophe car les microdrives sont essentiels pour la sauvegarde ou le chargement de programme a moins de possèder un interface et lecteur de disquette,

Mais voila que lorsque CLIVE a vendu les droits sur ses ordinateurs, les droits de manufacturer les microdrives ne faisait nullement partie de la vente, Un attente s'est heureusement conclu avec SINCLAIR et ABLEX, le manufacturier des microdrives pour poursuivre la production de celles-çi, Selon ABLEX il se vend entre 50 et 60000 cartouches par mois et la demande ne cesse d'augmenter!

NOUVEAU SPECTRUM...

Le nouveau SPECTRUM tel que promis par AMSTRAD est maintenant disponible sur le marché anglais, Appelé SPECTRUM +2, le +2 possède les memes caractéristiques que le SPECTRUM + 128K. Sauf que le clavier a était changé pour faire place à un clavier digne de ce nos, le magnétophone est maintenant intégré à l'ordinateur sur le coté droit, Deux prise JOYSTICK font leur apparition aais il ne réponde à aucun standard,

Dans le SINIO, nous avons vu comment il était possible de créer des effets d'animation en SINCLAIR BASIC. Comme promis, nous allons voir maintenant comment il est possible d'obtenir le mêne effet via le langage machine.

Si nous prenons le programme BASIC : 10 PRINT "#";

20 PRINT CHR§(8);

30 PRINT " "3

40 60 TD 10 la première ligne affiche notre étoile, la deuxième ramène le curseur à gauche et la dernière efface l'étoile. Puis on PRINT notre étoile à la position suivante et on recommence avec le même

principe.

En langage machine, la façon la plus simple d'écrire à l'écran est d'utiliser l'instruction RST 16 (voir SIN#4), En sachant cela, la conversion BASIC-YLANGAGE MACHINE est très siaple.

ORG 50000 loop LD A,"* RST 16 PRINT "#" LD A,8 RST 16 PRINT CHR$ (8) LD A, 32 RST 16 PRINT" " JR loop +60 TO loop

Si vous avez un ASSEMBLEUR et que vous tapez et essayez Ce programme vous découvrez quê les étoiles s'affiche dans le bas de l'écran car nous n'avons pas initialise celui-ci, Pour ce faire nous pouvons mettre à zéro la bit 0 de la variable système TVFLAG

(23612).

Un autre problème est la rapidité à laquelle l'animation se déroule. Si le BASIC est souvent trop lent, le langage machine est lui trop rapide! Donc il serait bon d'introduire un boucle de délai pour ralentir le déroulement de l'action.

Dernier problène (et non le aoindre), il est inpossible de faire BREAK pour arrêter le déroulement d'un programme machine à soins que le programmeur en offre la possibilité, Lors du développenent d'un programme, une bonne idée est d'insérer un appel à la routine de BREAK de la ROM du 2068, comme Ça il n'est plus nécessaire de faire un RESET de la machine pour corriger une

petite erreur de programmation.

Donc voici la nouvelle version de notre programme en ASSEMBLEUR,

loop

delai

ORS 50000

LD A,O sINITIALISATION DE LD (23612),À L'ECRAN

LD À,"*

RST 16 SPRINT "#"

CALL delai

LD A,8

RST 16 SPRINT CHR§(8)

LD A,32

RST 16 PRINT * "

CALL 8201 sROUTINE ROM DE BREAK RET NC +C=0 SI BREAK EST FAIT JR loop 360 TO loop

LD B,100 sROUTINE DE DELAI PUSH BC

LD B,100

DINZ di

POP BC

DINZ d0

RET

Pour mettre en pratique le tout voici un petit programme de démonstration qui nous permet de déplacer notre étoile avec l'aide du JOYSTICK #1.

La liste ASSEMBLEUR est la pour vous permettre d'étudier le tout. Si vous n'avez pas d'ASSEMBLEUR sous la main, un programme BASIC chargera les codes en mémoire pour vous. Pour partir le programme faites RANDOMIZE USR 50000.

LES PRINCIPALES ROUTINES

LIGNE 400-800 1000-5800

6400-7900 8200-15700 16300-16390

ROUTINE

Initialise l'écran

Boucle principale. Lecture du JOYSTICK et va à la routine de déplacement appropriée,

Test de la touche BREAK,

Routine de lecture du JOYSTICK. (Voir SIN#2) Routine de déplacement vers le haut.

Routine de déplacement vers le bas.

t>

16600-16609 16900-16909 18100-19900 20000-20075 20090-20170

LES VARIABLES

17500 POSX 17800 POSY

Routine de déplacement vers la gauche. Routine de déplacement vers la droite. Routine de délai.

Impression d'un espace.

Impression de l’étoile.

Position du curseur (ligne) Position du curseur (colonne)

am

Bienvenue au Club des Utilisateurs

Voulez-vous. .s.ssssssssssssssvesse

* Echanger vos Frogrammes.

* Correspondre avec d'autres Utilisateurs.

# Réaliser des Applications originales.

* Echanger des idées.

* Evaluer des Programmes.

* Avoir une remise de 15% sur Hardware et Software.

* Et bien d'autres Avantages.....-.2..20-

Pour Information :

LE CLUE DES wWTItt SATEURS OGL.

390 Boul. Central N. Québec, GIP 3P9 Tél: (418) 527-6103

QL -

Simon Rioux récidive avec un autre programme qui exploite les possibilités de la aystérieuse commande SOUND du 2068. Tapez le

U-filS E |

programme et sauvez-le sur cassette, puis faites RUN.

Si le coeur vous en dit,

l'adresse suivante:

vous pouvez communiquer avec Siaon à

SIMON RIOUX 46 Mayburry Hull, Québec JOA 1V5

MISE AU POINT

Je tient à préciser que SIN est TOTALEMENT INDEPENDANT de tout commerce ou club. Toute mention d'un produit, commerce ou club est publiée dans le seul but de renseigner le lecteur sur les produits ou les activités existants pour lui permettre de profiter pleinement de son micro-ordinateur. Le lecteur ne doit associer en aucune facon SIN et le commerce/produit à moins d'avis contraire.

Réal Gagnon

14

Coane on le sait, le QL possède 2 sorties séries, SERI et SER2. SERI est configurée en DCE et utilisée habituellement pour l'iaprimante. SER2 est quant à elle configurée en OTE, ce qui la rend idéale pour la connection avec un MODEM. Cependant la théorie est souvent différente de la réalité. SER2 est très capricieuse durant une communication et demande des "TIMINGS" précis pour éviter des pertes de données. Sur certains MODEMS, les données sont emmagasinges dans une ménoire-tanpon avant d'être acheminées vers le port série, ceci a pour effet de donner une chance à SER2 et de capter toutes les données fournies par le MODEM. Cependant cette caractéristique n'est présente que dans les MODENS assez dispendieux. Les MODEMS les moins chères demande l'ajout d'un merveilleuse petite boite fabriquée par MIRACLE SYSTEMS. Il se nomme le MODAPTOR, Ce qu'il y de bien avec le MODAPTOR c'est qu'il vient avec un logiciel de communication, TERMINAL de QCODE.

Le terminal peut fonctionner en 2 modes : VIEWDATA ou VTS2 Enulation. Le premier est surtout utile en Europe car il sert à accéder au base de données britannique du genre PRESTEL ou MICRONET, Un échantillon de ce qui disponible avec ces BBS est fournie sur le nicrodrive et je vous jure qu'il n'y à rien de telle içi en Amérique du Nord, donc si les comptes de téléphone élevés ne vous énerve pas... L'autre option, V132, sera plus utlisée ici. Elle vous permet d'accéder aux BBS de la région de Québec, du Canada, des Etats-Unis, etc...

Pour plus d'informations:

GAGNON ELECTRONIQUE, 390 BL. CENTRAL, DUBERGER, QUEBEC, GIP 3P9

Si vous avez de la difficulté à trouver du papier pour votre imprimante TS2040, vous pouvez toujours prendre le papier que RADIO SHACK offre pour son imprimante TANDY TP-10, I] fonctionne mieux que celui de TIMEX car il imprime NOIR sur un papier BLANC et non sur un papier 6RIS.

Simon Rioux

à r P j = x i D : Enregistrement numerique |

Voici un programme qui permet au 2068 d'enregistrer de la voix ou de la musique. Pour ce faire, tapez le petit programme BASIC qui va vous servir à POKEr les codes en aénoire. Entrez les codes de la première et de la deuxième routine . Faites NEW et tapez:

10 CLEAR 32767: RANDOMIZE USR 65290

Faites jouer un enregistrement de votre voix ou bien un morceau

de ausique sur votre magnétophone. Le 2068 utilisera toute la ménoire disponible pour enregistrer "numériquement" le son. Lorsque tout est terminé, faites RANDOMIZE USR 65318 pour entendre l'enregistrement,

Simon Rioux

fa

PEII CSI CT CA CAT CN

= 5 Ā 5 5 = &

12

Le kite

(OL: We

Voici un utilitaire qui peut vous facilitez la tâche pour déterminer les bons paramètres de la commande WINDOW. Cette commande demande cing paramètres, elle se présente sous la forme de WINDOW largeur,hauteur,x_position, y position , Donc si nous avons WINDOW 100,50,0,0 cela signifie un WINDOW de 100 pixels de large, de 50 pixels de haut et son coin supérieur droit se situe à la coordonnée (0,0). :

initian y HHS

On le déplace avec les touches curseur. $i on appuie la touche CTRL avec une des touches curseur, un déplacement rapide s'effectue. On aodifie les dimensions du WINDOW avec la touche ALT et les touches curseur,

le #deaz ÜRE SAREE R FS

des aarding teurs SIALL ALF

Le programme fournie au bas de l'écran les coordonnées du WINDOW. | | | | | | | j i] | } |

100 RENark definition de window gag-086

110 intro

120 OPENY4, ser _160x12a150x200: INK#4, O: PAPERYA, 4:CLS#4 130 LET largeur=100:hauteur=100: xpos=100: ypos=80

140 dessine_fenetre

150 REPeat loop

160 lecture

170 IF NOT aucune _touche:efface fenetre: decision: dessine fenetre 180 END REPeat loop

190 :

200 DEFine PROCedure lecture

210 a=CODE (INKEY§(~1))

220 aucune touche=0 230 END DEFine 240 :

250 DEFine PROCedure decision 260 SELect ON a

270 =192:xpos=xpos-(xpos)0)

280 5200: xpos=xpos+ (xpos+largeur(508)

290 =208: ypos=ypos-(ypos)0)

300 =216: ypos=ypos+(yposthauteur<254)

310 +209: largeur=largeur+(xpos+largeur(508) 320 #217: largeur=largeur-(largeur)1)

330 =201shauteur=hauteur+(yposthauteur(254) 340 =193:hauteur=hauteur-(hauteur)1)

350 #202: xpos=xpos+(10# (xpos+largeur+10¢508)) 360 =194: xpos=xpos~(10#(xpos){1))

370 =210: ypos=ypos-(10#(ypos>0))

380 =218: ypos=ypost (10# (yposthauteur+10<254)) 390 =REMAINDER ‘aucune _touchezf

400 END SELect

410 BEEP 1,1000

420 END DEFine

430 :

440 DEFine PROCedure dessine _fenetre

450 BLOCK hauteur, largeur, xpos, ypos, 87

460 BORDER#4, 1, 2 ,

470 PRINT#4,' WINDOW shauteurs’,";largeurs",!;xposs",!syposy! ! 480 END DEFine

490 :

500 DEFine PROCedure efface fenetre

510 BLOCK hauteur, largeur, xpos, ypos, 0

520 END DEFine

530 :

|

15

540 DEFine PROCedure intro

550 MODE 512

560 YINDOW 512,256,0,0

570 PAPER i:BORDER 1,4

380 CLS

590 WINDOW 244, 100, 129, 40

600 PAPER 4: INK O:BORDER 2,7:CL$

610 (SIZE 1,1

620 PRINT ! DEFINITION de WINDOW!

630 PRINT ! gag-086!

640 CSIZE 0,0: INK 7

650 PRINT ' TOUCHES CURSEUR -> Deplace le WINDOW’ 660 PRINT ! CTRL + CURSEUR -> Deplace +10?

670 PRINT ? ALT + CURSEUR -) Dimension du WINDOW 680 PRINT

690 PRINT ' appuyer une touche pour debuter!:PAUSE 700 FOR i=0 TO 100:SCROLL 1:BEEP .5, 1000

710 WINDOW 512,256,0,0:PAPER 1:BORDER 1,4:SCALE 256,0, 0:ÛLS

720 END DEFine

f À Gi Li E À à | PROSPERO SOFTWARE offre au QL deux langages de programmation, Il s'agit de PRO PASCAL et de PRO FORTRAN 77, L'avantage de ces langages, sur le BASIC par exemple, est qu'ils sont conpilés donc beaucoup plus rapides lors de l'éxecution. Le PASCAL est une version du standard appellée ISO 7185/ANSI 77043.97, tandis que le FORTRAN répond à la norme appellée ANSI FORTRAN-77. Ils sont disponibles tous les deux au prix de ‘86.71 plus ‘5.00 pour les frais de livraison,

PROSPERO SOFTWARE, 190 CASTELNAU, LONDON S¥13 9DH, ENGLAND

KNIGHTED COMPUTER'S transforme les logiciels du SPECTRUM pour qu'ils puissent fonctionner sur le 2068. L'avantage de ces traductions se retrouve dans les jeux qui utilisent, après la transformation, le port JOYSTICK du 2068.

Voici une liste des jeux déja traduits: TRASHMAN TRAVEL WITH TRASHMAN FIGHTER PILOT NIGHT GUNNER TURBO ESPRIT

SABOTEUR COMPLETE M.C. TUTOR ZIP BASIC COMPILER

KNIGHTED COMPUTERS, 707 HIGHLAND STREET, FULTON, NY 13069 USA

Peut-être avez vous déjà vu sur d'autres ordinateurs le programme PRINTSHOP, Ce programme sert à créer des posters, des banières, des cartes de voeux. Le mème type de programme existe gaintenant pouur le 2068. Le premier programme s'appelle GREETING CARD DESIGNER. Il sert, comme son noa l'indique, à imprimer des cartes de voeux. BANNER DESIGNER sert à produire des baniéres, et POSTER DESIGNER est pour évidemment les posters. Ces progrannes sont produits par ZEBRA SYSTEMS.

ZEBRA SYSTEMS Inc. 78-06 Jamaica Avenue, Woodhaven NY 11421 USA

Les versions 2.35 des logiciels PSION du QL sont arrivés à Québec, Pour les obtenir informez-vous chez SAGNON ELECTRONIQUE à DUBERGER.

ABONNEMENT SIN

ae, Wee | COR o 4 Tae A we yee gees Et CLIM ENT i LE Puer?

i aa 8, ft

LISTE DES ANCIENS NUNEROS

NUMERO : 6 DATE : janvier 1986 NBRE de PAGES : 19 PRIX : $2.00 ARTICLE : Sinclair-News, Hardware-News, Les Trucs & Astuces du 2068 PROGRAMME : Solitaire ($P/2068), Caractères Alternatifs (SP/2068)

QL : Rencontre avec le coeur du QL, le 4C68008

QL Caractères francais avec QUILL, le traitement de texte TECHNIQUE : Des fonctions utiles avec DEF FN

TECHNIQUE : Le décodage du clavier du 2068

ARTICLE : Initiation au langage machine, Entre 2 octets...

NUMERO : 7 DATE : février 1986 NBRE de PAGES : 19 PRIX : $2.00 Article : Sinclair-News, Entre 2 octets... SPECIAL : Sprite Basic pour le Spectrum

AL : Périphériques et logiciels pour le QL

Logiciel +: Monopoly, Scrabble, The way of the exploding fist

1x81 : Des trucs pour charger les programmes avec succes

NUMERO : @ DATE : mars 1986 NBRE de PAGES : 19 PRIX : $2.00

ARTICLE + Sinclair-News, Entre 2 octets..., Trucs pour le 2068

PROGRAMME : 10 polices de caractères en mene temps pour le 2068 ! PROGRAMME : Calcul de la facture d'électricité (SP/2068) QL : Les commandes non-docunentées du QL

LOGICIEL : Highway Encounter (SP), Voice Chess (2068), Chess (2068)

TECHNIQUE : Programmation en langage machine TECHNIQUE : Les signaux et les connecteurs du 2068/7X81/Spectrua

NUMERO : 9 DATE : avril-mai 1986 NBRE de PAGES : 19 PRIX : $2.00 ARTICLE + Sinclair News, Entre deux octets...

PROGRAMME : Scrolls d'ecrans (2068), Effets speciaux (QL)

QL : Encore les commandes non-documentees du QL

PROJET + Conversion du 2068 en 1X SPECTRUM

PROGRAMME : Composeur telephonique (2068)

TECHNIQUE : Les connecteurs du QL

ARTICLE : Neuf logiciels pour le SINCLAIR QL

ARTICLE : Les Trucs et astuces (2068/QL)

NUMERO : 1 ARTICLE PROGRAMME QL PROGRAMME

PROGRAMME :

TECHNIQUE QL

O DATE : juin-juil 1986 NBRE de PAGES : 20 PRIX : 2,00

: Sinclair News , Hardware News , Software News , Entre 2 octets...

: Nicro-Musique , avec la commande SOUND, Johnny B. Goode,Air Anglais : La norae RS-232c

: Caractères soulignés via le BASIC du 2068 (2068/SP)

Création de ligne zéro (2068/5P)

Animation en BASIC (2068/SP)

Les POKEs utiles...

NUMERO : 11 DATE : AQUT-SEPT 86 NBRE de PAGES : 20 PRIX : 2.00

ARTICLE PROGRAMME PROGRAMME PROGRAMME ql LOGICIEL

OFFRE

Sinclair News , Entre deux octets... Headerlist (2068)

Solitaire (QL)

Calcul d'interet (2068)

Les Microdrives , MEGABASIC et BETA BASIC (SPECTRUM) TASPRINT et KNIGHT FIGHT (QL)

NUTRITEST , logiciel gratuit pour le 2068

GL: PROGRAMMES DIVERS Tasse

Voici trois programmes qui peuvent être utile.Le premier programme il suffit d'entrer un texte et l'ordinateur vous dira combien il y a de aots dans ce texte.Le deuxième programme entrer un eot et l'ordinateur vous dira si ce aot est un palindrome. Et le dernier programme est une conversion de degré Fahrenheite à Celcius.

Yves Gagnon,

100 REMark COMPTE LES MOTS DANS UN TEXTE

110 :

120 CES: COMPTE=0s INPUT 'ENTREZ VOTRE TEXTE: ls A$

130 FOR TEXTE=1 TO LEN(AS)

140 IF AS(TEXTE TO TEXTE) <> * " THEN 60 TO 160

150 LET COMPTE=COMPTE+!

160 END FOR TEXTE

170 PRINT \\'IL Y A 'SCOMPTE+L;! MOTS DANS LE TEXTE?

100 REMark CE PROGRAMME RECONNAIT UN MOT PALINDROME

110 :

120 CLS:B$="": INPUT "ENTREZ VOTRE MOT: '3A$

130 FOR MOT=LEN(A$) TO 1 STEP -1

140 LET B$=B$A$ (MOT TO MOT)

150 END FOR MOT

160 IF A$=8$ THEN PRINT\\ "CE MOT EST UN PALINDROME":STOP 170 PRINT\\ "CE MOT N'EST PAS UN PALINDROME"

106 REMark CONVERSION TEMPERATURE

110:

120 CLS:CELCIUS=0: INPUT'ENTREZ DEGRE FAHRENHEIT: 3 TEMPERATURE 130 CELSIUS=5#(TEMPERATURE-32) /9

140 PRINT\\'DEGRE CELCIUS= 'sCELSIUS