home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 42 / af042b.adf / Extensions.lha / _pointe.s < prev    next >
Text File  |  1992-02-21  |  10KB  |  336 lines
  1.  
  2. *-----------------------------------------------------------------
  3. *     **  *    * **** ****    ***    **  **** ***  ***
  4. *     *  * **  ** *  * *       *  *  *  * *     *  *
  5. *     **** * ** * *  * ****    ****  **** ****  *  *
  6. *     *  * *    * *  *    *    *   * *  *    *  *  *  
  7. *     *  * *    * **** ****    ****  *  * **** ***  ***
  8. *-----------------------------------------------------------------
  9. *    AMOS.ENV pointers
  10. *-----------------------------------------------------------------
  11. *    By Francois Lionet
  12. *    
  13. *    AMOS (c) 1990 Mandarin / Jawx
  14. *-----------------------------------------------------------------
  15. *    This file is public domain!
  16. *-----------------------------------------------------------------
  17.  
  18. Mixed:        equ %0100000000000000
  19. Fixed:        equ %0010000000000000
  20. Keys:        equ %0001000000000000
  21. FkTDef        equ 6
  22.  
  23. *************** Message pointers
  24. AEdMem:        rs.w 2            *EdMem-ZZ,$0001
  25. AEdOm:        rs.w 2            *EdOm-ZZ,$0001
  26. AEdTop:        rs.w 2            *EdTop-ZZ,$0001
  27. AEdBot:        rs.w 2            *EdBot-ZZ,$0001
  28. AEdLLong:    rs.w 2            *EdLLong-ZZ,$0001
  29. AEdTest:    rs.w 2            *EdTest-ZZ,$0001
  30. AEdNoE:        rs.w 2            *EdNoE-ZZ,$0001
  31. AEdInd:        rs.w 2            *EdInd-ZZ,$0001
  32. ANoFold        rs.w 2            *NoFold-ZZ,$0001
  33. ANMark        rs.w 2            *NMark-ZZ,$0001
  34. AWBloc        rs.w 2            *WBloc-ZZ,$0001
  35. ANFound        rs.w 2            *NFound-ZZ,$0001
  36. ASching        rs.w 2            *Sching-ZZ,$0001
  37. AMPAmos        rs.w 2            *MPAmos-ZZ,$0001
  38. AMPlace        rs.w 2            *MPlace-ZZ,$0001
  39. AAvNoProg    rs.w 2            *AvNoProg-ZZ,$0001
  40. AMesNotD:    rs.w 2            *MesNotD-ZZ,$0001
  41. ACloClo:    rs.w 2            *CloClo-ZZ,$0001
  42. AEdDemo:    rs.w 2            *EdDemo-ZZ,$0001
  43.  
  44. AVIlD:        rs.w 2            *VIlD-ZZ,$0002
  45. AVSynt:        rs.w 2            *VSynt-ZZ,$0002
  46. AVLong:        rs.w 2            *VLong-ZZ,$0002
  47. AVType:        rs.w 2            *VType-ZZ,$0002
  48. AVOut:        rs.w 2            *VOut-ZZ,$0002
  49. AVVNm:        rs.w 2            *VVNm-ZZ,$0002
  50. AVNmO:        rs.w 2            *VNmO-ZZ,$0002
  51. AVNDim:        rs.w 2            *VNDim-ZZ,$0002
  52. AVLbl2:        rs.w 2            *VLbl2-ZZ,$0002
  53. AVUnd:        rs.w 2            *VUnd-ZZ,$0002
  54. AVAlD:        rs.w 2            *VAlD-ZZ,$0002
  55. AVFoN:        rs.w 2            *VFoN-ZZ,$0002
  56. AVNFo:        rs.w 2            *VNFo-ZZ,$0002
  57. AVRUn:        rs.w 2            *VRun-ZZ,$0002
  58. AVUnR:        rs.w 2            *VUnR-ZZ,$0002
  59. AVWWn:        rs.w 2            *VWWn-ZZ,$0002
  60. AVWnW:        rs.w 2            *VWnW-ZZ,$0002
  61. AVDoL:        rs.w 2            *VDoL-ZZ,$0002
  62. AVLDo:        rs.w 2            *VLDo-ZZ,$0002
  63. AVCrs:        rs.w 2            *VCrs-ZZ,$0002
  64. AVNoL:        rs.w 2            *VNoL-ZZ,$0002
  65. AVEIf:        rs.w 2            *VEIf-ZZ,$0002
  66. AVElE:        rs.w 2            *VElE-ZZ,$0002
  67. AVElI:        rs.w 2            *VElI-ZZ,$0002
  68. AVIfE:        rs.w 2            *VIfE-ZZ,$0002
  69. AVNoT:        rs.w 2            *VNoT-ZZ,$0002
  70. AVPDeb:        rs.w 2            *VPDeb-ZZ,$0002
  71. AVPOp:        rs.w 2            *VPOp-ZZ,$0002
  72. AVPNo:        rs.w 2            *VPNo-ZZ,$0002
  73. AVIlP:        rs.w 2            *VIlP-ZZ,$0002
  74. AVPRTy:        rs.w 2            *VPRTy-ZZ,$0002
  75. AVUndP:        rs.w 2            *VUndP-ZZ,$0002
  76. AVShP:        rs.w 2            *VShP-ZZ,$0002
  77. AVAlG:        rs.w 2            *VAlG-ZZ,$0002
  78. AVPaG:        rs.w 2            *VPaG-ZZ,$0002
  79. AVShal:        rs.w 2            *VShal-ZZ,$0002
  80. AVNoPa:        rs.w 2            *VNoPa-ZZ,$0002
  81. AVPaGo:        rs.w 2            *VPaGo-ZZ,$0002
  82. AVVTo:        rs.w 2            *VVTo-ZZ,$0002
  83. AVDal:        rs.w 2            *VDal-ZZ,$0002
  84. AVNoB:        rs.w 2            *VNoB-ZZ,$0002
  85. AVExN:        rs.w 2            *VExN-ZZ,$0002
  86. AVNFn:        rs.w 2            *VNFn-ZZ,$0002
  87. AExtNot:    rs.w 2            *ExtNot-ZZ,$0000
  88.  
  89. AMErreur:    rs.w 2            *MErreur-ZZ,$8003
  90. ARedo:        rs.w 2            *Redo-ZZ,$0003+Mixed
  91.  
  92. AExtNames:    rs.w 2            *ExtNames-ZZ,$8004
  93.  
  94. ASelDrv:    rs.w 2            *SelDrv-ZZ,$8005+Empty
  95. ANmPrt:        rs.w 2            *NmPrt-ZZ,$0005
  96. ANmSer:        rs.w 2            *NmSer-ZZ,$0005
  97.  
  98. AMesLd1:    rs.w 2            *MesLd1-ZZ,$0006+Empty
  99. AMesLd2:    rs.w 2            *MesLd2-ZZ,$0006+Empty
  100. AMesLd3:    rs.w 2            *MesLd3-ZZ,$0006+Empty
  101. AMesMe1:    rs.w 2            *MesMe1-ZZ,$0006+Empty
  102. AMesMe2:    rs.w 2            *MesMe2-ZZ,$0006+Empty
  103. AMesLdA1:    rs.w 2            *MesLdA1-ZZ,$0006+Empty
  104. AMesLdA2:    rs.w 2            *MesLdA2-ZZ,$0006+Empty
  105. AMesLdA3:    rs.w 2            *MesLdA3-ZZ,$0006+Empty
  106. AAvMe:        rs.w 2            *AvMe-ZZ,$0006+Empty
  107. AAvLd:        rs.w 2            *AvLd-ZZ,$0006+Empty
  108. AAvPrt:        rs.w 2            *AvPrt-ZZ,$0006+Empty
  109. AMesSv1:    rs.w 2            *MesSv1-ZZ,$0006+Empty
  110. AMesSv2:    rs.w 2            *MesSv2-ZZ,$0006+Empty
  111. AMesSBl1:    rs.w 2            *MesSBl1-ZZ,$0006+Empty
  112. AMesSBl2:    rs.w 2            *MesSBl2-ZZ,$0006+Empty
  113. AMesSvA1:    rs.w 2            *MesSvA1-ZZ,$0006+Empty
  114. AMesSvA2:    rs.w 2            *MesSvA2-ZZ,$0006+Empty
  115. AMesSvA3:    rs.w 2            *MesSvA3-ZZ,$0006+Empty
  116. AAvSv:        rs.w 2            *AvSv-ZZ,$0006+Empty
  117. AAvSvA:        rs.w 2            *AvSvA-ZZ,$0006+Empty
  118. AMesAc1:    rs.w 2            *MesAc1-ZZ,$0006+Empty
  119. AMesAc2:    rs.w 2            *MesAc2-ZZ,$0006+Empty
  120. AMesAc3:    rs.w 2            *MesAc3-ZZ,$0006+Empty
  121. AMesAn1:    rs.w 2            *MesAn1-ZZ,$0006+Empty
  122. AMesAn2:    rs.w 2            *MesAn2-ZZ,$0006+Empty
  123. AMesAn3:    rs.w 2            *MesAn3-ZZ,$0006+Empty
  124. AMesEd1:    rs.w 2            *MesEd1-ZZ,$0006+Empty
  125. AMesEd2:    rs.w 2            *MesEd2-ZZ,$0006+Empty
  126. AMesEd3:    rs.w 2            *MesEd3-ZZ,$0006+Empty
  127. AMesRn1:    rs.w 2            *MesRn1-ZZ,$0006+Empty
  128. AMesRn2:    rs.w 2            *MesRn2-ZZ,$0006+Empty
  129. AMesRn3:    rs.w 2            *MesRn3-ZZ,$0006+Empty
  130. AAvAccL:    rs.w 2            *AvAccL-ZZ,$0006+Empty
  131.  
  132. AEdPName:    rs.w 2            *EdPName-ZZ,$0001
  133. AEdLName:    rs.w 2
  134. ASMark:        rs.w 2            *SMark-ZZ,$0001
  135. AEdTSize:    rs.w 2            *EdTSize-ZZ,$0001
  136. AEdTTab:    rs.w 2            *EdTTab-ZZ,$0001
  137. ASchinp:    rs.w 2            *Schinp-ZZ,$0001
  138. ARepinp:    rs.w 2            *Repinp-ZZ,$0001
  139.  
  140. AFsTxt:        rs.w 2            *FsTxt-ZZ,$8006+Mixed+Fixed
  141. AFaTxt:        rs.w 2            *FaTxt-ZZ,$8006+Mixed+Fixed
  142. AFsWait:    rs.w 2            *FsWait-ZZ,$0006
  143. AFsDTit:    rs.w 2            *FsDTit-ZZ,$0006
  144. AFsDirSet:    rs.w 2            *FsDirSet-ZZ,$0006
  145.  
  146. *************** Editor messages
  147. AConfYes:    rs.w 2            *ConfYes-ZZ,$0001
  148. AConfNo:    rs.w 2            *ConfNo-ZZ,$0001
  149. AConfConf:    rs.w 2            *ConfConf-ZZ,$0001
  150. AConfSave:    rs.w 2            *ConfSave-ZZ,$0001
  151. AConfText:    rs.w 2            *ConfText-ZZ,$0001
  152. ADispText:    rs.w 2            *DispText-ZZ,$0001
  153.  
  154. AConfYN:    rs.w 2            *ConfYN-ZZ,$0001+Mixed
  155. AConfYi:    rs.w 2            *ConfYi-ZZ,$0001+Mixed
  156. AConfNi:    rs.w 2            *ConfNi-ZZ,$0001+Mixed
  157.  
  158. *************** Function key
  159. AFkDef1:    rs.w 2            *FkDef1-ZZ,$0000
  160. AFkDef2:    rs.w 2            *FkDef2-ZZ,$0000
  161. AFkDef3:    rs.w 2            *FkDef3-ZZ,$0000
  162. AFkDef4:    rs.w 2            *FkDef4-ZZ,$0000
  163. AFkDef5:    rs.w 2            *FkDef5-ZZ,$0000
  164. AFkIt0:        rs.w 2            *FkIt0-ZZ,$0007+Fixed
  165. AFkIt1:        rs.w 2            *FkIt1-ZZ,$0007+Fixed
  166. AFkLt0:        rs.w 2            *FkLt0-ZZ,$0007+Fixed
  167. AFkLt1:        rs.w 2            *FkLt1-ZZ,$0007+Fixed
  168.  
  169. *************** Cursor flash
  170. AEdFlCu:    rs.w 2            *EdFlCu-ZZ,$0000
  171. AFolFl:        rs.w 2            *FolFl-ZZ,$0000
  172.  
  173. *************** Error screen 
  174. AErrLine:    rs.w 2            *ErrLine-ZZ,$000a
  175. AErrFin:    rs.w 2            *ErrFin-ZZ,$000a+Mixed
  176. AFolI2:        rs.w 2            *FolI2-ZZ,$000a+Mixed
  177.  
  178. *************** Directory
  179. ADirFilt:    rs.w 2            *DirFilt-ZZ,$0010
  180. AChDir0:    rs.w 2            *ChDir0-ZZ,$000b+Mixed
  181. AChDir1:    rs.w 2            *ChDir1-ZZ,$000b+Mixed
  182. AChDir6:    rs.w 2            *CHDir6-ZZ,$000b+Mixed
  183. AChDir3:    rs.w 2            *ChDir3-ZZ,$000b
  184.  
  185. *************** Info line
  186. AMrgMes        rs.w 2            *MrgMes-ZZ,$0001+Mixed+Fixed
  187. * Caps
  188. AEtCps0:    rs.w 2            *EtCps0-ZZ,$0001+Mixed+Fixed
  189. AEtCps1:    rs.w 2            *EtCps1-ZZ,$0001+Mixed+Fixed
  190. * Insert / OverW
  191. AEtIns0:    rs.w 2            *EtIns0-ZZ,$0001+Mixed+Fixed
  192. AEtIns1:    rs.w 2            *EtIns1-ZZ,$0001+Mixed+Fixed
  193. * Line #
  194. AEtY:        rs.w 2            *EtY-ZZ,$0001+Mixed+Fixed
  195. AEtY1:        rs.w 2            *EtY1-ZZ,$0001+Mixed+Fixed
  196. * Col#
  197. AEtX:        rs.w 2            *EtX-ZZ,$0001+Mixed+Fixed
  198. AEtX1:        rs.w 2            *EtX1-ZZ,$0001+Mixed+Fixed
  199. * Free
  200. AEtFr0:        rs.w 2            *EtFr0-ZZ,$0001+Mixed+Fixed
  201. AEtFr1:        rs.w 2            *EtFr1-ZZ,$0001+Mixed+Fixed
  202. * Chip
  203. AEtCh0:        rs.w 2            *EtCh0-ZZ,$0001+Mixed+Fixed
  204. AEtCh1:        rs.w 2            *EtCh1-ZZ,$0001+Mixed+Fixed
  205. * Fast
  206. AEtFs0:        rs.w 2            *EtFs0-ZZ,$0001+Mixed+Fixed
  207. AEtFs1:        rs.w 2            *EtFs1-ZZ,$0001+Mixed+Fixed
  208. * Editing
  209. AEtNm1:        rs.w 2            *EtNm1-ZZ,$0001+Mixed+Fixed
  210. AEtNm2:        rs.w 2            *EtNm2-ZZ,$0001+Mixed+Fixed
  211.  
  212. *************** Editor functions
  213. AKFonc:        rs.w 2            *KFonc-ZZ,$000F+Keys
  214.  
  215. *************** HELP escape
  216. AEscH1:        rs.w 2            *EscH1-ZZ,$000c+Mixed
  217. AEscH2:        rs.w 2            *EscH2-ZZ,$800c+Fixed
  218.     
  219. *************** Esc screen function keys
  220. AAmiDef:    rs.w 2            *AmiDef-ZZ,$800d+Empty
  221.  
  222. *************** Auto loaded acc
  223. AAutoLd        rs.w 2            *AutoLd-ZZ,$8011+Empty
  224.  
  225. *************** Help.Acc
  226. ANameHelp    rs.w 2            *NameHelp-ZZ,$0013+Empty
  227. AHelpLoad    rs.w 2            *HelpLoad-ZZ,$0013+Empty
  228. AHNoF        rs.w 2
  229.  
  230. *************** Basic header
  231. AEntete:    rs.w 2            *Entete-ZZ,0
  232. *************** FK window
  233. AFkFond:    rs.w 2            *FkFond-ZZ,0 
  234. *************** Edit window
  235. AEdClw:        rs.w 2            *EdClw-ZZ,0 
  236. ASlDInit:    rs.w 2            *SlDInit-ZZ,0 
  237. ASlBInit:    rs.w 2            *SlBInit-ZZ,0 
  238. AEdDBloc    rs.w 2            *EdDBloc-ZZ,0 
  239. AEdFBloc    rs.w 2            *EdFBloc-ZZ,0 
  240. *************** Basic title
  241. ATitle1:    rs.w 2            *Title1-ZZ,$000e+Mixed+Fixed+Empty
  242. ATitle2:    rs.w 2            *Title2-ZZ,0 
  243. *************** Suffix
  244. ASufBas:    rs.w 2            *SufBas-ZZ,0 
  245. ASufBak:    rs.w 2            *SufBak-ZZ,0 
  246. ASufAcc:    rs.w 2            *SufAcc-ZZ,0 
  247. AAutoEx:    rs.w 2            *AutoEx-ZZ,0 
  248. *************** Default icon
  249. ADefIcon    rs.w 2            *DefIcon-ZZ,$0012 
  250. *************** AMOS Logo
  251. ANMouse:    rs.w 2            *NMouse-ZZ,$0012 
  252. ANFonte:    rs.w 2            *NFonte-ZZ,$0012
  253. *************** Default Keyboard
  254. AKyNom:        rs.w 2            *KyNom-ZZ,$00012 
  255. *************** Diverse
  256. ACRet:        rs.w 2            *CRet-ZZ,0 
  257. AChCuOn:    rs.w 2            *ChCuOn-ZZ,0 
  258. AChCuOff:    rs.w 2            *ChCuOff-ZZ,0 
  259. AChDir1a:    rs.w 2            *ChDir1A-ZZ,0 
  260. AChDir2:    rs.w 2            *ChDir2-ZZ,0 
  261. AChDir4:     rs.w 2            *ChDir4-ZZ,0 
  262. AChDir5:    rs.w 2            *ChDir5-ZZ,0 
  263. AEtInp:        rs.w 2            *EtInp-ZZ,0 
  264. AEtClw:        rs.w 2            *EtClw-ZZ,0 
  265. AEtCuOf        rs.w 2            *EtCuOf-ZZ,0 
  266. AEtAl:        rs.w 2            *EtAl-ZZ,0 
  267. ADefEFl:    rs.w 2            *DefEFl-ZZ,0 
  268. AErrIOn:    rs.w 2            *ErrIOn-ZZ,0 
  269. AErrIOff:    rs.w 2            *ErrIOff-ZZ,0 
  270. AErrIci:    rs.w 2            *ErrIci-ZZ,0 
  271. AErrFl:        rs.w 2            *ErrFl-ZZ,0 
  272. AFolI1:        rs.w 2            *FolI1-ZZ,0 
  273. AFolI3:        rs.w 2            *FolI3-ZZ,0 
  274. AFolI4:        rs.w 2            *FolI4-ZZ,0 
  275. AFolI5:        rs.w 2            *FolI5-ZZ,0 
  276. AEscI:        rs.w 2            *EscI-ZZ,0 
  277. AEscOk:        rs.w 2            *EscOk-ZZ,0 
  278. AEscI0:        rs.w 2            *EscI0-ZZ,0 
  279. AEdELi:        rs.w 2            *EdELi-ZZ,0 
  280. AEscH4:        rs.w 2            *EscH4-ZZ,0 
  281. AEscH5:        rs.w 2            *EscH5-ZZ,0 
  282.         rs.w 2            *EndPar-ParaTrap
  283.  
  284.  
  285. ***********************************************************
  286. *        AMOS PARAMETRES 
  287. ParaTrap:    rs.l 1
  288. AdMouse:    rs.l 1
  289.         rs.l 1
  290.         rs.l 1
  291.         rs.l 1
  292.  
  293. VNmMax:        rs.l 1
  294. TVDirect:    rs.w 1
  295. DefSize:    rs.l 1
  296. Icons:        rs.w 1
  297. EdPosY:        rs.w 1
  298. FkPosY:        rs.w 1
  299. FsDWy:        rs.w 1
  300. EdTyM0:        rs.w 1
  301. EdTyM1:        rs.w 1
  302. EdTyM2:        rs.w 1
  303. DirSize:    rs.w 1
  304. DirMax:        rs.w 1
  305. EdSvBak:    rs.w 1
  306. PrtRet:        rs.w 1
  307. FsDVApp:    rs.w 1
  308. EdVScrol:    rs.w 1
  309.         rs.w 1
  310. EdPal:        rs.w 4
  311. FkPal:        rs.w 4
  312. FsPal:        rs.w 4
  313. EscPal:        rs.w 4
  314. ErrPal:        rs.w 4
  315. FolPal        rs.w 4
  316. EdColB:        rs.w 1
  317. AutoWB:        rs.w 1
  318. InterFonc:    rs.w 1
  319. InterEdit:    rs.w 1
  320. FsDWx:        rs.w 1
  321. EcYErr:        rs.w 1
  322. EsWY:        rs.w 1
  323. EsWTy:        rs.w 1
  324. EsVY:        rs.w 1
  325. DefETx:        rs.w 1
  326. DefETy:        rs.w 1
  327. DefECo:        rs.w 1
  328. DefECoN:    rs.w 1
  329. DefEMo:        rs.w 1
  330. DefEBa:        rs.w 1
  331. DefEPa:        rs.w 8
  332.         rs.w 8
  333.         rs.w 8
  334.         rs.w 8
  335. EndPar:
  336.