home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
basic
/
tools
/
basicwi
/
ufba034.bas
< prev
next >
Wrap
BASIC Source File
|
1993-07-28
|
491b
|
25 lines
REM Turbo Basic/ Power Basic
REM ufba034.bas - generic example
REM
REM standard includ3e file
$INCLUDE "UFBA03.INC"
REM include file for <testfmt>
$INCLUDE "testfmt.INC"
REM initialize mouse
CALL MOUSEON
REM function identifier
FKZ% = 2
REM cursor position
SM% = 0
REM shadow attribute
RET% = 112
REM format name
FMT$ = "testfmt "
REM format layout
$INCLUDE "testfmt.PRO"
REM call UNIF
CALL UNIF(FKZ%, FMT$, fld0$, RET%, SM%, Daten$)
REM hide mouse
CALL MOUSEOFF
END