Want more features on Pastebin? Sign Up, it's FREE!
Guest

Untitled

By: a guest on Oct 15th, 2012  |  syntax: None  |  size: 5.11 KB  |  views: 32  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. # Thin Basic 1.6
  2. # Drew Vosburg
  3. # drew@vosburgs.org
  4. # drewvosburg.blogspot.com
  5. # January 23 2011
  6. #
  7. #Clear Default Status Bar
  8. %wd
  9. #Draw Status Bar Background
  10. %V(0,0,-,18,-)
  11. %x(S,statusbar.bmp,0,0)
  12. #
  13. %Fl(2,12-Adobe-Helvetica.fnt,30)
  14. # ***** PRELOAD IMAGES *****
  15. %xl(i,playback.bmp,2,2,7)
  16. %xl(s,shuffle.bmp,17,2)
  17. %xl(v,volume.bmp,0,0,4)
  18. %xl(r,repeat.bmp,0,0,4)
  19. %xl(b,battery.bmp,0,0,3)
  20. %xl(B,batteryfill.bmp,0,0,11)
  21. %xl(h,values.bmp,0,0,2)
  22. %xl(p,percent.bmp,0,0)
  23. %xl(N,numbers.bmp,0,0,11)
  24. %xl(V,numericvolume.bmp,0,0)
  25. %xl(T,warning.bmp,0,0)
  26. %xl(c,colon.bmp,0,0)
  27. %xl(a,ampm.bmp,0,0,2)
  28. %xl(L,lock.bmp,0,0)
  29. %xl(E,spacer.bmp,0,0)
  30. #
  31. # ***** CONDITIONALS *****
  32. #Playback Mode Icons
  33. %?mp<%xd(ia)|%xd(ib)|%xd(ic)|%xd(id)|%xd(ie)|%xd(if)|%xd(ic)|%xd(ig)|%xd(ig)>
  34. #Arrange Shuffle and Repeat Icons
  35. %?ps<%xd(s)%?mm<|%Vd(P)>|%?mm<|%Vd(p)>>
  36. #Volume
  37. %?St(volume display)<%Vd(V)|%Vd(v)>
  38. #Clock Conditional
  39. %?cc<%?cf<%Vd(w)|%Vd(W)>%Vd(c)|%Vd(E)>
  40. #Check for Graphic or Numeric Battery percentage
  41. %?St(battery display)<%?bc<|%Vd(B)>|%?bc<|%?if(%bl,<,100)<%Vd(b)|%Vd(F)>>>
  42. #Bottom Info Conditional
  43. %?cs<%Vd(m)|>
  44. #
  45. # ***** VIEWPORTS *****
  46. #
  47. #Only Repeat
  48. %Vl(p,17,2,30,13,-)
  49. %al%?mm<|%xd(ra)|%xd(rb)|%xd(rc)|%xd(rd)>
  50. #Repeat and Shuffle
  51. %Vl(P,37,2,30,13,-)
  52. %al%?mm<|%xd(ra)|%xd(rb)|%xd(rc)|%xd(rd)>
  53. #***** 24 HOUR CLOCK *****
  54. #Clock
  55. #HOURS - Tens place
  56. %Vl(w,72,4,6,8,-)
  57. %?if(%ck,<,10)<%xd(Na)|%?if(%ck,<,20)<%xd(Nb)|%xd(Nc)>>
  58. #HOURS - Ones place
  59. %Vl(w,78,4,6,8,-)
  60. %?ck<%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Na)>
  61. #***** 12 HOUR CLOCK *****
  62. #HOURS - Tens place
  63. %Vl(W,72,4,6,8,-)
  64. %?if(%cl,<,10)<%xd(Nk)|%xd(Nb)>
  65. #HOURS - Ones place
  66. %Vl(W,78,4,6,8,-)
  67. %?cl<%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)>
  68. #***** MINUTES *****
  69. #COLON
  70. %Vl(c,84,3,3,10,-)
  71. %xd(c);
  72. #MINUTES - Tens place
  73. %Vl(c,87,4,6,8,-)
  74. %xd(N, %ss(0, 1, %cM))
  75. #MINUTES - Ones place
  76. %Vl(c,93,4,6,8,-)
  77. %xd(N, %ss(1, 1, %cM))
  78. #AM/PM
  79. %Vl(c,101,6,13,8,-)
  80. %?cf<%xd(E)|%?cp<%xd(ab)|%xd(aa)>>
  81. #Volume Warning Color
  82. %V(-17,1,15,14,-)
  83. %?if(%pv,>,0)<%xd(T)>
  84. #Hold Icon
  85. %V(-58,2,10,12,-)
  86. %?mh<%xd(L)|%xd(E)>
  87. #Battery Icon
  88. %V(-46,2,27,12,-)
  89. %?bc<%xd(ba)%Vd(H)|%?if(%bl,>,10)<%xd(ba)|%?if(%bl,>,5)<%xd(bb)|%t(0.5)%xd(bb);%t(0.5)%xd(bc);>>>
  90. #Charging
  91. %Vl(H,-45,4,23,8,-)
  92. %?if(%bl,=,100)<%?St(battery display)<%xd(Bk)|%xd(hb)>|%xd(ha)>
  93. #"100%"
  94. %Vl(F,-45,4,23,8,-)
  95. %xd(hb)
  96. #Battery Graphic Fill
  97. %Vl(B,-45,4,23,8,-)
  98. %?bl<|%xd(E)|%xd(Ba)|%xd(Bb)|%xd(Bb)|%xd(Bc)|%xd(Bc)|%xd(Bd)|%xd(Bd)|%xd(Be)|%xd(Bf)|%xd(Bf)|%xd(Bg)|%xd(Bg)|%xd(Bh)|%xd(Bh)|%xd(Bi)|%xd(Bi)|%xd(Bj)|%xd(Bj)|%xd(Bk)>
  99. # ***** NUMERIC BATTERY *****
  100. #Spacer
  101. %Vl(b,-45,4,1,8,-)
  102. %xd(E)
  103. #Percent sign "%"
  104. %Vl(b,-32,4,10,8,-)
  105. %xd(p)
  106. #Tens
  107. %Vl(b,-44,4,6,8,-)
  108. %?bc<|%?if(%bl,>=,90)<%xd(Nj)|%?if(%bl,>=,80)<%xd(Ni)|%?if(%bl,>=,70)<%xd(Nh)|%?if(%bl,>=,60)<%xd(Ng)|%?if(%bl,>=,50)<%xd(Nf)|%?if(%bl,>=,40)<%xd(Ne)|%?if(%bl,>=,30)<%xd(Nd)|%?if(%bl,>=,20)<%xd(Nc)|%?if(%bl,>=,10)<%xd(Nb)|%xd(Nk)>>>>>>>>>>
  109. #Ones
  110. %Vl(b,-38,4,6,8,-)
  111. %?bc<|%?bl<|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|%xd(Na)|%xd(Nb)|%xd(Nc)|%xd(Nd)|%xd(Ne)|%xd(Nf)|%xd(Ng)|%xd(Nh)|%xd(Ni)|%xd(Nj)|>>
  112. #
  113. # ***** NUMERIC VOLUME *****
  114. #Negative Sign Cover
  115. %Vl(v,-17,7,3,1,-)
  116. %?if(%pv,>=,0)<%xd(Nk)>
  117. #Volume Hole Spacers
  118. %Vl(v,-17,1,15,14,-)
  119. %xd(V)
  120. #Tens
  121. %Vl(v,-14,4,6,8,-)
  122. %xd(N, %ss(1, 1, %pv))
  123. # ***** ONES *****
  124. # This conditional is necessary to work around the theme
  125. # hanging on load.  I don't know why it hung, but when the
  126. # conditionals were all on one big line, it was trouble...
  127. %Vl(v,-8,4,6,8,2)
  128. %xd(N, %ss(2, 1, %pv))
  129. #Graphic Volume
  130. %Vl(V,-17,1,15,14,-)
  131. %?pv<%xd(vd)|%xd(vd)|%xd(vc)|%xd(vc)|%xd(vb)|%xd(vb)|%xd(vb)|%xd(vb)|%xd(va)|%xd(va)%xd(va)|%xd(va)>
  132. #Spacer
  133. %Vl(E,72,3,42,11,-)
  134. %xd(E)
  135. #Menu Viewport
  136. %Vi(-,0,18,-,92,1)
  137. #Divider
  138. %Vl(m,0,-22,-,2,-)
  139. %pb(0,0,-,2,-)
  140. #Bottom Info
  141. %Vl(m,0,-20,-,20,1)
  142. %?mp<%?cc<%ac%?cf<%ck:%cM|%cl:%cM%cp>|Rockbox>|%s%ac%?ia<%ia|%?d(2)<%d(2)|%Sx(Unknown) %Sx(Artist)>> - %?it<%it|%fn>|%s%ac%?ia<%ia|%?d(2)<%d(2)|%Sx(Unknown) %Sx(Artist)>> - %?it<%it|%fn>|%s%ac%?ia<%ia|%?d(2)<%d(2)|%Sx(Unknown) %Sx(Artist)>> - %?it<%it|%fn>|%s%ac%?ia<%ia|%?d(2)<%d(2)|%Sx(Unknown) %Sx(Artist)>> - %?it<%it|%fn>|%s%acRecording|%s%acRecording Paused|%s%ac%?Tn<%Tf - %Tn|%tf FM>%?tx< - %ty - %tz|>|%s%ac%?Tn<%Tf - %Tn|%tf FM>%?tx< - %ty - %tz|>>
clone this paste RAW Paste Data