mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-07 19:51:51 +09:00
generating paint diff from old draw cmd buf
This commit is contained in:
@@ -2,11 +2,12 @@
|
||||
20 s=cput(1,"POLL")
|
||||
30 if s><0 then goto 900
|
||||
40 l=cget(1,0)
|
||||
41 print("length: "+l+", pixels: "+l/3)
|
||||
50 for i=0 to l step 3
|
||||
41 REM print("length: "+l+", pixels: "+l/3)
|
||||
50 for i=0 to l-1 step 3
|
||||
60 m=peek(i)*160+peek(i+1)
|
||||
62 p=peek(i+2)
|
||||
63 poke(-1048576-m,p)
|
||||
70 next
|
||||
899 end
|
||||
80 REM poke(-1070977,0)
|
||||
90 goto 20
|
||||
900 print("Polling failed: "+s)
|
||||
|
||||
Reference in New Issue
Block a user