

|
 |
você esta em: / MSX Basic

DEFUSR |
DEFUSR (define user) |
Define um endereço para iniciar a execução de uma sub-rotina em linguagem de máquina que será chamada pelo comando USR. |
|
DEFUSR [dígito] = endereço para início de execução |
|
DEFUSR1=&HE00A |
|
Este comando
especifica o endereço inicial para a execução de uma sub-rotina em linguagem de
máquina. A sub-rotina iniciará a execução quando ela for chamada pela
instrução USR. O dígito a ser especificado deve ser um número inteiro entre 0
e 9 e correspondente ao número da rotina USR a ser executada. Se o
valor do dígito for omitido, será assumido o valor 0. O endereço de início da rotina
deve ser um número entre 0 a 65535. O endereço de início de sub-rotina pode se
redefinido posteriormente, ou seja, uma função DEF USR pode assumir valores diferentes
durante a execução de um programa.
|
|
|
|
10 REM PROGRAMA DEFUSR
20 DATA 3E,41,21,00,00,CD,4D,00,23,E5,D
5,11,BF,03,ED,52,D1,E1,38,F1,C9
30 FOR I=0 TO 20
40 READ A$:POKE 60000!+I,VAL("&H"+A$)
50 NEXT I
60 SCREEN0:CLS:PRINT "APERTE <RETURN>
PARA EXECUTAR"
70 INPUT B$
80 DEF USR0=60000!
90 X=USR0 (0)
100 FOR 1 TO 1000:NEXT T:CLS:END
|
|
|
© 2002 by MSXPró 
Esta página é melhor visualizada em
resolução de 1024x768 @ True Color
Utilizando o navegador Firefox
|