{"id":2219,"date":"2020-03-01T12:38:00","date_gmt":"2020-03-01T11:38:00","guid":{"rendered":"https:\/\/ceo.oric.org\/?p=2219"},"modified":"2020-03-01T12:38:00","modified_gmt":"2020-03-01T11:38:00","slug":"bogue-print","status":"publish","type":"post","link":"https:\/\/oric.bqtt.net\/index.php\/2020\/03\/01\/bogue-print\/","title":{"rendered":"Bogue PRINT@"},"content":{"rendered":"\n

par Andr\u00e9 C. <\/em><\/p>\n\n\n\n

Etat de la question<\/strong><\/h4>\n\n\n\n

Le manuel de l’Atmos pr\u00e9sente l’ajout du param\u00e8tre “@X,Y;” \u00e0 la syntaxe de la commande PRINT comme une simple option suppl\u00e9mentaire par rapport au PRINT de l’Oric-1, permettant d’afficher aux coordonn\u00e9es X,Y de l’\u00e9cran. PRINT@X,Y;plist n’est pas pr\u00e9sent\u00e9 comme une nouvelle commande, mais comme une simple extension de syntaxe.<\/p>\n\n\n\n

D’autre part, rappelons que si on place un “;” \u00e0 la fin d’une commande PRINT, les coordonn\u00e9es X,Y de la “case” qui suit le dernier caract\u00e8re affich\u00e9 sont m\u00e9moris\u00e9es pour l’impression suivante. Il est alors possible d’utiliser ces coordonn\u00e9es pour une autre commande d’affichage. Pour le dire plus simplement, apr\u00e8s le “;” final, le curseur reste \u00e0 clignoter au bout du dernier affichage et repr\u00e9sente le prochain point d’affichage. <\/p>\n\n\n\n

Ce que ne dit pas le manuel<\/strong><\/h4>\n\n\n\n

Dans certains cas, il peut y avoir un conflit entre les param\u00e8tres “@X,Y;” et le “;”final. En effet, au niveau du code, lorsqu’un param\u00e8tre “@X,Y;” a d\u00e9j\u00e0 \u00e9t\u00e9 d\u00e9tect\u00e9 au d\u00e9but de l’analyse de syntaxe, un param\u00e8tre “;” en fin de ligne n’est ni rejet\u00e9, ni trait\u00e9 correctement. <\/p>\n\n\n\n

En pratique<\/strong><\/h4>\n\n\n\n

Lorsqu’on utilise une s\u00e9rie de PRINT@X,Y;”CHAINE”, pour chacune des commande PRINT@, la chaine mentionn\u00e9e est bien affich\u00e9e aux coordonn\u00e9es X,Y indiqu\u00e9es, pas de probl\u00e8me. Si la longueur de la cha\u00eene est sup\u00e9rieure \u00e0 la place disponible, l’affichage se poursuit tout naturellement \u00e0 la ligne suivante. <\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n

Si pour une raison quelconque on est amen\u00e9 \u00e0 m\u00e9langer des commandes PRINT@ avec d’autres commandes d’affichage,  on risque de rencontrer des probl\u00e8mes. Voyons ce qu’il en est avec un exemple. <\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n

Soit le petit programme ci-dessus.<\/p>\n\n\n\n

La cha\u00eene figurant \u00e0 la ligne Basic 10 comporte 30\ncaract\u00e8res. Le premier caract\u00e8re, un “2”, sera affich\u00e9 dans la\n“case” de coordonn\u00e9es X=2, Y=10. Le dernier caract\u00e8re, un\n“1”, sera affich\u00e9 dans la “case” X=31, Y=10. A cause du\n“;” final, le curseur restera \u00e0 clignoter sur la case suivante. (Le\nd\u00e9roul\u00e9 du programme est trop rapide pour voir ce curseur clignotant, sauf si\non place une commande GET R$ en fin de ligne).<\/p>\n\n\n\n

La ligne Basic 15 affiche “OK” au curseur, c’est \u00e0\ndire au point X=32, Y=10. Ici encore, le curseur restera en attente sur la case\nsuivante  \u00e0 cause du “;” final.<\/p>\n\n\n\n

La ligne Basic 20 devrait commencer l’affichage de la cha\u00eene\n“SALUT LES GARS!” (15 caract\u00e8res) de la “case” de\ncoordonn\u00e9es X=16, Y=10 et la terminer \u00e0 la “case”  X=30, Y=10. Au lieu de \u00e7a, seul “SALUT\n” est affich\u00e9 correctement, le reste de la cha\u00eene, soit “LES\nGARS!”, est rejet\u00e9 au d\u00e9but de la m\u00eame ligne n\u00b010 de l’\u00e9cran et, curieusement,\npas \u00e0 la ligne suivante.<\/p>\n\n\n\n

Vous me direz que le “;” n’a logiquement rien \u00e0 faire \u00e0 la fin du PRINT”OK” et que cela rel\u00e8ve d’une faute de conception du programme Basic. Peut-\u00eatre. Mais la commande PRINT proprement dite est mal cod\u00e9e : Lors de l’analyse de syntaxe, la rencontre d’un param\u00e8tre “@X,Y;” devrait entra\u00eener la neutralisation des coordonn\u00e9es X,Y en cours et leur remplacement par celles indiqu\u00e9es par “@X,Y;”.<\/p>\n\n\n\n

Si on retire le “;” apr\u00e8s le PRINT”OK” l’affichage rentre dans l’ordre et redevient ce qu’il doit \u00eatre. <\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n

Ceci montre bien qu’il ne faut pas utiliser de “;” \u00e0 la fin d’une commande PRINT@, sauf raison particuli\u00e8re et en toute connaissance des risques.<\/p>\n\n\n\n

Il n’est pas toujours simple de comprendre ce qui se passe. Ainsi, si on garde le “;” apr\u00e8s le PRINT”OK”, mais que l’on supprime le “;” de la ligne Basic 10, alors la cha\u00eene “SALUT LES GARS!” s’affiche correctement. Le truc, c’est qu’entre temps les param\u00e8tres X,Y ont \u00e9t\u00e9 r\u00e9g\u00e9n\u00e9r\u00e9s lors du retour \u00e0 la ligne pour afficher “OK”. M\u00eame si le curseur reste \u00e0 clignoter apr\u00e8s le “K” de OK, le PRINT@ qui suit op\u00e8re sans probl\u00e8me. <\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n

Autre petite curiosit\u00e9, lorsqu’on d\u00e9place progressivement l’affichage de la cha\u00eene “SALUT LES GARS!” vers la droite en augmentant la valeur de X \u00e0 la ligne Basic 20, on observe une rupture pour X=34. Pour X=33, le reliquat “LES GARS!” est rejet\u00e9 au d\u00e9but de la m\u00eame ligne de l’\u00e9cran, alors que pour X=34, il est affich\u00e9 au d\u00e9but de la ligne suivante, comme il se doit !<\/p>\n\n\n\n

Il n’existe pas de commande LPRINT@, donc pas de probl\u00e8me de ce c\u00f4t\u00e9-l\u00e0. <\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n
\"\"<\/figure>\n\n\n\n

Oups !<\/strong><\/h4>\n\n\n\n

J’ai fait en dernier ce que j’aurais d\u00fb faire en premier : V\u00e9rifier si la bogue “PRINT@;” \u00e9tait d\u00e9j\u00e0 connue. Et oui : Vous pouvez consulter le CEO-mag n\u00b010, page 9 de mars 1991, qui en donne une autre d\u00e9monstration (article de Roger B.). <\/p>\n\n\n\n

Conclusion<\/strong><\/h4>\n\n\n\n

Comme vous l’avez vu, la situation peut devenir complexe quand la syntaxe d’une commande est mal g\u00e9r\u00e9e. Il est difficile de pr\u00e9voir \u00e0 l’avance le r\u00e9sultat final. Ceci vaut \u00e9videmment pour toutes les commandes Basic de l’Oric r\u00e9put\u00e9es pour leurs bogues. A la liste IF THEN ELSE, RND(), POS(), CLOAD, POINT(x,y), ‘ (apostrophe pour REM), EDIT, DRAW, il faut donc ajouter PRINT@; <\/p>\n\n\n\n

Salut et Oricit\u00e9 !<\/p>\n","protected":false},"excerpt":{"rendered":"

par Andr\u00e9 C. Etat de la question Le manuel de l’Atmos pr\u00e9sente l’ajout du param\u00e8tre “@X,Y;” \u00e0 la syntaxe de la commande PRINT comme une simple option suppl\u00e9mentaire par rapport au PRINT de l’Oric-1, permettant d’afficher aux coordonn\u00e9es X,Y de l’\u00e9cran. PRINT@X,Y;plist n’est pas pr\u00e9sent\u00e9 comme une nouvelle commande, mais comme une simple extension de […]<\/p>\n","protected":false},"author":1,"featured_media":2224,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[338,347,348,22],"tags":[668],"class_list":["post-2219","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-338","category-atmos","category-basic","category-ceomag","tag-ceomag359"],"_links":{"self":[{"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/posts\/2219","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/comments?post=2219"}],"version-history":[{"count":0,"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/posts\/2219\/revisions"}],"wp:attachment":[{"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/media?parent=2219"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/categories?post=2219"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/oric.bqtt.net\/index.php\/wp-json\/wp\/v2\/tags?post=2219"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}