; °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
;
; title                 nUKe97 1.0
;
; platform              OS-82
;          
; description           basically nUKe97 hangs the calculator of an
;                       unsuspecting user. very much like safe-t-calc
;                       execpt there is no exit feature.
;
; date                  12 / aug / 97
;
; author                peter ross
;                       lord_nexus@usa.net
;
;                       nexus inc.
;                       box 279
;                       warrnambool
;                       victoria 3280
;                       australia
;
; notes                 this program has no real use, but currently
;                       there is great lack of good os82/ash applications.
;                       i would personally like to see the following asm
;                       appear within the next three months . . .
;
;                       word processor
;                       something good enough to easily store text on the
;                       calculator. must also take advantage of the extended
;                       ascii characters.
;
;                       spreadsheet
;                       i have seen some mail regarding the export of
;                       matrixes into ms_excel spreadsheets. an actual
;                       spreadsheet on the calculator would be very
;                       useful.
;
;                       improved link xfer
;                       wouldn't it be nice if you could plug the '82 into
;                       the pc and do all the fileselecting from the ti's
;                       keypad rather than the computers keyboard.
;
;                       and possibly within the next year . . .
;
;                       tcp/ip support.
;                       this is obviously a long way down the track,
;                       but eventually i can see people using ip from their
;                       calculators. (more probably the '92)
;
; legal                 this is 100% free.
;                       no warranty is provided, use at your own risk.
;                       please, edit the freakin' code!
;
; °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°

#include "offti-82.h"

        .org    0
        .db     "nUKe97 1.0",0            ; long file name

lock
        CALL    $07EA                     ; sleep mode

        ROM_CALL(CLEARLCD)      
        LD      HL,     $0000             ; move to (0,0)
        LD      (CURSOR_POS),HL           ;
        ld      hl,     (PROGRAM_ADDR)
        ld      de,     str_splash
        add     hl,     de
        SET     3,      (IY+05)           ; inverse text
        ROM_CALL(D_ZT_STR)

        LD      HL,     $0003             ; move to (0,3)
        LD      (CURSOR_POS),HL           ;
        LD      HL,     (PROGRAM_ADDR)
        LD      DE,     str_note
        ADD     HL,     DE
        RES     3,      (IY+05)           ; normal text
        ROM_CALL(D_ZT_STR)

lock_loop
        jr      lock_loop                 ; loop.

str_splash
        .db     "   nUKe97 1.0   ",0
str_note
        .db     "ti-calc has been"
        .db     "     nuked!     ",0
        .end

; °°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°