update varvara file device, update to version 0.4
This commit is contained in:
parent
6864b143f2
commit
31756bc2c9
3 changed files with 27 additions and 25 deletions
|
@ -17,7 +17,7 @@
|
||||||
#include "realm.h"
|
#include "realm.h"
|
||||||
#include "user.h"
|
#include "user.h"
|
||||||
|
|
||||||
char version[] = "0.3";
|
char version[] = "0.4";
|
||||||
|
|
||||||
int chatty9p = 0;
|
int chatty9p = 0;
|
||||||
|
|
||||||
|
|
|
@ -29,8 +29,9 @@
|
||||||
|60 @Audio3 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ]
|
|60 @Audio3 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ]
|
||||||
|80 @Controller [ &vector $2 &button $1 &key $1 ]
|
|80 @Controller [ &vector $2 &button $1 &key $1 ]
|
||||||
|90 @Mouse [ &vector $2 &x $2 &y $2 &state $1 &wheel $1 ]
|
|90 @Mouse [ &vector $2 &x $2 &y $2 &state $1 &wheel $1 ]
|
||||||
|a0 @File [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
|a0 @File0 [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
||||||
|b0 @DateTime [ &year $2 &month $1 &day $1 &hour $1 &minute $1 &second $1 &dotw $1 &doty $2 &isdst $1 ]
|
|b0 @File1 [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
||||||
|
|c0 @DateTime [ &year $2 &month $1 &day $1 &hour $1 &minute $1 &second $1 &dotw $1 &doty $2 &isdst $1 ]
|
||||||
|
|
||||||
( variables )
|
( variables )
|
||||||
|
|
||||||
|
@ -79,10 +80,10 @@
|
||||||
#ff .btn-state STZ
|
#ff .btn-state STZ
|
||||||
GET-USABLE-HEIGHT .list-height STZ
|
GET-USABLE-HEIGHT .list-height STZ
|
||||||
|
|
||||||
;carts-file .File/name DEO2
|
;carts-file .File0/name DEO2
|
||||||
#2000 .File/length DEO2
|
#2000 .File0/length DEO2
|
||||||
;list-buf .File/read DEO2
|
;list-buf .File0/read DEO2
|
||||||
.File/success DEI2 .list-len STZ2
|
.File0/success DEI2 .list-len STZ2
|
||||||
|
|
||||||
CENTER-X .logo-coords/x STZ2
|
CENTER-X .logo-coords/x STZ2
|
||||||
CENTER-Y .logo-coords/y STZ2
|
CENTER-Y .logo-coords/y STZ2
|
||||||
|
@ -851,7 +852,7 @@ RTN
|
||||||
it's not expecting.
|
it's not expecting.
|
||||||
)
|
)
|
||||||
|
|
||||||
.File/name DEO2
|
.File0/name DEO2
|
||||||
|
|
||||||
( clear wst )
|
( clear wst )
|
||||||
#ab
|
#ab
|
||||||
|
@ -916,9 +917,9 @@ RTN
|
||||||
OVR2 #f6fe ( arguments for STZ2 at fd and JMP (repeat) )
|
OVR2 #f6fe ( arguments for STZ2 at fd and JMP (repeat) )
|
||||||
OVR2 #f401 ( arguments for STZ2 at fd, plus an extra 01 )
|
OVR2 #f401 ( arguments for STZ2 at fd, plus an extra 01 )
|
||||||
STHkr ( first argument for ADD2 )
|
STHkr ( first argument for ADD2 )
|
||||||
.File/success ( argument for DEI2 )
|
.File0/success ( argument for DEI2 )
|
||||||
#0100 .File/read ( arguments for DEO2 )
|
#0100 .File0/read ( arguments for DEO2 )
|
||||||
#ff00 .File/length DEO2
|
#ff00 .File0/length DEO2
|
||||||
#00f0 JMP2
|
#00f0 JMP2
|
||||||
|
|
||||||
&zero-page-loader
|
&zero-page-loader
|
||||||
|
|
|
@ -29,8 +29,9 @@
|
||||||
|60 @Audio3 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ]
|
|60 @Audio3 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ]
|
||||||
|80 @Controller [ &vector $2 &button $1 &key $1 ]
|
|80 @Controller [ &vector $2 &button $1 &key $1 ]
|
||||||
|90 @Mouse [ &vector $2 &x $2 &y $2 &state $1 &wheel $1 ]
|
|90 @Mouse [ &vector $2 &x $2 &y $2 &state $1 &wheel $1 ]
|
||||||
|a0 @File [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
|a0 @File0 [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
||||||
|b0 @DateTime [ &year $2 &month $1 &day $1 &hour $1 &minute $1 &second $1 &dotw $1 &doty $2 &isdst $1 ]
|
|b0 @File1 [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
||||||
|
|c0 @DateTime [ &year $2 &month $1 &day $1 &hour $1 &minute $1 &second $1 &dotw $1 &doty $2 &isdst $1 ]
|
||||||
|
|
||||||
( variables )
|
( variables )
|
||||||
|
|
||||||
|
@ -79,10 +80,10 @@
|
||||||
#ff .btn-state STZ
|
#ff .btn-state STZ
|
||||||
GET-USABLE-HEIGHT .list-height STZ
|
GET-USABLE-HEIGHT .list-height STZ
|
||||||
|
|
||||||
;carts-file .File/name DEO2
|
;carts-file .File0/name DEO2
|
||||||
#2000 .File/length DEO2
|
#2000 .File0/length DEO2
|
||||||
;list-buf .File/read DEO2
|
;list-buf .File0/read DEO2
|
||||||
.File/success DEI2 .list-len STZ2
|
.File0/success DEI2 .list-len STZ2
|
||||||
|
|
||||||
CENTER-X .logo-coords/x STZ2
|
CENTER-X .logo-coords/x STZ2
|
||||||
CENTER-Y .logo-coords/y STZ2
|
CENTER-Y .logo-coords/y STZ2
|
||||||
|
@ -824,10 +825,10 @@ RTN
|
||||||
.state LDZ INC .state STZ
|
.state LDZ INC .state STZ
|
||||||
|
|
||||||
( send it! )
|
( send it! )
|
||||||
#0020 .File/length DEO2
|
#0020 .File0/length DEO2
|
||||||
#01 .File/append DEO2
|
#01 .File0/append DEO2
|
||||||
;ctl-file .File/name DEO2
|
;ctl-file .File0/name DEO2
|
||||||
;load-cmd .File/write DEO2
|
;load-cmd .File0/write DEO2
|
||||||
|
|
||||||
;slot-file ;load-rom JSR2
|
;slot-file ;load-rom JSR2
|
||||||
RTN
|
RTN
|
||||||
|
@ -844,7 +845,7 @@ RTN
|
||||||
it's not expecting.
|
it's not expecting.
|
||||||
)
|
)
|
||||||
|
|
||||||
.File/name DEO2
|
.File0/name DEO2
|
||||||
|
|
||||||
( clear wst )
|
( clear wst )
|
||||||
#ab
|
#ab
|
||||||
|
@ -909,9 +910,9 @@ RTN
|
||||||
OVR2 #f6fe ( arguments for STZ2 at fd and JMP (repeat) )
|
OVR2 #f6fe ( arguments for STZ2 at fd and JMP (repeat) )
|
||||||
OVR2 #f401 ( arguments for STZ2 at fd, plus an extra 01 )
|
OVR2 #f401 ( arguments for STZ2 at fd, plus an extra 01 )
|
||||||
STHkr ( first argument for ADD2 )
|
STHkr ( first argument for ADD2 )
|
||||||
.File/success ( argument for DEI2 )
|
.File0/success ( argument for DEI2 )
|
||||||
#0100 .File/read ( arguments for DEO2 )
|
#0100 .File0/read ( arguments for DEO2 )
|
||||||
#ff00 .File/length DEO2
|
#ff00 .File0/length DEO2
|
||||||
#00f0 JMP2
|
#00f0 JMP2
|
||||||
|
|
||||||
&zero-page-loader
|
&zero-page-loader
|
||||||
|
|
Loading…
Reference in a new issue