diff --git a/gui/m291/src/m291.tal b/gui/m291/src/m291.tal index b36b343..5142939 100644 --- a/gui/m291/src/m291.tal +++ b/gui/m291/src/m291.tal @@ -466,16 +466,28 @@ ! @ ( -- ) + ( | clear ) + #0020 .Screen/y DEO2 + + ( | draw ) #0080 .Screen/x DEO2 #0020 .Screen/y DEO2 ;id3/title #01 ! @ ( -- ) + ( | clear ) + #0030 .Screen/y DEO2 + + ( | draw ) #0080 .Screen/x DEO2 #0030 .Screen/y DEO2 ;id3/artist #01 ! @ ( -- ) + ( | clear ) + #0040 .Screen/y DEO2 + + ( | draw ) #0080 .Screen/x DEO2 #0040 .Screen/y DEO2 ;id3/album #01 ! @@ -577,6 +589,15 @@ @ ( value -- ) #0a DIVk MUL SUB [ LIT "0 ] ADD ! +@ ( -- ) + #0000 .Screen/x DEO2 + ;fill-icn .Screen/addr DEO2 + [ LIT2 f2 -Screen/auto ] DEO + [ LIT2 00 -Screen/sprite ] DEOk DEOk #0080 .Screen/x DEO2 + .Screen/y DEI2 #0008 SUB2 .Screen/y DEO2 + DEOk DEO + JMP2r + @ ( addr* -- ) #0000 .Screen/x DEO2 .Screen/addr DEO2