memory cards (in progress) (#868)

* c++ memory card stuff

* saving kinda works

* load working

* more progress

* clean up
This commit is contained in:
water111
2021-10-01 23:12:34 -04:00
committed by GitHub
parent 254a29851e
commit 845802ca45
56 changed files with 3069 additions and 692 deletions
@@ -2989,7 +2989,7 @@
(sp-tex spt-texture (new 'static 'texture-id :index #x1a :page #x2))
(sp-flt spt-num 2.0)
(sp-rnd-flt spt-scale-x (meters 1.3) (meters 0.2) 1.0)
(sp-int spt-rot-x 0)
(sp-rnd-flt spt-rot-x 0.0 12743.111 1.0)
(sp-flt spt-rot-y (degrees 0.0))
(sp-copy-from-other spt-scale-y -4)
(sp-flt spt-r 128.0)
@@ -3015,7 +3015,7 @@
(sp-tex spt-texture (new 'static 'texture-id :index #x1a :page #x2))
(sp-flt spt-num 2.0)
(sp-rnd-flt spt-scale-x (meters 1.3) (meters 0.2) 1.0)
(sp-int spt-rot-x 1184657863)
(sp-rnd-flt spt-rot-x 20024.889 12743.111 1.0)
(sp-flt spt-rot-y (degrees 0.0))
(sp-copy-from-other spt-scale-y -4)
(sp-flt spt-r 128.0)
+1 -1
View File
@@ -98,7 +98,7 @@
:flag-assert #x1000000068
(:methods
(new (symbol type int) _type_ 0)
(want-file (_type_ string int handle float) int 9)
(set-pending-file (_type_ string int handle float) int 9)
(update (_type_) int 10)
(inactive? (_type_) symbol 11)
(file-status (_type_ string int) symbol 12)
+4 -4
View File
@@ -205,7 +205,7 @@
;; definition for method 9 of type external-art-buffer
(defmethod
want-file
set-pending-file
external-art-buffer
((obj external-art-buffer)
(arg0 string)
@@ -675,7 +675,7 @@
(dotimes (s2-1 2)
(when (not (-> obj buffer s2-1 frame-lock))
(set! (-> obj buffer s2-1 frame-lock) #t)
(want-file
(set-pending-file
(-> obj buffer s2-1)
(-> s3-1 name)
(-> s3-1 parts)
@@ -699,7 +699,7 @@
(not (string= (-> s4-2 pending-load-file) "reserved"))
(not (string= (-> s4-2 other pending-load-file) "reserved"))
)
(want-file
(set-pending-file
(-> s4-2 other)
(the-as string #f)
-1
@@ -838,7 +838,7 @@
0
)
((= (-> obj reserve-buffer heap) arg0)
(want-file
(set-pending-file
(-> obj reserve-buffer)
(the-as string #f)
-1