home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cbm / geos / graphics / editors / iconDir2.cvt (.txt) < prev    next >
Encoding:
GEOS ConVerT  |  1998-02-08  |  20.8 KB  |  331 lines
  1. icondir2
  2. prg FORMATTED geos FILE v1.0
  3. sTUDENTfORTHv1.0
  4. hANK wILKINSON
  5. hANK wILKINSON. cOMPILES FORTH PROGRAMS FROM GEOWRITE FILES.
  6. {$60}screenfile0
  7. execut
  8. branc
  9. 0branc
  10. (loop
  11. HHHHl
  12. (+loop
  13. JZ8
  14. (find
  15. VqX)?
  16. enclos
  17. ?termina
  18. dminu
  19. toggl
  20. constan
  21. variabl
  22. +origi
  23. warnin
  24. voc-lin
  25. offse
  26. contex
  27. curren
  28. travers
  29. lates
  30. ?erro
  31. ?pair
  32. ?loadin
  33. compil
  34. smudg
  35. decima
  36. (;code
  37. <build
  38. -trailin
  39. expec
  40. blank
  41. (number
  42. numbe
  43. (abort
  44. creat
  45. [compile
  46. litera
  47. dlitera
  48. ?stac
  49. interpre
  50. immediat
  51. vocabular
  52. definition
  53. sTUDENT fORTH  1.0
  54. updat
  55. empty-buffer
  56. buffe
  57. (line
  58. messag
  59. msg # 
  60. forge
  61. repea
  62. space
  63. scr # 
  64. setpatter
  65. j8 3
  66. ?pixe
  67. charwidt
  68. string
  69. string
  70. getfil
  71. initforprin
  72. printbuffe
  73. stopprin
  74. printasci
  75. setnl
  76. startprin
  77. startasci
  78. getdimension
  79. donewithi
  80. initfori
  81. readbyt
  82. nextrecor
  83. tracksecto
  84. diskbloc
  85. pointerinde
  86. diskbyt
  87. diskerro
  88. getbloc
  89. findfil
  90. saveptr
  91. restoreptr
  92. creat
  93. eMPTY 
  94. show_nam
  95. show_name
  96. qN*
  97. getdirhea
  98. show_entrie
  99. show_off_pag
  100. getpdrive
  101. DISK ERROR MESSAGE 
  102. screenbas
  103. allot                            
  104. allot                            
  105. sendscreenbit
  106. ltria
  107. positio
  108. cardro
  109. movero
  110. 4line
  111. 2acros
  112. scrnhd
  113. scr # 
  114. scr # 
  115. cur_dir_hea
  116. minute
  117. off_disk_nam
  118. #sTUDENT fORTH screenfile FROM DISK 
  119. , ON 
  120.  @ %0
  121. crtoggl
  122. s0j**
  123. withi
  124. betwee
  125. inv_recor
  126. bfr_overflo
  127. car_re
  128. newcardse
  129. esc_rule
  130. esc_graphic
  131. page_brea
  132. diskblkbu
  133. fileheade
  134. curdirhea
  135. filetrscta
  136. direntrybu
  137. bytecounte
  138. charcounte
  139. pagecounte
  140. versionheade
  141. maxpage
  142. startpag
  143. endpag
  144. textbu
  145. %saveforth
  146. getnam
  147. TYPE FILE NAME AND RETURN
  148. openvli
  149. closevli
  150. previousrecor
  151. nextrecor
  152. pointrecor
  153. readrecor
  154. getpag
  155. OPEN ERROR # 
  156. RECORD POINTING ERROR # 
  157. filtertex
  158. filterpag
  159. testfilte
  160. pagecompil
  161. pagecompil
  162. textloa
  163. NA6D7{$7c}
  164. setdevic
  165. opendis
  166. drivestor
  167. setdis
  168. doerro
  169. cLOSE door!\8\8
  170. dISK eRROR nUMBER 
  171. eNCOUTERED
  172. wRITE IT DOWN, WE'RE ABORTING\8\8i8
  173. ?diskerro
  174. curdrivetype
  175. curdrivetype
  176. curdrivetype
  177. prntfilenam
  178. curdriv
  179. currentdriv
  180. loaddrivermessag
  181. iNSERT DISK WITH PRINTER DRIVE 
  182. +  CLOSE DOOR AND HIT ANY KEY BUT PERIOD (.)
  183. (pERIOD WILL RETURN TO DESKtOP)
  184. findpdrive
  185. loadpdrive
  186. gETfILE ERROR # 
  187. hIT ANY KEY TO ABORT{$7c}
  188. dskimag
  189. drvimag
  190. opnimag
  191. cnclimag
  192. loadimag
  193. oPEN ERRORr
  194. pOINT ERRORr
  195. EMPTY ERRORr
  196. rEAD ERRORr
  197. EMPTY RECORDy4
  198. curdirblkbufaddres
  199. curdirblkbu
  200. headerarrayaddres
  201. headerarra
  202. getfhdrinf
  203. readentrybloc
  204. (bitmapup
  205. drawico
  206. cbmico
  207. titleico
  208. drawtitleico
  209. drawcb
  210. colum
  211. xcolum
  212. 2#emi
  213. putsiz
  214. puttime&dat
  215. shownam
  216. putfilenam
  217. putpermnam
  218. putpar/autho
  219. putparap
  220. puttrack/sector
  221. putstructur
  222. vlir 
  223. puttyp
  224. nOT_geos
  225. basic
  226. assem
  227. system
  228. desk_acc
  229. application
  230. app_data
  231. printer
  232. input_dev
  233. disk_dev
  234. sys_boot
  235. auto_exec
  236. entry
  237. drawicon
  238. putsize
  239. puttime&date
  240. putfilename
  241. putpermname
  242. putpar/author
  243. putparapp
  244. puttrack/sectors
  245. putstructure
  246. puttype
  247. #ofblock
  248. #ofdiskblock
  249. #offile
  250. #ofpage
  251. rowsprinte
  252. offpag
  253. countbloc
  254. namebuffe
  255. allot                      
  256. drivebuffe
  257. opentextbuffe
  258. allot  
  259. canceltextbuffe
  260. allot       
  261. #ofdrive
  262. disknam
  263. drivetyp
  264. countdrive
  265. q9iNS
  266. nextdriv
  267. (print
  268. (pRINT)
  269. setopentex
  270. (todesktop
  271. (TO DESKtOP)
  272. setcanceltex
  273. setnamebuffe
  274. set3drivebuffe
  275. set2drivebuffe
  276. setdrivebuffe
  277. countentrie
  278. drawtitl
  279. icondir sm
  280. oN DISK: =m)i
  281.  FILES USING 
  282. @)aDm*
  283. @)aDm*
  284. pAGE 5h
  285.  OF h
  286. poffse
  287. sendro
  288. sendblankro
  289. printtitl
  290. showdirectorybloc
  291. njl{$7d}m
  292. #>mo*
  293. n#>mo
  294. dbtxtst
  295. dbvarst
  296. dbgetstrin
  297. dbsysop
  298. dbgetfile
  299. dbgrphst
  300. dbopve
  301. dbusrico
  302. db_usr_ou
  303. sys_db_icon_widt
  304. sys_db_icon_heigh
  305. def_db_po
  306. sysdbdat
  307. rstrfrmdialo
  308. (dodlgbox
  309. dskiconservic
  310. drviconservic
  311. opniconservic
  312. cncliconservic
  313. dskico
  314. drvico
  315. opnico
  316. cnclico
  317. dirdlgbo
  318. doactio
  319. i8jl*
  320. sTUDENT fORTH smm
  321. iCON dIRECTORY lISTER
  322.  FOR geos USERS
  323. icondir*
  324. COPYRIGHT 1990 hANK wILKINSON
  325. *fOR iNFO aBOUT sTUDENT fORTH sEND sase TO:
  326. aNTICIPATORY dESIGN sCIENCE
  327. fREEMAN bUILDING, sUITE 303
  328. 612 pASTEUR dRIVE
  329.  gREENSBORO, nORTH cAROLINA 27403
  330. =rmq(q
  331.