Jump to content
doctor_x

Wardialers or other Phreaking Software for TI?

Recommended Posts

Greetings.. 

 

I am a collector of all things underground for the various 8 bit platforms - mainly wardialers, long distance code scanners, tone boxes, etc that were used back in the day (80's) by hackers and phreakers... There is a huge amount of this software for commodore, apple and even Atari and Tandy - but I've yet to stumble across anything written for the TI994a written for this purpose.

 

Just figured I would throw a hook out and see if anyone recalls any software like this for the TI machine.. Maybe knows of a name that I could use to search by or at least add to the "wanted list", etc...

 

If anyone cares to see my work (in progress for sure) you can do so at http://wardialers.org ...

 

Thanks for any help .. 

  • Like 2

Share this post


Link to post
Share on other sites
Greetings.. 
 
I am a collector of all things underground for the various 8 bit platforms - mainly wardialers, long distance code scanners, tone boxes, etc that were used back in the day (80's) by hackers and phreakers... There is a huge amount of this software for commodore, apple and even Atari and Tandy - but I've yet to stumble across anything written for the TI994a written for this purpose.
 
Just figured I would throw a hook out and see if anyone recalls any software like this for the TI machine.. Maybe knows of a name that I could use to search by or at least add to the "wanted list", etc...
 
If anyone cares to see my work (in progress for sure) you can do so at http://wardialers.org ...
 
Thanks for any help .. 
I had a wardialer at one time. I'll look on my old disks and see if it is still readable



Sent from my LM-G820 using Tapatalk

Share this post


Link to post
Share on other sites
10 minutes ago, arcadeshopper said:

I had a wardialer at one time. I'll look on my old disks and see if it is still readable



Sent from my LM-G820 using Tapatalk
 

Thank you!

Share this post


Link to post
Share on other sites

I remember having a war dialer for my TI back the mid 80's, as a matter of fact it's how I found a few of the local BBS's, and other services like extra TELENET dial-in numbers.  Now days though, I would never even contemplate using one. 

 

I gotta admit though, it was kind of cool coming back from work at the end of the day and having a list on the printer of every phone number in town that answered with a modem.  

  • Like 1

Share this post


Link to post
Share on other sites

Yes, there was a wardialer, commercial software.  I do not remember the name however and I have not seen it in my remaining collection.


Beery

 

Share this post


Link to post
Share on other sites

IIRC the version I used was written in TI Extended BASIC.  The only reason I remember that is because I modified the output format for my printer.

  • Like 1

Share this post


Link to post
Share on other sites
100 REM  PROGRAMMED BY MARK S LARRY FOR SCANNING BBS'S
110 REM  PROGRAMMED 2/16/84,
120 ROW=5
130 RW=5
140 REM *********************145 REM*********************
150 REM  INITIALIZE SCREEN, TEXT COLORS AND DISPLAY MENU
160 CALL SCREEN(5)
170 FOR CHECK=0 TO 14 :: CALL COLOR(CHECK,16,5) :: NEXT CHECK :: DISPLAY AT(2,7)ERASE ALL BEEP:"Menu Selection"
180 DISPLAY AT(ROW,4):"1 Auto dialer" :: DISPLAY AT(ROW+2,4):"2 Display results" :: DISPLAY AT(ROW+4,4)
190 DISPLAY AT(ROW+6,4):"3 Terminate" :: DISPLAY AT(ROW+8,4):"Selection 3" :: ACCEPT AT(ROW+8,14)SIZE(-1)BEEPVALIDATE("123"):SELECT
200 IF SELECT=1 THEN 340 :: IF SELECT=2 THEN 230 ELSE RUN "DSK1.LOAD"
210 REM *********************
220 REM  DISPLAY RESULTS OF SEARCH
230 CALL CLEAR :: CALL SCREEN(5) :: OPEN #10:"DSK1.WARGAME",INPUT,VARIABLE 60
240 DISPLAY AT(2,2):"Phone numbers with carrier  tones."
250 INPUT #10:S
260 DISPLAY AT(RW,8):S
270 RW=RW+1
280 REM
290 IF RW>18 THEN DISPLAY AT(20,2):"Depress any key to continue." :: CALL KEY(0,J,K) :: IF K=0 THEN 280 ELSE CALL CLEAR :: RW=5
300 IF EOF(10)=1 THEN CLOSE #10 ELSE 240
310 DISPLAY AT(20,2)BEEP:"*** Operation Complete  ***" :: FOR ZE=1 TO 1000 :: NEXT ZE :: CALL CLEAR :: RW=5 :: GOTO 170
320 REM ********************
330 REM  USER ENTERS PHONE NUBERS TO DIAL
340 OPEN #10:"DSK1.WARGAME",APPEND,VARIABLE 60
350 F=5 :: CALL CLEAR :: CALL SCREEN(5)
360 OPEN #1:"RS232",DISPLAY,UPDATE,VARIABLE 255 :: PRINT #1:"AT S7=19 C0" :: CLOSE #1
370 DISPLAY AT(1,1):"To search for carrier tones, enter starting and ending  phone numbers."
380 DISPLAY AT(6,2):"ENTER START NUMBER "
390 ACCEPT AT(8,9)BEEPVALIDATE(DIGIT):B
400 DISPLAY AT(12,2):"ENTER END NUMBER"
410 ACCEPT AT(14,9)BEEPVALIDATE(DIGIT):C
420 REM *********************
430 REM  CHECK IF FORWARD DIALING
440 IF B=C THEN 510 :: IF C>B THEN 510
450 DISPLAY AT(7,3)BEEP:"Forward Dialing Only" :: FOR DELAY=1 TO 600 :: NEXT DELAY :: CALL CLEAR :: GOTO 350
460 REM *********************
470 REM
480 REM
490 REM ********************
500 REM  DIALS PHONE NUMBER ENTERED BY USER.
510 CALL CLEAR
520 ON ERROR 1000
530 OPEN #1:"RS232",DISPLAY,UPDATE,VARIABLE 255
540 GOTO 560
550 IF B>C THEN CLOSE #10 :: PRINT #1:"AT C1" :: CLOSE #1
560 DISPLAY AT(2,1)BEEP:"Dialing sequence operating"
570 PRINT #1:"AT DT"&STR$(B)
580 DISPLAY AT(F,2):B
590 FOR Z=1 TO 100
600 NEXT Z
610 REM ********************
620 REM  CHECKS STATUS OF CALLS
630 LINPUT #1:A$
640 LINPUT #1:B$
650 F=F+1
660 REM *********************
670 A$=CHR$(10)&"CONNECT" :: IF B$=A$ THEN 760 ELSE 680
680 A$=CHR$(10)&"NO CARRIER" :: IF B$="NO CARRIER" OR B$=A$ THEN 690
690 REM  *******************
700 REM
710 REM
720 REM
730 REM  DISPLAYS STATUS OF CALLS
740 DISPLAY AT(F-1,13):B$
750 GOTO 810
760 DISPLAY AT(F-1,13):B$
770 PRINT #10:B
780 CLOSE #1
790 GOTO 860
800 REM *********************546 REM TIMING LOOP FOR "NO CARRIER"
810 FOR SE=1 TO 100 :: NEXT SE :: CLOSE #1 :: CALL KEY(0,K,S) :: IF K=32 THEN CLOSE #10 :: GOTO 120 ELSE GOTO 890
820 REM ********************/556 REM
830 REM
840 REM *********************
850 REM  TIMING LOOP FOR "CONNECTED"
860 FOR SE=1 TO 8000
870 NEXT SE
880 REM ********************
890 OPEN #1:"RS232",DISPLAY,UPDATE,VARIABLE 255
900 B=B+1
910 IF B>C THEN PRINT #1:"AT C1" :: CLOSE #10 :: CLOSE #1 :: GOTO 120
920 ON ERROR 1010
930 FOR GE=1 TO 200 :: NEXT GE
940 IF F>18 THEN CALL CLEAR :: F=5 :: GOTO 560
950 PRINT #1:"AT DT"&STR$(B)
960 GOTO 580
970 STOP
980 REM ********************
990 REM  ERROR CODES
1000 CALL ERR(W,X,Y,Z) :: GOTO 630
1010 CALL ERR(W,X,Y,Z) :: GOTO 630
1020 REM ********************

 

  • Like 3

Share this post


Link to post
Share on other sites

these days you would hit more fax machines than you would bbs modems.  Interesting to see how they used the AT command set return values to determine if a carrier picked up though.

Share this post


Link to post
Share on other sites

This is fascinating. I didn't use wardialers(Tone Loc) until I had a DOS system.

 

With that being said, any guidance on that TI SMRT_UTILS.DSK? I'm not having much luck getting anything to run. My E/A skills are a bit rusty.  Which file's the wardialer program? 

Share this post


Link to post
Share on other sites

I had a little luck on Classic99 using RXB 2012.

I loaded the disk in drive1...

 

OLD DSK1.LOAD/SU

 

WOLFCOM.thumb.JPG.00b6218ef44e6e42cd73fb822c57cde9.JPG

 

When I tried option 4 Classic99 disappeared.:(

  • Like 1
  • Thanks 1

Share this post


Link to post
Share on other sites
13 hours ago, HOME AUTOMATION said:

When I tried option 4 Classic99 disappeared.:(

Hmm.. it worked here. Are you on the latest?

 

Share this post


Link to post
Share on other sites

old thread - but I don't think anything on that disk is a wardialer. "disassembler" just sounds like a program disassembler... 

Share this post


Link to post
Share on other sites

There is a War Dialer out there somewhere as I used to have a copy, as well as Micropendium advertised one back in the 80's.


Beery

 

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...