Wardialers or other Phreaking Software for TI?

doctor_x · September 14, 2019

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 ..

+arcadeshopper · September 14, 2019

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

doctor_x · September 14, 2019

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!

Omega-TI · September 14, 2019

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.

+9640News · September 15, 2019

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

Omega-TI · September 15, 2019

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.

+arcadeshopper · September 15, 2019

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 ********************

wierd_w · September 15, 2019

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.

sparkdrummer · September 16, 2019

This dsk has quite a few phreakin' programs and text files

SMRT_UTILS.DSK

HOME AUTOMATION · September 16, 2019

Hi,

I'm looking for: TEXAS TELEPHONES(S).

Home Computing Weekly Magazine Issue 049.

But I don't care to type it in! :roll:

+9640News · September 16, 2019

Seems like Micropendium had an advertisement. Would have been in the mid 80’s.

S1500 · September 19, 2019

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?

HOME AUTOMATION · September 19, 2019

I had a little luck on Classic99 using RXB 2012.

I loaded the disk in drive1...

OLD DSK1.LOAD/SU

When I tried option 4 Classic99 disappeared.

Tursi · September 19, 2019

13 hours ago, HOME AUTOMATION said:

When I tried option 4 Classic99 disappeared.

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

HOME AUTOMATION · September 20, 2019

15 hours ago, Tursi said:

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

I was using QI372. :evil:

+arcadeshopper · September 20, 2019

First off classic99 has no rs232

You should use Fred Kaals emu as it does support rs232

Sent from my LM-G820 using Tapatalk

doctor_x · November 5, 2019

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

+9640News · November 6, 2019

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

Wardialers or other Phreaking Software for TI?

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members