Nº240 (4/2010)
Download :
|
240
Dès le départ, en 1987, le Club Oric International (COI), qui deviendra le club Disc Oric (CDO) en 1989, puis le Club Europe Oric (CEO) en 1990, publie un Journal sous forme de disquettes, le Journal Electr’Oric (JEO), principalement composé de pages d’écran Text (n°1 janvier 1987). Mais cette formule est trop lourde à maintenir. Le CEO passe à un mag papier dont le premier n° sort en avril 1990. Il est complété par une disquette trimestrielle, selon la formule actuelle. La distribution par Internet ne changera rien à la conception matérielle de ces deux derniers supports. 20 ans, c’est déjà pas mal! Longue vie au CEO et à l’Oric! Bonne lecture. André.
|
|
Quelques Photos de la Visu du 30 Janvier 2009!
Les 101 écrans de The Hellion!
Re-découverte de: OSDK!
Vu sur le web: AdressTel!
Les ports joysticks du Telestrat!
|
|
|
|
|
|
sommaire
|
Courrier Oricien |
|
Page 3-6 |
Petites Annonces & Bonnes Adresses |
|
Page 6 |
Nostalgie : Petite Exposition de Matos (2/3) |
|
Page 7 |
Adresses CEO / Sommaire / Editorial |
|
Page 2 |
Aide Rush Hour Supplément n°5 : Levels 1 à 14 |
|
Page 8-9 |
La Librairie Oric : Telestrat à Coeur Ouvert |
|
Page 10-11 |
Divertissements Mathématiques et Logiques |
|
Page 12 |
Le Coin Sudoku Oric : Grilles 1 à 6 de Mars |
|
Page 13 |
Listing Basic : Rocher, Papier, Ciseaux |
|
Page 14 |
Réalisez une Interface Clavier Super-Oric (4/4) |
|
Page 15-17 |
Ma (re)-découverte de la Programmation avec OSDK |
|
Page 18-19 |
AdressTel vu sur le Web |
|
Page 20-21 |
Les 101 Ecrans de "The Hellion" (1) |
|
Page 22-23 |
Méli-Mélo : Quelques Blagues |
|
Page 24 |
Quelques Photos de la Visu du 30 Janvier 2010 |
|
Page 25-26 |
Comment Inhiber les Touches de Déplacement |
|
Page 27 |
Listing Basic : Poids Idéal |
|
Page 28 |
Vu sur eBay : Matos et Gadgets |
|
Page 29 |
Les Ports Joysticks du Telestrat |
|
Page 30 |
Votre Mascotte Dino |
|
Page 4, 6, 8, 9, 21 & 27 |
|
Comment inhiber les touches de déplacement lors d’une saisie
Par Yann L.
Lorsque l’on met en oeuvre la commande INPUT dans un programme Basic, on ne souhaite pas toujours que l’utilisateur soit en mesure de se déplacer à l’écran avec les touches fléchées.
Dans la mesure où les touches de déplacement font parties intégrantes du clavier et de sa gestion, l’instruction INPUT"Your name ";A$ ne peut empêcher l’utilisateur de naviguer à son gré avant de saisir la donnée A$.
Sans compter qu’en cas de demande de saisie d’un nombre, le risque d’erreur est maximal (il y a tellement d’utilisateurs facétieux).
La meilleure parade possible semble encore de faire appel à la commande GET.
Exemple pour la saisie de caractères alphanumériques :
10 PRINT"Please enter your name: ";
20 A$="":FL=FALSE
30 REPEAT
40 GET K$
50 IF (K$>="A" AND K$<="Z") OR (K$>="a" AND K$<="z") THEN A$=A$+K$:GOTO80
55 IF K$=CHR$(32) THEN 90
60 IF K$<>CHR$(127) THEN 80
70 L=LEN(A$):IF L=0 THEN FL=TRUE:GOTO80
75 A$=LEFT$(A$,L-1)
80 IF NOT FL THEN PRINT K$;
90 FL=FALSE
100 UNTIL K$=CHR$(13)
Grâce à ce programme il devient possible de ne saisir que les caractères compris entre la lettre «A» (ou «a») et la lettre «Z» (ou «z»).
L’appui sur la touche DEL permet de traiter une erreur de saisie grâce au flag FL (ligne 70).
Notez que la barre d’espace n’est pas prise en compte dans cet exemple.
Informations issues et adaptées du forum de discussion:
|
|
|
|
|
BROWSE
NUMEROS
[247] - [246] - [245] - [244] - [243] - [242] - [241] - [240] - [239] - [238] - [237]
YEAR
2013 - 2012 - 2011 - 2010 - 2009 - 2008 - 2007 - 2006 - 2005 - 2004 - 2003 - 2002 - 2001 - 2000 - 1999 - 1998 - 1997 - 1996 - 1995 - 1994 - 1993 - 1992 - 1991 - 1990
|