XSCREENとSPDEFとDISPLAY実�
This commit is contained in:
@@ -1,3 +1,8 @@
|
||||
ASSERT__ SUBST$("0123456789",0,"B")=="B","SUBST$"
|
||||
ASSERT__ SUBST$("0123456789",0,4,"B")=="B456789","SUBST$"
|
||||
ASSERT__ SUBST$("",0,4,"B")=="B","SUBST$"
|
||||
WHILE 1
|
||||
WEND
|
||||
FOR I=0TO 511'-500
|
||||
SPSET I,I'304'-I+304
|
||||
SPOFS I, (I*16) MOD 400, FLOOR((I*16)/400)*16
|
||||
|
||||
Reference in New Issue
Block a user