Micro Systèmes n°32 juin 1983
Micro Systèmes n°32 juin 1983
  • Prix facial : 20 F

  • Parution : n°32 de juin 1983

  • Périodicité : mensuel

  • Editeur : Société Parisienne d'Edition

  • Format : (203 x 271) mm

  • Nombre de pages : 230

  • Taille du fichier PDF : 178 Mo

  • Dans ce numéro : intelligence artificielle, robots et systèmes experts.

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 166 - 167  |  Aller à la page   OK
Pages suivantes >
166 167
ccnnRFM [801115 In 9111 20 HLM 4011110  : 30 Rrm40 PRINT P11081261 511 PRINT 1A8(51):"VO ! -, 104,015 IN 19115. 60 PRINI SYRING8(2,10, 70 OPTInN 0451 t RO DIM 1(2.12) 90 RI 111111- 0000 00 fOR 1=1 In 2 210 FOR J.I In 12 220 READ 11 I,)` 230 NEXT) 240 NLXT I 250 000110 7000 260 00000 2140 270 J1=(NP-NPA)/.5 280 IF J1=0 THFN 3011 290 IF RD>1)904,11) ! MIN 530 500 N=NP 310 GOSUES Irma 32n 011T0 410 3311 IF NPA=1 AND NP>) 11119 sRn 3411 IF NPA=2 AND NP,I.5 THIN 58, 1 3511 N=NP 360 001110 1000 37n 0010 410 380 N=NPA 590 00500 1000 400 10.1M-11.8450 410 REM 420 IF IM<=3200 AND 0=1'MIN 19=1M-13200-1W 430 IF IM(=1100 AND N=1.5 101N IM=Im-(1100-1M'440 IF IM'211000 tHEN Imr1m.110-700110'..07 450 IM=INT(IM —AF) 460 005110 snnn470 END film RI F.1 rAL tll PI l'180111 010 Ir RD<300110 THE'. PD=11 nzn 030 040 050 060 070 080 090 100 110 120 130 140 150nno 010 020 030 R=RD(1 RI SURF 5000 1=0 11=0 READ 12 IF 0<=12 1111N 11311 5=1+(12-11)• 1•.05 1=1+1 11=12 010 10711 5=5+ (R-111• (I 1•.115 [M=[91(5.5 1 RF 111119 RI0 DI IF RMINA I0N 1111 NIIMI11t1 IO PAPI ; PR INT "40811RF 11'F NF ANIS 4 r11101.1 [11301 NE 9 NEN=191 4141 C140 PRINT. 1 -V11115 i ri 18014101 (1 1111 M41111 osn INPUT 001 1160 Il NP A< I AND NPA,,2 11111 2040 1170 NP_NPA+NT N•.5 1100 Il NPAI AND 910,0 11115 NP=Np+ 1190 11 104>2 THIN NP=NP+ 21110 INPUT "911141101 10 PARl',, 11PPLIM1511101 211, 1 IF Np5>5 1)119 210 0 212n NP=NP+NPS 2110 01 TURN 2140 REM 5011111 101 PI 11 N11 1,1`,PfINIMI I 2150 PRINT 21611 PRINT "TOTAL 0F5 501 011715,0115111N, 1,11 111,0 p 2170 INPUT REV 21110 D=RF I 2190 IF 11,50900 1 1H1N D=50'100, 2200 PRINT "FIES-40115 011X F RA I .0" TITEN 2240 2230 100117 "MONT AN1 MS I PA 0111'2240 RN=01- 4-0 2250 0211=119•.2 2260 II 1)20)92000 1 IIIEN D20= 9 2000'2270 PRINT "1111AL DT 5 RI), ,/N11', DI 0[11111'F1 >00110(1X 0111111 II P.2200 190111 Ryf 2290 PRINT "10101 DE 505 011101'N11,-, 2 -300 190111 HAIT 2910 PR 111 "111101 DI Vfl,
Jouez au Scrabble SCRABB LE de Pascal CHAUVIN à améliorer Pensez uniquement 8 votre soccupera score des  : votre lettres ZX et du plateau Des amis ? un ordinateur ? Vous pouvez entamer une partie acharnée de ce célèbre jeu de lettres sans autre effort qu'un « LOAD » et un « RUN ». Vous aurez même le loisir de l'interrompre et de la sauvegarder pour la reprendre plus tard. de jeu. Langage  : Basic Ordinateur  : ZX 81, 16 Ko. Le jeu de Scrabble est bien connu de nos lecteurs. Rappelons cependant que c'est un jeu de stratégie combinant une bonne connaissance du vocabulaire français et du calcul mental. L'objectif n'est pas de faire le mot le plus long possible, mais de réaliser avec des tirages de sept lettres les mots rapportant le plus de points. Au lancement du programme, un menu apparaît (fig. 2), offrant cinq options  : choix de la teinte du plateau de jeu (blanc ou gris), de la vitesse de calcul du ZX 81 (« FAST » ou « SLOW ») et de l'affichage des règles (fig. 3). Après définition du nombre de joueurs (maximum 4), le plateau apparaît sur l'écran et la partie commence (fig. 1). Le tirage, effectué par le programme pour chaque joueur, se trouve à droite du plateau, le numéro du joueur courant s'inscrivant en inversion vidéo. L'ordinateur demande alors le mot joué. Celui-ci est comparé aux lettres du tirage ; aussi ne fautil inscrire que les lettres du tirage pour constituer un mot auquel participent des lettres déjà présentes sur le plateau (pour écrire « DETERRER » quand « TERRE » est connu, il faut entrer « DER » à la demande du programme). Ensuite, les coordonnées de la première lettre du mot doivent être fournies en commençant par la colonne (identifiée par une lettre), puis par la ligne (identifiée par un chiffre), et enfin en précisant le sens d'écriture du mot (horizontal ou vertical). Si une seule lettre est posée, cette dernière précision n'a pas d'importance. Ces éléments (mot et coordonnées) sont affichés, et une confirmation est demandée par le programme, permettant au joueur Juin 1983 de les contrôler et, éventuellement, de les corriger. Lorsque le coup est confirmé, l'ordinateur place les lettres sur le plateau, compte les points en tenant compte de tous les paramètres (valeur des lettres, cases doublant ou triplant une lettre ou un mot). Après ce travail (un peu long, certes, mais qui permet aux autres joueurs de tirer profit de la nouvelle configuration du plateau, le ZX 81 annonce le total obtenu pour le mot et augmente d'autant le score du joueur. Votre mot... Pendant le calcul, l'ordinateur affiche la valeur des lettres  : toutes valent 1, exceptées D, G, M qui valent 2 ; B,C, P = 3 ; F, H, V = 4 ; J, Q = 8 ; K, W,X, Y, Z = 10 et le « joker » (affiché sous la forme d'un point «. », qui vaut 0). Cet affichage peut être obtenu avant d'entrer un mot, lorsqu'à la question « VOTRE MOT » l'on répond « ? ». Le retour à la séquence normale d'entrée de mot est obtenu alors en tapant sur n'importe quelle touche. Maintenant, vous êtes prêt à jouer... Un dernier détail toutefois  : si une partie ne peut être terminée, il est possible de la sauvegarder. Lorsque la question « VOTRE MOT » est affichée, il suffit d'appuyer « EDIT », « STOP » et de taper « GOTO 9800 » (sans oublier de préparer votre magnétophone). Toutefois, quand vous reprendrez le jeu (par un « LOAD ») , les mots déjà joués n'apparaîtront plus en inversion vidéo, mais en écriture normale. De plus, la distribution des joueurs au moment de l'arrêt sera détruite si on ne veille pas à déplacer la ligne 1055 en 650 Composition du programme 0010 à 0480  : présentation des deux premières pages d'écran (choix de la présentation, nombre de joueurs). 0500 à 640  : données. 1000 à 1150  : jeu, affichage des points, sauts aux différents sous-programmes. 2000 à 2140  : sous-programmes d'affichage du plateau. La ligne 2060 permet de remplacer les grisés par des blancs. 3010 à 3510  : tirage des jeux individuels, entrée des propositions, tri, comparaison entre les lettres jouées et celles vous appartenant. 3600 à 3790  : sous-programme permettant d'affecter une valeur aux lettres, et un sens aux différents signes. 4100 à 4190  : mémoire propre du joueur n°1. 4200 à 4290  : mémoire propre du joueur n°2. 4300 à 4390  : mémoire propre du joueur n°3. 4400 à 4490  : mémoire propre du joueur n°4. 5000 à 6450  : partie principale du jeu. Elle consiste à compter les points, vérifier l'existence d'un nouveau mot en montant, descendant, en regardant avant et après la lettre placée, en considérant si les bonis (mot et/ou lettre/mot compte double/triple) appartiennent ou non à ce tour... 8000 à 8040  : sous-programme donnant la valeur des lettres. 9000 à 9780  : règles du jeu. 9800 et 9810  : sauvegarde. LISTE DES VARIABLES AS/BS CS DS/KS ES FS GS/HS IS/JS NS PS XS US/ZS El/E2/E3/E4 DI D2/D7/D8 D3 D5 D4 = Plateau de jeu = Lettres du jeu = Mot du joueur = Entrée des coordonnées de la l'lettre = Sens d'écriture du mot = Tirage des joueurs I et 2 = Tirage des joueurs 3 et 4 = Variable de travail (comptage des points) = Variable demande de changement du mot entré = Variable d'estimation du mot entré = Variables temporaires de traitement d'un nouveau tirage = Décompte des scores des joueurs = Valeur de la lettre à sa position = Variables « de travail = Variable de comptage du mot en cours = Résultat du joueur courant = Valeur du mot courant MICRO-SYSTEMES — 167



Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


Micro Systèmes numéro 32 juin 1983 Page 1Micro Systèmes numéro 32 juin 1983 Page 2-3Micro Systèmes numéro 32 juin 1983 Page 4-5Micro Systèmes numéro 32 juin 1983 Page 6-7Micro Systèmes numéro 32 juin 1983 Page 8-9Micro Systèmes numéro 32 juin 1983 Page 10-11Micro Systèmes numéro 32 juin 1983 Page 12-13Micro Systèmes numéro 32 juin 1983 Page 14-15Micro Systèmes numéro 32 juin 1983 Page 16-17Micro Systèmes numéro 32 juin 1983 Page 18-19Micro Systèmes numéro 32 juin 1983 Page 20-21Micro Systèmes numéro 32 juin 1983 Page 22-23Micro Systèmes numéro 32 juin 1983 Page 24-25Micro Systèmes numéro 32 juin 1983 Page 26-27Micro Systèmes numéro 32 juin 1983 Page 28-29Micro Systèmes numéro 32 juin 1983 Page 30-31Micro Systèmes numéro 32 juin 1983 Page 32-33Micro Systèmes numéro 32 juin 1983 Page 34-35Micro Systèmes numéro 32 juin 1983 Page 36-37Micro Systèmes numéro 32 juin 1983 Page 38-39Micro Systèmes numéro 32 juin 1983 Page 40-41Micro Systèmes numéro 32 juin 1983 Page 42-43Micro Systèmes numéro 32 juin 1983 Page 44-45Micro Systèmes numéro 32 juin 1983 Page 46-47Micro Systèmes numéro 32 juin 1983 Page 48-49Micro Systèmes numéro 32 juin 1983 Page 50-51Micro Systèmes numéro 32 juin 1983 Page 52-53Micro Systèmes numéro 32 juin 1983 Page 54-55Micro Systèmes numéro 32 juin 1983 Page 56-57Micro Systèmes numéro 32 juin 1983 Page 58-59Micro Systèmes numéro 32 juin 1983 Page 60-61Micro Systèmes numéro 32 juin 1983 Page 62-63Micro Systèmes numéro 32 juin 1983 Page 64-65Micro Systèmes numéro 32 juin 1983 Page 66-67Micro Systèmes numéro 32 juin 1983 Page 68-69Micro Systèmes numéro 32 juin 1983 Page 70-71Micro Systèmes numéro 32 juin 1983 Page 72-73Micro Systèmes numéro 32 juin 1983 Page 74-75Micro Systèmes numéro 32 juin 1983 Page 76-77Micro Systèmes numéro 32 juin 1983 Page 78-79Micro Systèmes numéro 32 juin 1983 Page 80-81Micro Systèmes numéro 32 juin 1983 Page 82-83Micro Systèmes numéro 32 juin 1983 Page 84-85Micro Systèmes numéro 32 juin 1983 Page 86-87Micro Systèmes numéro 32 juin 1983 Page 88-89Micro Systèmes numéro 32 juin 1983 Page 90-91Micro Systèmes numéro 32 juin 1983 Page 92-93Micro Systèmes numéro 32 juin 1983 Page 94-95Micro Systèmes numéro 32 juin 1983 Page 96-97Micro Systèmes numéro 32 juin 1983 Page 98-99Micro Systèmes numéro 32 juin 1983 Page 100-101Micro Systèmes numéro 32 juin 1983 Page 102-103Micro Systèmes numéro 32 juin 1983 Page 104-105Micro Systèmes numéro 32 juin 1983 Page 106-107Micro Systèmes numéro 32 juin 1983 Page 108-109Micro Systèmes numéro 32 juin 1983 Page 110-111Micro Systèmes numéro 32 juin 1983 Page 112-113Micro Systèmes numéro 32 juin 1983 Page 114-115Micro Systèmes numéro 32 juin 1983 Page 116-117Micro Systèmes numéro 32 juin 1983 Page 118-119Micro Systèmes numéro 32 juin 1983 Page 120-121Micro Systèmes numéro 32 juin 1983 Page 122-123Micro Systèmes numéro 32 juin 1983 Page 124-125Micro Systèmes numéro 32 juin 1983 Page 126-127Micro Systèmes numéro 32 juin 1983 Page 128-129Micro Systèmes numéro 32 juin 1983 Page 130-131Micro Systèmes numéro 32 juin 1983 Page 132-133Micro Systèmes numéro 32 juin 1983 Page 134-135Micro Systèmes numéro 32 juin 1983 Page 136-137Micro Systèmes numéro 32 juin 1983 Page 138-139Micro Systèmes numéro 32 juin 1983 Page 140-141Micro Systèmes numéro 32 juin 1983 Page 142-143Micro Systèmes numéro 32 juin 1983 Page 144-145Micro Systèmes numéro 32 juin 1983 Page 146-147Micro Systèmes numéro 32 juin 1983 Page 148-149Micro Systèmes numéro 32 juin 1983 Page 150-151Micro Systèmes numéro 32 juin 1983 Page 152-153Micro Systèmes numéro 32 juin 1983 Page 154-155Micro Systèmes numéro 32 juin 1983 Page 156-157Micro Systèmes numéro 32 juin 1983 Page 158-159Micro Systèmes numéro 32 juin 1983 Page 160-161Micro Systèmes numéro 32 juin 1983 Page 162-163Micro Systèmes numéro 32 juin 1983 Page 164-165Micro Systèmes numéro 32 juin 1983 Page 166-167Micro Systèmes numéro 32 juin 1983 Page 168-169Micro Systèmes numéro 32 juin 1983 Page 170-171Micro Systèmes numéro 32 juin 1983 Page 172-173Micro Systèmes numéro 32 juin 1983 Page 174-175Micro Systèmes numéro 32 juin 1983 Page 176-177Micro Systèmes numéro 32 juin 1983 Page 178-179Micro Systèmes numéro 32 juin 1983 Page 180-181Micro Systèmes numéro 32 juin 1983 Page 182-183Micro Systèmes numéro 32 juin 1983 Page 184-185Micro Systèmes numéro 32 juin 1983 Page 186-187Micro Systèmes numéro 32 juin 1983 Page 188-189Micro Systèmes numéro 32 juin 1983 Page 190-191Micro Systèmes numéro 32 juin 1983 Page 192-193Micro Systèmes numéro 32 juin 1983 Page 194-195Micro Systèmes numéro 32 juin 1983 Page 196-197Micro Systèmes numéro 32 juin 1983 Page 198-199Micro Systèmes numéro 32 juin 1983 Page 200-201Micro Systèmes numéro 32 juin 1983 Page 202-203Micro Systèmes numéro 32 juin 1983 Page 204-205Micro Systèmes numéro 32 juin 1983 Page 206-207Micro Systèmes numéro 32 juin 1983 Page 208-209Micro Systèmes numéro 32 juin 1983 Page 210-211Micro Systèmes numéro 32 juin 1983 Page 212-213Micro Systèmes numéro 32 juin 1983 Page 214-215Micro Systèmes numéro 32 juin 1983 Page 216-217Micro Systèmes numéro 32 juin 1983 Page 218-219Micro Systèmes numéro 32 juin 1983 Page 220-221Micro Systèmes numéro 32 juin 1983 Page 222-223Micro Systèmes numéro 32 juin 1983 Page 224-225Micro Systèmes numéro 32 juin 1983 Page 226-227Micro Systèmes numéro 32 juin 1983 Page 228-229Micro Systèmes numéro 32 juin 1983 Page 230