20 lines
172 B
Plaintext
20 lines
172 B
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
// Testing Browse()
|
|
|
|
function Main()
|
|
LOCAL cColor
|
|
|
|
cColor := SETCOLOR("W+/B")
|
|
CLS
|
|
|
|
USE test
|
|
Browse()
|
|
|
|
SETCOLOR(cColor)
|
|
CLS
|
|
|
|
return nil
|