Załączony program tworzy nową komendę VARDUMP, która umożliwia wylistowanie nazw wszystkich zmiennych występujących w tworzonym przez nas programie. Lista taka znakomicie ułatwia wyszukiwanie „przekłamanych" zmiennych.10 'Listowanie zmiennych 20 'Komenda wywolujaca zmienne: 30 REM "!VARDUMP" i dowolny klawisz 40 MEMORY &9FFF:adress=&A000 50 FOR i=1 TO 19 60 sum=0:READ code$,check$ 70 FOR j=1 TO 21 STEP 2 80 byte=VAL("&"+MID$(code$,j,2)) 90 POKE adress,byte 100 sum=sum+byte:adress=adress+1 110 NEXT j 120 IF sum<>VAL("&"+check$) THEN PR INT "Blad w danych w linii ";150+i* 10 130 NEXT i 140 CALL &A000 150 DELETE 10- 160 DATA 214ba0cb4ec0cbce0146a0,565 170 DATA 2142a0cdd1bccd00b9f53a,612 180 DATA 02c0a72812216aae224da0,3eb 190 DATA 2168ae2252a0216cae2292,43a 200 DATA a0f1cd0cb9cdc5a04f4b0d,5fc 210 DATA 0a00c956415244554dd000,372 220 DATA 000000003aa0c34ca0002a,2b3 230 DATA 87aee5ed5b85aea7ed52e1,75c 240 DATA ca8fa0eb2323cd9ba03e0d,57d 250 DATA cd5abb3e0acd5abbcd06bb,59a 260 DATA 09e5ed52e138e91818cd9b,5c7 270 DATA a0e5cdc5a028290d0a00e1,500 280 DATA cd06bb235e235623232319,30a 290 DATA e5ed5b89aea7ed52e138dd,740 300 DATA c97ef620e67fcd5abbcb7e,6ed 310 DATA 2328f37efe0120083e2501,347 320 DATA 0500c35abbfe0220083e24,367 330 DATA 010600c35abb010800c9e1,392 340 DATA 7ecd5abb23b720f8e90000,53b Bajtek★ AMSTRAD CPC ★ A voir aussi sur CPCrulez , les sujets suivants pourront vous intéresser... |
CPCrulez[Content Management System] v8.7-desktop/c Page créée en 295 millisecondes et consultée 1237 foisL'Amstrad CPC est une machine 8 bits à base d'un Z80 à 4MHz. Le premier de la gamme fut le CPC 464 en 1984, équipé d'un lecteur de cassettes intégré il se plaçait en concurrent du Commodore C64 beaucoup plus compliqué à utiliser et plus cher. Ce fut un réel succès et sorti cette même années le CPC 664 équipé d'un lecteur de disquettes trois pouces intégré. Sa vie fut de courte durée puisqu'en 1985 il fut remplacé par le CPC 6128 qui était plus compact, plus soigné et surtout qui avait 128Ko de RAM au lieu de 64Ko. |
|
|