home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 31
/
CDASC_31_1996_juillet_aout.iso
/
vrac
/
jagbye.zip
/
JAGBYE.WCX
(
.txt
)
< prev
next >
Wrap
Wildcat! WCX
|
1996-03-17
|
62KB
|
931 lines
'! Decompiled with wccNosy version 4.20f (freeware)
'! Input File: in.wcx 62219 bytes 01/29/123 11:01:10pm
'! Code Segment Size :18733 bytes
'! Data Segment Size :4560 bytes
'! String Segment Size:43486 bytes
'! Compiled with WCC version ? 019C017B
Type Type26
Filler0(1 To 6) As Byte
s6 As String*70
Filler76(1 To 14) As Byte
s90 As String*70
Filler160(1 To 14) As Byte
s174 As String*70
Filler244(1 To 20) As Byte
w264 As Word
End Type
Declare Function Func14704(l65534 As Long, l65532 As Long, l65530 As Long) As Integer
Declare Sub Sub15195(s65534 As String, s65532 As String, s65530 As String)
Declare Sub Sub15310
Declare Sub Sub15401
Declare Sub Sub15490
Declare Function Func15588 As Integer
Declare Sub Sub16051
Declare Sub Sub16221
Declare Sub Sub16849
Declare Sub Sub17477
Declare Sub Sub18105
Dim s4463 As String
Dim l4467 As Long
Dim i4471 As Integer
Dim s4473 As String
Dim s4477 As String
Dim s4481 As String*1
Dim i4486 As Integer
Dim s4488 As String
Dim s4492 As String
Dim s4496 As String
Dim s4500 As String
Dim i4504 As Integer
Dim i4506 As Integer
Dim s4508 As String
Dim dt4512 As DateTime
Dim i4520 As Integer
Dim s4522 As String*25
Dim s4547 As String*2
Dim i4549 As Integer
Dim s4551 As String
Dim i4555 As Integer
Dim i4557 As Integer
Dim s4559 As String*1
Dim l65496_ As Long
Dim i65500_ As Integer
Dim l65502_ As Long
Dim i65506_ As Integer
Dim l65508_ As Long
Dim i65512_ As Integer
Dim l65514_ As Long
Dim i65518_ As Integer
Dim l65520_ As Long '! Temporary
Dim l65524_ As Long '! Temporary
Dim s65528_ As String
Dim l65532_ As Long
CarrierCheck(-1)
i4471 = 0
l4467 = 0
s4473 = ProgPath + "JAGBYE.KEY"
If Exists(s4473) Then
Open s4473 For Input As 1
Input #1, s4463
Close 1
s4463 = Trim(s4463)
l4467 = Abs(Val(s4463))
Else
149 l4467 = 0
End If
155
If Func14704(l4467, (69117), (67)) Then
i4471 = -1
Else
217 i4471 = 0
End If
223 CurrentDateTime dt4512
i4506 = Conference.Number
Func15588
If i4471 = 0 Then
StatusOpen 1
StatusWrite " UNREGISTERED JAGBYE (c)1996 Chris Jagger Creative Services", 1213417543, 1213417543, 1213417543
End If
293 l65532_ = dt4512.T.Number Div 60
If l65532_ >= 0 And l65532_ <= 719 Then
i4520 = 3
Else
350 If l65532_ >= 720 And l65532_ <= 1079 Then
i4520 = 1
Else
391 If l65532_ >= 1080 And l65532_ <= 1440 Then
i4520 = 2
GoTo 432
End If
End If
End If
Do
Do
Do
Do
Do
432 MorePrompt(0)
If i4520 = 1 Then
Cls
Locate 1, 1
Print "@NOPAUSE@@07@ "
Print "@07@ @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒@07@"
Print "@07@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒@07@"
Print "@07@ @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0E@"
Delay 0.04
Print Chr(27) + "[3;5H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[3;70H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[4;6H@08@█@07@█@0F@█@07@█@08@█@01@▒▒@0E@"
Print Chr(27) + "[5;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[6;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[7;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[8;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[9;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[10;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[11;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[12;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[13;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[14;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[15;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[16;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[17;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[4;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[5;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[6;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[7;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[8;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[9;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[10;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[11;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[12;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[13;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[14;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[15;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[16;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[17;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[18;5H@78@▀▀▀▀▀▀▀@01@▒▒@0E@"
Print Chr(27) + "[18;70H@78@▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[1;5H@7F@««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»«««»»««»@0E@"
Delay 0.01
Print Chr(27) + "[2;4H@7F@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[19;5H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Print Chr(27) + "[20;4H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[21;3H@2A@`'`'`'`'`''``'`'`'`'`'```'`'`'`'````'`'`'`'``````'''``'''```''```'`'`'''`'`'@07@"
Else
1013 If i4520 = 2 Then
Cls
Locate 1, 1
Print "@NOPAUSE@ "
Print " @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Print " @0E@ @08@▒@10@ @08@▒"
Print " @0E@ @08@▒@10@ @08@▒"
Print " @0E@ @08@▒@13@ @17@· · @08@▒"
Print " @0E@ @08@▒@13@ @08@▒"
Print " @0E@ @08@▒@13@ @17@· @08@▒"
Print " @0E@ @08@▒@13@ @17@· @10@│ @08@▒"
Print " @0E@ @08@▒@10@ @17@· · @10@╟@04@|@10@╢ @08@▒"
Print " @0E@ @08@▒@17@ · @0F@ @07@·@0E@·@07@· @0E@·· @1E@ @18@. @0F@ @0E@· @1E@ @08@▒"
Print " @0E@ @08@▒@98@ @17@· @0F@ @0E@::@07@:::: @17@ @0F@ @07@■■■ @17@ . @08@▒"
Print " @0E@ @08@▒@17@ · @14@░░░░░░░░░░@0E@ ■ ■@07@ ■@08@ @07@ @0E@■ @17@ @0F@ @0E@..... @1E@ @08@▒"
Print " @0E@ @08@▒@18@. @1F@. @14@░░░░░░░░@1C@░░░░░░░░@0F@ @07@==@0E@===@07@=@0E@=@07@=== @17@ @0F@ @07@:.:@0E@:@07@: @17@ @08@▒"
Print " @0E@ @08@▒@18@ @0F@ @07@::. @17@ @14@░░░░░░░░@1C@░░░░░░░@58@░░░░░░░░@0F@ @0E@==@07@===@0E@===== @14@░░@0F@ @0E@::.@07@:: @17@ @08@▒"
Print " @0E@ @08@▒@0E@=== @1E@ @0F@ @07@:@0E@::@07@:@0E@: @14@░░░░@1C@░@0F@ @58@░░░░░░░@5C@░░░░░░░░@0F@ @07@==@0E@==@07@====== @1C@░░@0F@ @07@:::.@0E@: @14@░ @08@▒"
Print " @0E@ @08@▒@0F@ @07@= = @17@ @14@░@0F@ @07@:@0E@::@07@:@0E@:@07@ @1C@░░░░@58@░@0F@ @0E@==== @5C@░░░░░░░▒▒▒▒▒▒▒▒@0F@ @07@==@0E@==@07@====== @58@░░@0F@ @07@.:@0E@::@07@: @14@░░░░@08@▒"
Print " @0E@ @08@▒@07@=@0E@=== @14@░░░@0F@ @07@:@0E@::@07@.@0E@: @58@░░░░░@0F@ @07@::@0E@:::@5C@▒▒▒▒▒@0F@ @07@. @5C@▓▓▓▓▓▓▓@0F@ @07@==@0E@====@07@==== @5C@░░@0F@ @07@::@0E@::: @1C@░░░░@08@▒"
Print " @0E@ @08@▒@07@==== @1C@░░░@0F@ @07@::::::@0E@:@07@ @5C@░░░@0F@ @07@:::: @5C@▓▓▓▓@0F@ @0E@:. : @5C@███@0F@ @0E@==@07@======== @5C@▒▒@0F@ @07@.@0E@:@07@::@0E@: @58@░░░░@08@▒@07@"
Print " @08@▒@07@==== @58@░░░@0F@ @07@:@0E@::@07@:::@0E@: @5C@▒@0F@ @07@..@0E@::::@07@:.@5C@██@0F@ @07@:@0E@:.. @0C@▀ @07@==@0E@==@07@==@0E@===@07@= @5C@▓▓@0F@ @0E@::·@07@···@0E@··· @08@▒@07@"
Print " @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0E@"
Delay 0.04
Print Chr(27) + "[3;5H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[3;70H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[4;6H@08@█@07@█@0F@█@07@█@08@█@01@▒▒@0E@"
Print Chr(27) + "[5;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[6;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[7;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[8;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[9;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[10;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[11;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[12;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[13;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[14;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[15;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[16;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[17;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[4;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[5;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[6;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[7;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[8;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[9;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[10;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[11;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[12;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[13;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[14;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[15;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[16;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[17;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[18;5H@78@▀▀▀▀▀▀▀@01@▒▒@0E@"
Print Chr(27) + "[18;70H@78@▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[1;5H@7F@««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»«««»»««»@0E@"
Delay 0.01
Print Chr(27) + "[2;4H@7F@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[19;5H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Print Chr(27) + "[20;4H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[21;3H@19@`'`'`'`'`''``'`'`'`'`'```'`'`'`'````'`'`'`'``````'''``'''```''```'`'`'''`'`'@07@"
Else
1589 If i4520 = 3 Then
Cls
Locate 1, 1
Print "@NOPAUSE@ "
Print " @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Print " @0E@ @08@▒@30@▒▒░░@38@░░░░ @3C@░░░░░░░░░░░░░░░░░░░░░░░ @38@░░░░@30@░░░░░░▒▒@08@▒"
Print " @0E@ @08@▒@30@░@38@░░ @3C@░░░░░░░░░░▒▒▒▒▒▒▒▒▒▒▒▒▒▒░░░░░░░░░░░░░ @38@░░░░@30@░@08@▒"
Print " @0E@ @08@▒@30@ @3C@░░░░░░░░░▒▒▒▒▒▒▒▒▒▒▒@3E@█@3C@▒▒▒▓▓▒▒▒▓▓@0E@█@3C@▓▒▒▒▒▒▒▒░░░░░░░░ @38@░@08@▒"
Print " @0E@ @08@▒@3C@ ░░░░░░▒▒▒▒▒▒▒▒▓▓▓▓▓▓▓▓▓@3E@█@3C@▓▓▓▓▓▓▓▓@4E@▐▌@3C@▓▓▓▓▓▓▓▒▒▒▒▒▒▒▒░░░░░░ @08@▒"
Print " @0E@ @08@▒@3C@ ░░░░░░▒▒▒▒▒▓▓▓▓▓@3E@▄@3C@▓▓▓▓▓▓██@4E@░@4C@█@4E@█░@4C@███@4E@░░█░@3C@█▓▓▓▓▓▓▓▓▒▒▒▒▒▒▒▒▒▒▒░░░░░░░░ @08@▒"
Print " @0E@ @08@▒@3C@░░░░░░▒▒▒▒▒▓▓▓▓▓▓▓▓@4E@▀▄@3C@▓█@4E@░@4C@██@4E@▄▄@7E@▀▒▀▀▀▀▀▀▀▒▀@4E@▄@4C@██@4E@▒░@3C@██▓@4E@▄▀▀@3C@▓▓▓▓▓▓▒▒▒▒▒▒▒▒░░░░@08@▒"
Print " @0E@ @08@▒@3C@░░░░▒▒▒▒▒▓▓▓▓▓▓▓▓▓██@4E@░▀▀▄@7E@▀▀▒▒▄▄▄@0E@█████@7E@▄▄▄▒▀▀@4E@▄▄▄▀▀@3C@██▓▓▓▓▓▓▓▓▓▓▒▒▒▒▒▒▒░░@08@▒"
Print " @0E@ @08@▒@3C@░▒▒▒▒▒▓▓▓▓▓▓▓▓▓▓████@4E@░▒█@7E@▒▒▄@0E@███████████████@7E@▄▓▒@0E@█░@3C@████▓▓▓▓▓▓▓▓▓▓▓▒▒▒▒▒▒░@08@▒"
Print " @0E@ @08@▒@3C@▒▒▒▒▒▓▓▓▓▓▓▓▓█████@4E@░▒▄@7E@▀▒▒@0E@███████████████████@7E@▒▀@4E@▄▒░@3C@██▓▓▓▓▓▓▓▓▓▓▓▓▒▒▒▒▒░@08@▒"
Print " @0E@ @08@▒@3C@▒▒▒▒▒▓▓▓▓▓▓@3E@▀▀▀▀@4E@▀▀▀▀▀@7E@▄▒▒▐@0E@███████████████████@7E@▌▒█@4E@▄▄▄▄▄▄@3E@▄▄▄@37@▄@3C@▓▓▓▓▓▓▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@32@▄▄▄▄▄▄@2A@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@72@▄▄@32@▄▄@3C@▓▓▓▓▓▓▓▓▓▒▒▒▒▒▒░@08@▒"
Print " @0E@ @08@▒@2A@████████████████████████████████████████████████████▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@08@▒"
Print " @0E@ @08@▒@0A@████████████████████████████████████████████████████████████████████@08@▒"
Print " @0E@ @08@▒@0A@████████████████████████████████████████████████████████████████████@08@▒"
Print " @0E@ @08@▒@0A@████████████████████████████████████████████████████████████████████@08@▒"
Print " @0E@ @08@▒@0A@████████████████████████████████████████████████████████████████████@08@▒@07@"
Print " @08@▒@0A@████████████████████████████████████████████████████████████████████@08@▒@07@"
Print " @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0E@"
Delay 0.04
Print Chr(27) + "[3;5H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[3;70H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[4;6H@08@█@07@█@0F@█@07@█@08@█@01@▒▒@0E@"
Print Chr(27) + "[5;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[6;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[7;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[8;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[9;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[10;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[11;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[12;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[13;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[14;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[15;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[16;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[17;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[4;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[5;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[6;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[7;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[8;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[9;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[10;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[11;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[12;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[13;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[14;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[15;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[16;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[17;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[18;5H@78@▀▀▀▀▀▀▀@01@▒▒@0E@"
Print Chr(27) + "[18;70H@78@▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[1;5H@7F@««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»«««»»««»@0E@"
Delay 0.01
Print Chr(27) + "[2;4H@7F@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[19;5H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Print Chr(27) + "[20;4H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[21;3H@2A@`'`'`'`'`''``'`'`'`'`'```'`'`'`'````'`'`'`'``````'''``'''```''```'`'`'''`'`'@07@"
Else
2165 Cls
Locate 1, 1
Print "@NOPAUSE@@07@ "
Print "@07@ @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒"
Print " @0E@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒@07@"
Print "@07@ @08@▒@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@08@▒@07@"
Print "@07@ @08@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0E@"
Delay 0.04
Print Chr(27) + "[3;5H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[3;70H@78@▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[4;6H@08@█@07@█@0F@█@07@█@08@█@01@▒▒@0E@"
Print Chr(27) + "[5;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[6;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[7;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[8;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[9;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[10;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[11;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[12;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[13;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[14;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[15;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[16;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[17;6H@08@█@07@█@0F@█@07@█@08@█@01@▒@0E@"
Print Chr(27) + "[4;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[5;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[6;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[7;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[8;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[9;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[10;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[11;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[12;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[13;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[14;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[15;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[16;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[17;71H@08@█@07@█@0F@█@07@█@08@█@0E@"
Print Chr(27) + "[18;5H@78@▀▀▀▀▀▀▀@01@▒▒@0E@"
Print Chr(27) + "[18;70H@78@▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[1;5H@7F@««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»««»»«««»»««»@0E@"
Delay 0.01
Print Chr(27) + "[2;4H@7F@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@0E@"
Print Chr(27) + "[19;5H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Print Chr(27) + "[20;4H@7F@▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@0E@"
Delay 0.01
Print Chr(27) + "[21;3H@2A@`'`'`'`'`''``'`'`'`'`'```'`'`'`'````'`'`'`'``````'''``'''```''```'`'`'''`'`'@07@"
End If
End If
End If
2720 If (s4559 = "Y") = 0 Then GoTo 3511
i4486 = GetMarkedFiles
If i4486 = 0 Then
GoTo 3511
End If
2767 If i4520 = 1 Then
Delay 0.04
Locate 6, 14
Print "@NOPAUSE@@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Locate 7, 14
Print "@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0D@░▒▓@5E@ Marked Files!! @0D@▓▒░@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Locate 8, 14
Print "@09@▒▒@0F@┌──────────────@08@────────────────────────@0F@──────────┐@09@▒▒"
Locate 9, 14
Print "@09@▒▒@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@01@▒▒@09@"
Locate 10, 14
Print "@09@▒▒@0F@│@0E@ @0F@ @0E@ @01@ @0E@ You have files @0F@marked@0E@ for download! @08@ │@01@▒▒@09@"
Locate 11, 14
Print "@09@▒▒@0F@│@0E@ @0F@ @0E@ @01@ @0E@ Do you want to download them now (@0F@y@0E@/@0F@N@0E@)? @08@ │@01@▒▒@09@"
Locate 12, 14
Print "@09@▒▒@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@01@▒▒@09@"
Locate 13, 14
Print "@09@▒▒@0F@│@0E@ @04@░░░░░░░░▒▒▒▒▒▒▒▓▓▓▓▓▓▓@0E@ @04@▓▓▓▓▓▓▓▒▒▒▒▒▒░░░░░░@08@ │@01@▒▒@09@"
Locate 14, 14
Print "@09@▒▒@0F@└@08@────────────────────────────────────────────────┘@01@▒▒@09@"
Locate 15, 14
Print "@09@▒▒▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
Else
2956 If i4520 = 2 Then
Delay 0.04
Locate 7, 16
Print "@NOPAUSE@@13@ @0D@░▒▓@5E@ Marked Files!! @0D@▓▒░@13@ @17@· @0F@"
Locate 8, 16
Print "@0F@┌──────────────@08@────────────────────────@0F@──────────┐@17@ @10@│@0F@"
Locate 9, 16
Print "@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@10@╟@04@|@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ You have files @0F@marked@0E@ for download! @08@ │@0F@ @0E@·@0F@"
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ Do you want to download them now (@0F@y@0E@/@0F@N@0E@)? @08@ │■■@0F@"
Locate 12, 16
Print "@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │..@0F@"
Locate 13, 16
Print "@0F@│@0E@ @04@░░░░░░░░▒▒▒▒▒▒▒▓▓▓▓▓▓▓@0E@ @04@▓▓▓▓▓▓▓▒▒▒▒▒▒░░░░░░@08@ │.:@0F@"
Locate 14, 16
Print "@0F@└@08@────────────────────────────────────────────────┘:.@07@"
Locate 15, 16
Print "@07@:@0E@:@08@:::@0E@ @18@░░░░░@0F@ @18@░░░░░░░░░░░░░░░@0F@ @08@ ==========@07@ @18@░░@0F@ @07@:@08@::@07@"
Else
3129 If i4520 = 3 Then
Delay 0.04
Locate 7, 16
Print "@NOPAUSE@@3C@▒▒▒▒▓▓▓▓▓@3E@▄@3C@▓▓▓▓@0D@░▒▓@5E@ Marked Files!! @0D@▓▒░@3C@▒▒▒▒▒▒▒▒▒▒▒░░░@0F@"
Locate 8, 16
Print "@0F@┌──────────────@08@────────────────────────@0F@──────────┐@3C@▒▒@0F@"
Locate 9, 16
Print "@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@30@▒▒@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ You have files @0F@marked@0E@ for download! @08@ │@30@▓▓@0F@"
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ Do you want to download them now (@0F@y@0E@/@0F@N@0E@)? @08@ │@30@▓▓@0F@"
Locate 12, 16
Print "@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@30@▓▓@0F@"
Locate 13, 16
Print "@0F@│@0E@ @04@░░░░░░░░▒▒▒▒▒▒▒▓▓▓▓▓▓▓@0E@ @04@▓▓▓▓▓▓▓▒▒▒▒▒▒░░░░░░@08@ │@30@▓▓@0F@"
Locate 14, 16
Print "@0F@└@08@────────────────────────────────────────────────┘@02@▄▄@0A@"
Locate 15, 16
Print "@0A@██@02@██████████████████████████████████████████████████@07@"
Else
3302 Delay 0.04
Locate 6, 14
Print "@NOPAUSE@@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Locate 7, 14
Print "@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@0D@░▒▓@5E@ Marked Files!! @0D@▓▒░@09@▒▒▒▒▒▒▒▒▒▒▒▒▒▒"
Locate 8, 14
Print "@09@▒▒@0F@┌──────────────@08@────────────────────────@0F@──────────┐@09@▒▒"
Locate 9, 14
Print "@09@▒▒@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@01@▒▒@09@"
Locate 10, 14
Print "@09@▒▒@0F@│@0E@ @0F@ @0E@ @01@ @0E@ You have files @0F@marked@0E@ for download! @08@ │@01@▒▒@09@"
Locate 11, 14
Print "@09@▒▒@0F@│@0E@ @0F@ @0E@ @01@ @0E@ Do you want to download them now (@0F@y@0E@/@0F@N@0E@)? @08@ │@01@▒▒@09@"
Locate 12, 14
Print "@09@▒▒@0F@│@0E@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @08@ │@01@▒▒@09@"
Locate 13, 14
Print "@09@▒▒@0F@│@0E@ @04@░░░░░░░░▒▒▒▒▒▒▒▓▓▓▓▓▓▓@0E@ @04@▓▓▓▓▓▓▓▒▒▒▒▒▒░░░░░░@08@ │@01@▒▒@09@"
Locate 14, 14
Print "@09@▒▒@0F@└@08@────────────────────────────────────────────────┘@01@▒▒@09@"
Locate 15, 14
Print "@09@▒▒▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
End If
End If
End If
3470 Locate 13, 41
If (InputYesNo("@0E@", 0)) = 0 Then GoTo 3511
Download "", 1213417543
Loop
3511 If i4520 = 1 Then
Delay 0.05
Locate 5, 16
Print "@NOPAUSE@@0F@┌──────────────────────────────────────────────────┐@09@▒▒@0F@"
Locate 6, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@01@▒▒@0F@"
Locate 7, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@P@0E@] age @0F@ @08@ │@01@▒▒@0F@"
Locate 8, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ [@0F@C@0E@] omment to @0F@ @08@ │@01@▒▒@0F@"
Locate 9, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@T@0E@] ime Bank @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@R@0E@] eturn to @0F@ @0E@ @0F@ @0E@ @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 7, 37
Print "@0E@"; MakeWild.SysopName
Locate 8, 43
Print "@0E@"; MakeWild.SysopName
Locate 10, 42
Print "@0E@"; s4522
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@L@0E@] ogoff Immediately @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 12, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@01@▒▒@0F@"
Locate 13, 16
Print "@0F@└@08@──────────────────────────────────────────────────┘@01@▒▒@09@"
Locate 14, 16
Print "@09@▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
Locate 15, 17
Print "@NOPAUSE@@7F@█▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@78@▄@09@▒▒@7F@"
Locate 16, 17
Print "@7F@█ @08@█@0E@ @08@█@71@ @7F@ @70@ @18@█@01@▒▒@7F@"
Locate 17, 17
Print "@7F@▀@78@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@18@█@01@▒▒@09@"
Locate 18, 17
Print "@09@▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
Delay 0.01
Locate 4, 26
Print "@06@░▒▓@6E@ @06@▓▒░@05@"
Locate 5, 27
Print "@08@───────────────────────────────"
If i4471 = -1 Then
3918 For i4555 = 1 To i4557 Step 1
s4551 = Left(s4522, i4555)
Locate 4, i4549
Print "@NOPAUSE@@6E@"; s4551
UpdateScreen
Delay 0.01
Next
4045 Else
4051 Locate 4, 32
Print "@NOPAUSE@@6F@-=≡ @6E@UNREGISTERED @6F@≡=-"
End If
4067 Else
4073 If i4520 = 2 Then
Delay 0.07
Locate 5, 16
Print "@NOPAUSE@@0F@┌──────────────────────────────────────────────────┐@17@ @0F@"
Locate 6, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@13@ @0F@"
Locate 7, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@P@0E@] age @0F@ @08@ │@17@ @0F@"
Locate 8, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ [@0F@C@0E@] omment to @0F@ @08@ │@10@ @0F@"
Locate 9, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@T@0E@] ime Bank @0F@ @0E@ @08@│@10@╢@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@R@0E@] eturn to @0F@ @0E@ @0F@ @0E@ @0F@ @0E@ @08@│@0F@"
Locate 7, 37
Print "@0E@"; MakeWild.SysopName
Locate 8, 43
Print "@0E@"; MakeWild.SysopName
Locate 10, 42
Print "@0E@"; s4522
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@L@0E@] ogoff Immediately @0F@ @0E@ @08@│■@0F@"
Locate 12, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │.@0F@"
Locate 13, 16
Print "@0F@└@08@──────────────────────────────────────────────────┘:@18@"
Locate 14, 16
Print "@18@ @0F@ @07@:@08@:.@07@ @17@ @18@░░░░░░░░░░░░░░░░░░░░░░░@0F@ @08@========== @0E@ @14@░░@08@ ::@0E@.@07@:@7F@"
Locate 15, 17
Print "@NOPAUSE@@7F@█▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@78@▄@07@::@7F@"
Locate 16, 17
Print "@7F@█ @08@█@0E@ @08@█@71@ @7F@ @70@ @18@█@08@::@7F@"
Locate 17, 17
Print "@7F@▀@78@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@18@█@08@::@07@"
Locate 18, 17
Print "@07@::@08@::::@07@ @18@░░░@0F@ @08@::::@07@ @18@▓▓▓▓@0F@ @08@:. :@0E@ @18@▓▓▓@0F@ @08@==========@07@ @18@▒▒@0F@ @08@.::"
Delay 0.01
Locate 4, 26
Print "@05@░▒▓@5E@ @05@▓▒░@05@"
Locate 5, 27
Print "@08@───────────────────────────────"
If i4471 = -1 Then
4480 For i4555 = 1 To i4557 Step 1
s4551 = Left(s4522, i4555)
Locate 4, i4549
Print "@NOPAUSE@@5E@"; s4551
UpdateScreen
Delay 0.01
Next
4607 Else
4613 Locate 4, 32
Print "@NOPAUSE@@5F@-=≡ @5E@UNREGISTERED @5F@≡=-"
End If
4629 Else
4635 If i4520 = 3 Then
Delay 0.07
Locate 5, 16
Print "@NOPAUSE@@0F@┌──────────────────────────────────────────────────┐@3C@ @0F@"
Locate 6, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@3C@ @0F@"
Locate 7, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@P@0E@] age @0F@ @08@ │@30@░░@0F@"
Locate 8, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ [@0F@C@0E@] omment to @0F@ @08@ │@30@▒▒@0F@"
Locate 9, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@T@0E@] ime Bank @0F@ @0E@ @08@│@30@▒▒@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@R@0E@] eturn to @0F@ @0E@ @0F@ @0E@ @0F@ @0E@ @08@│@30@▒▒@0F@"
Locate 7, 37
Print "@0E@"; MakeWild.SysopName
Locate 8, 43
Print "@0E@"; MakeWild.SysopName
Locate 10, 42
Print "@0E@"; s4522
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@L@0E@] ogoff Immediately @0F@ @0E@ @08@│@30@▓▒@0F@"
Locate 12, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@30@▓▒@0F@"
Locate 13, 16
Print "@0F@└@08@──────────────────────────────────────────────────┘@30@▒▒@2A@"
Locate 14, 16
Print "@2A@██@02@█████████████████████████████████████████▄▄▄▄▄▄▄▄▄▄▄@7F@"
Locate 15, 17
Print "@NOPAUSE@@7F@█▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@78@▄@0A@██@7F@"
Locate 16, 17
Print "@7F@█ @08@█@0E@ @08@█@71@ @7F@ @70@ @18@█@02@██@7F@"
Locate 17, 17
Print "@7F@▀@78@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@18@█@02@██@0A@"
Locate 18, 17
Print "@0A@██@02@█████████████████████████████████████████████████@07@"
Delay 0.01
Locate 4, 26
Print "@04@░▒▓@4E@ @04@▓▒░@08@"
Locate 5, 27
Print "@08@───────────────────────────────"
If i4471 = -1 Then
5042 For i4555 = 1 To i4557 Step 1
s4551 = Left(s4522, i4555)
Locate 4, i4549
Print "@NOPAUSE@@4E@"; s4551
UpdateScreen
Delay 0.01
Next
5169 Else
5175 Locate 4, 32
Print "@NOPAUSE@@4F@-=≡ @4E@UNREGISTERED @4F@≡=-"
End If
5191 Else
5197 Delay 0.05
Locate 5, 16
Print "@NOPAUSE@@0F@┌──────────────────────────────────────────────────┐@09@▒▒@0F@"
Locate 6, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@01@▒▒@0F@"
Locate 7, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@P@0E@] age @0F@ @08@ │@01@▒▒@0F@"
Locate 8, 16
Print "@0F@│@0E@ @0F@ @0E@ @01@ @0E@ [@0F@C@0E@] omment to @0F@ @08@ │@01@▒▒@0F@"
Locate 9, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@T@0E@] ime Bank @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 10, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@R@0E@] eturn to @0F@ @0E@ @0F@ @0E@ @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 7, 37
Print "@0E@"; MakeWild.SysopName
Locate 8, 43
Print "@0E@"; MakeWild.SysopName
Locate 10, 42
Print "@0E@"; s4522
Locate 11, 16
Print "@0F@│@0E@ @0F@ @0E@ [@0F@L@0E@] ogoff Immediately @0F@ @0E@ @08@│@01@▒▒@0F@"
Locate 12, 16
Print "@0F@│@0E@ @0F@ @01@──────@09@────@03@───────@0B@────@0F@────@0B@────@03@─────@09@────@01@──────@0E@ @0F@ @08@ │@01@▒▒@0F@"
Locate 13, 16
Print "@0F@└@08@──────────────────────────────────────────────────┘@01@▒▒@09@"
Locate 14, 16
Print "@09@▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
Locate 15, 17
Print "@NOPAUSE@@7F@█▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀@78@▄@09@▒▒@7F@"
Locate 16, 17
Print "@7F@█ @08@█@0E@ @08@█@71@ @7F@ @70@ @18@█@01@▒▒@7F@"
Locate 17, 17
Print "@7F@▀@78@▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄@18@█@01@▒▒@09@"
Locate 18, 17
Print "@09@▒▒@01@▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒@07@"
Delay 0.01
Locate 4, 26
Print "@06@░▒▓@6E@ @06@▓▒░@05@"
Locate 5, 27
Print "@08@───────────────────────────────"
If i4471 = -1 Then
5589 For i4555 = 1 To i4557 Step 1
s4551 = Left(s4522, i4555)
Locate 4, i4549
Print "@NOPAUSE@@6E@"; s4551
UpdateScreen
Delay 0.01
Next
5716 Else
5722 Locate 4, 32
Print "@NOPAUSE@@6F@-=≡ @6E@UNREGISTERED @6F@≡=-"
End If
End If
End If
End If
Do
5738 Sub16051
s4477 = UCase(s4481)
Loop Until s4477 > ""
s65528_ = s4477
If (s65528_ = "P") = 0 Then GoTo 5872
If Exists(s4492) Then
Cls
Run s4492, ""
Else
5833 Delay 0.09
Print "@0E@"
Locate 22, 1
PageSysop
End If
5860 Loop
GoTo 14650
5872 If (s65528_ = "C") = 0 Then GoTo 6006
If i4471 = 0 Then
Sub15490
End If
5909 If Exists(s4488) Then
Join i4504
Cls
Run s4488, ""
Join i4506
Else
5959 Print "@0E@"
Locate 22, 1
Join i4504
Comment
Join i4506
End If
5994 Loop
GoTo 14650
6006 If (s65528_ = "T") = 0 Then GoTo 6101
If Exists(s4496) Then
Cls
Run s4496, ""
Else
6057 Delay 0.09
Locate 16, 23
Print "@NOPAUSE@@0E@ This option is @0F@NOT @0E@available! @0E@"
Delay 1
End If
6089 Loop
GoTo 14650
6101 If s65528_ = "R" Then
Delay 0.25
Sub16221
Delay 1
End
Else
6147 If s65528_ = "L" Then
Delay 0.25
If i4520 = 1 Then
Sub16849
Delay 0.52
Else
6207 If i4520 = 2 Then
Sub17477
Delay 0.59
Else
6242 If i4520 = 3 Then
Sub18105
Delay 0.64
Else
6277 Sub16849
Delay 0.52
End If
End If
End If
6291 If i4471 = 0 Then
Cls
Locate 3, 1
Print "@NOPAUSE@@07@ @08@┌───────────────────────────────────────────────────@0F@┐@07@"
Print "@07@ @08@│@0F@ @0C@ @0F@ │@07@"
Print "@07@ @08@└@0F@───────────────────────────────────────────────────┘@07@"
Delay 0.29
Locate 4, 20
Print "@0C@P"
Delay 0.24
Locate 4, 23
Print "@0C@l"
Delay 0.24
Locate 4, 26
Print "@0C@e"
Delay 0.24
Locate 4, 29
Print "@0C@a"
Delay 0.24
Locate 4, 32
Print "@0C@s"
Delay 0.24
Locate 4, 35
Print "@0C@e"
Delay 0.24
Locate 4, 41
Print "@0C@R"
Delay 0.24
Locate 4, 44
Print "@0C@E"
Delay 0.24
Locate 4, 47
Print "@0C@G"
Delay 0.24
Locate 4, 50
Print "@0C@I"
Delay 0.24
Locate 4, 53
Print "@0C@S"
Delay 0.24
Locate 4, 56
Print "@0C@T"
Delay 0.24
Locate 4, 59
Print "@0C@E"
Delay 0.24
Locate 4, 62
Print "@0C@R"
Delay 0.15
Locate 4, 41
Print "@0F@R"
Delay 0.03
Locate 4, 62
Print "@0F@R"
Delay 0.03
Locate 4, 44
Print "@0F@E"
Delay 0.03
Locate 4, 59
Print "@0F@E"
Delay 0.03
Locate 4, 47
Print "@0F@G"
Delay 0.03
Locate 4, 56
Print "@0F@T"
Delay 0.03
Locate 4, 50
Print "@0F@I"
Delay 0.03
Locate 4, 53
Print "@0F@S"
Delay 0
Locate 4, 41
Print "@06@R"
Delay 0.03
Locate 4, 62
Print "@06@R"
Delay 0.03
Locate 4, 44
Print "@06@E"
Delay 0.03
Locate 4, 59
Print "@06@E"
Delay 0.03
Locate 4, 47
Print "@06@G"
Delay 0.03
Locate 4, 56
Print "@06@T"
Delay 0.03
Locate 4, 50
Print "@06@I"
Delay 0.03
Locate 4, 53
Print "@06@S"
Delay 0.03
Locate 4, 41
Print "@06@R"
Delay 0.03
Locate 4, 62
Print "@06@R"
Delay 0.03
Locate 4, 44
Print "@06@E"
Delay 0.03
Locate 4, 59
Print "@06@E"
Delay 0.03
Locate 4, 47
Print "@06@G"
Delay 0.03
Locate 4, 56
Print "@06@T"
Locate 4, 50
Print "@06@I"
Locate 4, 53
Print "@06@S"
Locate 4, 41
Print "@0E@R"
Delay 0.03
Locate 4, 62
Print "@0E@R"
Delay 0.03
Locate 4, 44
Print "@0E@E"
Delay 0.03
Locate 4, 59
Print "@0E@E"
Delay 0.03
Locate 4, 47
Print "@0E@G"
Delay 0.03
Locate 4, 56
Print "@0E@T"
Delay 0.03
Locate 4, 50
Print "@0E@I"
Delay 0.03
Locate 4, 53
Print "@0E@S"
Delay 0.03
Locate 4, 41
Print "@0E@R"
Delay 0.03
Locate 4, 62
Print "@0E@R"
Delay 0.03
Locate 4, 44
Print "@0E@E"
Delay 0.03
Locate 4, 59
Print "@0E@E"
Delay 0.03
Locate 4, 47
Print "@0E@G"
Delay 0.03
Locate 4, 56
Print "@0E@T"
Locate 4, 50
Print "@0E@I"
Locate 4, 53
Print "@0E@S"
Locate 4, 41
Print "@05@R"
Delay 0.03
Locate 4, 62
Print "@05@R"
Delay 0.03
Locate 4, 44