home *** CD-ROM | disk | FTP | other *** search
/ Wacky Windows Stuff... / WACKY.iso / toolbook / dialer.tbk (.txt) < prev    next >
Asymetrix ToolBook File  |  1990-06-13  |  30KB  |  544 lines

  1. System
  2. ComPort
  3. autodialfromclipboard
  4. ToolBook Dialer
  5. defBounds
  6. defBounds
  7. 150,209,490,270
  8. '488,427
  9. 150,209,490,270
  10. Courier
  11. late(
  12. "Dialer.tbk cannot work without TBK-COMM.DLL."\
  13. && " Please 
  14. asure 
  15. the path."
  16. reader
  17. author
  18. enterbook
  19. author
  20. sizeToPage
  21. reader
  22. sizeToPage
  23. enterbook
  24. tbk-comm.dll
  25. OpenComPort
  26. SetComPort
  27. CloseComPort
  28. IsComTxReady
  29. IsComRxReady
  30. WriteComPort
  31. ReadComPort
  32. FlushComTxBuffer
  33. FlushComRxBuffer
  34. SetComPortTxXlate
  35. Dialer.tbk cannot work without TBK-COMM.DLL.
  36.  Please make sure TBK-COMM.DLL is in the path.
  37. ComSpeed
  38. DialPrefix
  39. ComBaud
  40. 4s_authorFlag
  41. s_AuthorFlag 
  42. "Any 
  43. the scripts 
  44. 8may cause"\
  45. && "problems 
  46. fother books that 
  47. dial.
  48. Click OK 
  49. you still want 
  50.  level."\
  51. f"OK" 
  52. "Cancel"
  53. "OK" 
  54. 4InHelp
  55. odefBounds 
  56. MainWindow 
  57. default
  58. "phone 
  59. linkToCOMDLL
  60. suspend 
  61. X"tbk-comm.dll"
  62. OpenComPort(
  63. SetComPort(
  64. CloseComPort(
  65. IsComTxReady(
  66. IsComRxReady(
  67. WriteComPort(
  68. ReadComPort(
  69. FlushComTxBuffer(
  70. FlushComRxBuffer(
  71. SetComPortTxXlate(
  72. showDialerWindow
  73. .tbk cannot work without TBK-COMM.DLL."\
  74. && " Please 
  75. asure 
  76. path."
  77. showMyWindow
  78. c"no server"
  79. "dialer.
  80. 4inHelp
  81. exitHelp
  82. IsNumber s
  83. s + 0
  84. fixPhoneNumber s
  85. look 
  86. beginning 
  87. "01234567890(#*"
  88. hasParenth 
  89. -- now scan 
  90. obvious 
  91. 's no longer a
  92. -- valid 
  93. "01234567890 -"
  94. cns <> 
  95. "01234567890#*")
  96. IsPhoneNumber s
  97. "01234567890(),- ")
  98. trim s
  99. cs <> 
  100. s ) <= 32
  101. cs <> 
  102. s ) <= 32
  103. tryDial phNum
  104. 8=" & 
  105. 8&& "
  106. =" & 
  107. "No DLL"
  108. xisPhoneNumber(
  109. && "Only digits 0..9 
  110. T- ( ) ,
  111. are allowed."
  112. "invalid 
  113. DialPrefix 
  114. -- count 
  115. "01234567890#*"
  116. n > 6
  117. portNo 
  118. xisNumber(
  119. "I don't know what 
  120. use."\
  121.  Setup 
  122. 4attempting 
  123. error"
  124. kComBaud 
  125. mspeed 
  126. talk 
  127. H    modem."\
  128. ,128,128) < 0
  129. "COM 
  130. xavailable. It 
  131. used 
  132. Hanother"\
  133. setup 
  134. incorrect. Check 
  135. ,8,1,0,0)
  136. ,"ATZ" & CR)
  137. readComPort(
  138. c"OK")
  139. "Modem does 
  140. xrespond. Unable 
  141. closeComPort(
  142. dialstring 
  143. "ATDT" & 
  144.  & CR
  145. extraWait 
  146. ) * 10)
  147. (4 + extrawait) 
  148. "Pick up 
  149. Fpress 
  150. pace bar 
  151. click OK."
  152. , "+++~~~ATH0" & CR)
  153. yield()
  154. ReadCompPort(
  155. znothing
  156. doHelp
  157. 4985,5000
  158. disable 
  159. 4985,515
  160. "DDE Info"
  161. enable 
  162. rWindow
  163. author
  164. showMyWindow
  165. enterbook
  166. leaveBook
  167. reader
  168. showDialerWindow
  169. doHelp
  170. exitHelp
  171. ixPhoneNumber
  172. linkToCOMDLL
  173. IsPhoneNumber
  174. IsNumber
  175. tryDial
  176. fixPhoneNumber
  177. yield
  178. author
  179. s_AuthorFlag
  180. Any changes to the scripts or objects in this book may cause
  181. problems with the book or with other books that may be using it
  182. to dial.  Click OK if you still want to go to Author level.
  183. Cancel
  184. s_AuthorFlag
  185. s_AuthorFlag
  186. sizeToPage
  187. s_authorFlag
  188. reader
  189. sizeToPage
  190. enterbook
  191. defBounds
  192. sizeToPage
  193. defBounds
  194. phone number
  195. default
  196. InHelp
  197. linkToCOMDLL
  198. tbk-comm.dll
  199. OpenComPort
  200. SetComPort
  201. CloseComPort
  202. IsComTxReady
  203. IsComRxReady
  204. WriteComPort
  205. ReadComPort
  206. FlushComTxBuffer
  207. FlushComRxBuffer
  208. SetComPortTxXlate
  209. showDialerWindow
  210. Dialer.tbk cannot work without TBK-COMM.DLL.
  211.  Please make sure TBK-COMM.DLL is in the path.
  212. suspend
  213. showDialerWindow
  214. MshowMyWindow
  215. send showMyWindow
  216. Dialer.tbk
  217. no server
  218. dialer.tbk
  219. suspend
  220. showMyWindow
  221. sizeToPage
  222. cpexitHelp
  223. defBounds
  224. sizeToPage
  225. defBounds
  226. inHelp
  227. leaveBook
  228. cpexitHelp
  229. IsNumber
  230. fixPhoneNumber
  231. 01234567890(#*
  232. 01234567890 -
  233. 01234567890#*
  234. hasParenth
  235. IsPhoneNumber
  236. 01234567890(),- 
  237. tryDial
  238. phNum
  239. IsComRxReady
  240. linkToCOMDLL
  241. No DLL
  242. Phone Number
  243. fixPhoneNumber
  244. isPhoneNumber
  245. showDialerWindow
  246. is not a valid phone number.
  247. Only digits 0..9 and the characters - ( ) ,  or space are allowed.
  248. invalid phone number
  249. DialPrefix
  250. 01234567890#*
  251. DialPrefix
  252. ComPort
  253. isNumber
  254. showDialerWindow
  255. I don't know what port to use.
  256. Please use Setup before attempting to dial.
  257. Setup error
  258. ComBaud
  259. isNumber
  260. showDialerWindow
  261. I don't know what speed to use to talk to the modem.
  262. Please use Setup before attempting to dial.
  263. Setup error
  264. OpenComPort
  265. showDialerWindow
  266. COM port is not available. It is used by another
  267. application or setup is incorrect. Check Setup.
  268. Setup error
  269. ComBaud
  270. SetComPort
  271. WriteComPort
  272. readComPort
  273. showDialerWindow
  274. Modem does not respond. Unable to dial. Check Setup.
  275. closeComPort
  276. Setup error
  277. WriteComPort
  278. extrawait
  279. Pick up the phone, then press the space bar or click OK.
  280. +++~~~ATH0
  281. WriteComPort
  282. yield
  283. ReadCompPort
  284. CloseComPort
  285. Dial OK
  286. extraWait
  287. dialstring
  288. default
  289. portNo
  290. phNum
  291. yield
  292. doHelp
  293. defBounds
  294. sizeToPage
  295. ox%disable
  296. default
  297. InHelp
  298. exitHelp
  299. DDE Info
  300. defBounds
  301. sizeToPage
  302. defBounds
  303. enable
  304. Phone Number
  305. default
  306. InHelp
  307. p7f7f7s
  308. activateInstance
  309. autodialFromClipboard 
  310. "dummy" 
  311. fixPhoneNumber(trim(
  312. isPhoneNumber(
  313. "phone 
  314. activateInstance
  315. activateInstance
  316. autodialFromClipboard
  317. dummy
  318. dummy
  319. paste
  320. dummy
  321. fixPhoneNumber
  322. isPhoneNumber
  323. phone number
  324. buttonDown
  325. Phone Number
  326. .<1~6
  327. dummy
  328. 678-4567
  329. field-1
  330. reset --**
  331. proportions 
  332. moved
  333. + 15, 
  334. + 15,\
  335. + 15, 
  336. + 15, 
  337. + 15,\
  338. reset
  339. reset
  340. phone number
  341. dial (
  342. keydown
  343. keydown
  344. alignment
  345. centered
  346. 746-0086
  347. reset --**
  348. proportions 
  349. moved
  350. + 15, 
  351. + 15,\
  352. + 15, 
  353. + 15,\
  354. + 15, 
  355. setCaption what
  356. reset
  357. setCaption
  358. buttonUp
  359. buttonDown
  360. reset
  361. buttonUp
  362. setCaption
  363. buttonDown
  364. Dial  
  365. This field contains the number to dial.  You can type in a number, or the number can be grabbed from the clipboard automatically when the AutoDial option in Setup is checked.
  366. button-Port
  367. reset --**
  368. proportions 
  369. moved
  370. + 15, 
  371. + 15,\
  372. + 15, 
  373. + 15,\
  374. + 15, 
  375. setCaption what
  376. X"tbkwin.dll"
  377. popMenu(WORD,STRING,INT,
  378. "Setup cannot work without TBKWIN.DLL."\
  379. && " Please 
  380. asure 
  381. the path."
  382. mList 
  383. "{Port,COM1,COM2,COM3,COM4,}," & \
  384. "{Baud Rate,300,600,1200,2400,4800,9600,}," &\
  385. "Prefix...,,AutoDial..."
  386. ComPort 
  387. "*" & 
  388. ComBaud 
  389. L <> 0
  390. "*" & 
  391. autoDialFromClipboard 
  392. "*" & 
  393. oldPort 
  394. oldBaud 
  395. oldPref 
  396. DialPrefix 
  397. oldAuto 
  398. , sysMagnification,\
  399. =& "," & 
  400. zthat 
  401. cmore than 6 digits (
  402. instance, 9 
  403. outside 
  404. U):" \
  405. r<> Cancel
  406. zfound on 
  407. clipboard automatically"\
  408. dialer 
  409. f"Yes" 
  410. reset
  411. setCaption
  412. buttonUp
  413. buttonDown
  414. reset
  415. buttonUp
  416. setCaption
  417. buttonDown
  418. tbkwin.dll
  419. popMenu
  420. Setup cannot work without TBKWIN.DLL.
  421.  Please make sure TBKWIN.DLL is in the path.
  422. {Port,COM1,COM2,COM3,COM4,},
  423. {Baud Rate,300,600,1200,2400,4800,9600,},
  424. Prefix...,,AutoDial...
  425. ComPort
  426. ComPort
  427. ComBaud
  428. autoDialFromClipboard
  429. ComPort
  430. ComBaud
  431. DialPrefix
  432. autoDialFromClipboard
  433. popMenu
  434. ComPort
  435. ComBaud
  436. Prefix to use before a number that contains more than 6 digits (for instance, 9 to
  437. get an outside line):
  438. DialPrefix
  439. DialPrefix
  440. Dial any number found on the clipboard automatically
  441. when the dialer window is activated?
  442. autoDialFromClipboard
  443. ComPort
  444. ComBaud
  445. DialPrefix
  446. autoDialFromClipboard
  447. oldAuto
  448. oldPref
  449. oldBaud
  450. oldPort
  451. mList
  452. Setup 
  453. doHelp
  454. reset --**
  455. proportions 
  456. moved
  457. + 15, 
  458. + 15,\
  459. + 15, 
  460. + 15,\
  461. + 15, 
  462. setCaption what
  463. disable
  464. 0,50.1875,0
  465. enable
  466. buttonUp
  467. setCaption
  468. disable
  469. reset
  470. enable
  471. buttonUp
  472. doHelp
  473. reset
  474. setCaption
  475. disable
  476. enable
  477. 0,0,0
  478. Help 
  479. Click this button to dial the number.
  480. Click this button to set up the dialer options.
  481. Click this button to see this help display.
  482. Port    Select the serial port to which your modem is selected.  Your modem must be Hayes compatible.
  483. Baud Rate    Select the highest baud rate your modem will support.
  484. Prefix    Use this option to define a prefix that should be used before numbers of more than 6 digits.  For instance, 9 to get access to an outside line.  If you need a pause after the prefix, add one or more commas (the "," character).
  485. AutoDial    When AutoDial is on, the dialer will look for a phone number on the clipboard when its window is activated.  If it finds a phone number, it dials it immediately.
  486. Setup options:
  487. "DDE Info" 
  488. reset --**
  489. proportions 
  490. moved
  491. + 15, 
  492. + 15,\
  493. + 15, 
  494. + 15,\
  495. + 15, 
  496. setCaption what
  497. reset
  498. buttonDown
  499. buttonUp
  500. setCaption
  501. buttonDown
  502. DDE Info
  503. DDE Info
  504. reset
  505. buttonUp
  506. setCaption
  507. h,@,e,
  508. More 
  509. DDE Info
  510. You can dial from another ToolBook application, or any Windows application that supports DDE, including Word or Excel.
  511. To dial, Dialer.TBK must be running, of course.  Then send it via DDE the following command to execute:
  512.     send dial <number>
  513. where <number> is the phone number to dial.
  514. For example, an openScript statement to dial 555-1212 would be 
  515.     executeRemote "send dial" &&\
  516.       quote & "555-1212" & quote\
  517.       topic "dialer.tbk"
  518. Using DDE to dial from another application
  519. button-1
  520. exitHelp
  521. reset --**
  522. proportions 
  523. moved
  524. + 15, 
  525. + 15,\
  526. + 15, 
  527. + 15,\
  528. + 15, 
  529. setCaption what
  530. reset
  531. buttonDown
  532. buttonUp
  533. setCaption
  534. buttonDown
  535. cpexitHelp
  536. reset
  537. buttonUp
  538. setCaption
  539. Dialer.tbk Version 1.03 by C.O.
  540. Copyright 
  541.  1990 Asymetrix Corporation.
  542. 746-0086
  543. k@t*b\aR
  544.