home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cbm / geos / programming / source / unlock.lnx / unLockTables (.txt) < prev   
Encoding:
GEOS ConVerT  |  1999-06-16  |  2.3 KB  |  73 lines
  1. UNlOCKtABLES
  2. prg FORMATTED geos FILE v1.0
  3. wRITE iMAGE v2.0
  4. rED sTORM
  5. GEOwRITE    v1.1
  6.   tHIS FILE WAS CREATED WITH
  7. wRONG IS wRITE.
  8.   wRITTEN BY jOE bUCKLEY.
  9. @UNlOCKtABLES
  10. SECBOX:.BYTEdef_db_pos {$7c} 1
  11. .BYTEdbtxtstr,16,16
  12. .WORDFIRSTXT1
  13. .BYTEdbtxtstr,16,32
  14. .WORDFIRSTXT2
  15. .BYTEdbtxtstr,16,48
  16. .WORDapp_var
  17. .BYTEyes,16,6
  18. .BYTEdisk,16,28
  19. .BYTEcancel,16,74
  20. .BYTEdbusricon,16,50;DRIVE
  21. .WORDDRIVETABLE
  22. .BYTE0
  23. RAMBOX:.BYTEdef_db_pos {$7c} 1
  24. .BYTEdbtxtstr,16,16
  25. .WORDFIRSTXT1
  26. .BYTEdbtxtstr,16,32
  27. .WORDFIRSTXT2
  28. .BYTEdbtxtstr,16,48
  29. .WORDapp_var
  30. .BYTEcancel,16,74
  31. .BYTEdbusricon,16,50;DRIVE
  32. .WORDDRIVETABLE
  33. .BYTE0
  34. FIRSTBOX:.BYTEdef_db_pos {$7c} 1
  35. .BYTEdbtxtstr,16,16
  36. .WORDFIRSTXT1
  37. .BYTEdbtxtstr,16,32
  38. .WORDFIRSTXT2
  39. .BYTEdbtxtstr,16,48
  40. .WORDapp_var
  41. .BYTEyes,16,6
  42. .BYTEdisk,16,28
  43. .BYTEcancel,16,74
  44. .BYTE0
  45. CHGDISKBOX:.BYTEdef_db_pos {$7c} 1
  46. .BYTEdbtxtstr,16,16
  47. .WORDCHGTEXT
  48. .BYTEok,16,72
  49. .BYTE0
  50. ENDBOX:.BYTEdef_db_pos {$7c} 1
  51. .BYTEdbtxtstr,60,16
  52. .WORDENDTEXT1
  53. .BYTEno,17,72
  54. .BYTEyes,1,72
  55. .BYTE0
  56. ;______________________________________
  57. FIRSTXT1:.BYTEboldon,"uNLOCK THE FILES",0
  58. FIRSTXT2:.BYTE"ON THIS DISK?",plaintext,0
  59. CHGTEXT:.BYTEboldon,"iNSERT NEW DISK INTO DRIVE.",plaintext,0
  60. ENDTEXT1:.BYTEboldon,"aNOTHER DISK?",plaintext,0
  61. @__________________________________
  62. DRIVETABLE:.WORDDRIVEICON
  63. .BYTE0,0
  64. .BYTEICON_D_WIDTH
  65. .BYTE
  66. ICON_D_HEIGHT
  67. .WORDDRIVEROUTINE
  68. @__________________________________
  69. DRIVEICON:
  70. ICON_D_WIDTH==PICw
  71. ICON_D_HEIGHT==PICh
  72. @tables  date   pAGE--page   .
  73.