How to make this CASE formula smaller?

Im having an issue getting my formula small enough.  Any ideas?

CASE( Phone__c, 
"Home Phone Package", 
CASE(Modem_Lease__c,
"Lease Modem",
CASE(Download_Speed__c, 
"",60, 
"1.5 Mbps",95, 
"3 Mbps",95,  
"7 Mbps",95,  
"12 Mbps",95, 
"20 Mbps",95,  
"40 Mbps",105, 
"60 Mbps",105, 
"80 Mbps",105, 
"100 Mbps",115, 
"120 Mbps",115, 
"140 Mbps",115, 
"200 Mbps",135, 
"500 Mbps",135, 
"1000 Mbps",135, 
0), 
"Purchase Modem", 
CASE(Download_Speed__c,
"",60,  
"1.5 Mbps",85, 
"3 Mbps",85,  
"7 Mbps",85,  
"12 Mbps",85, 
"20 Mbps",85,  
"40 Mbps",95, 
"60 Mbps",95, 
"80 Mbps",95, 
"100 Mbps",105, 
"120 Mbps",105, 
"140 Mbps",105, 
"200 Mbps",125, 
"500 Mbps",125, 
"1000 Mbps",125, 
0), 
"Use Own Modem",
CASE(Download_Speed__c, 
"",60, 
"1.5 Mbps",85, 
"3 Mbps",85,  
"7 Mbps",85,  
"12 Mbps",85, 
"20 Mbps",85,  
"40 Mbps",95, 
"60 Mbps",95, 
"80 Mbps",95, 
"100 Mbps",105, 
"120 Mbps",105, 
"140 Mbps",105, 
"200 Mbps",125, 
"500 Mbps",125, 
"1000 Mbps",125, 
0), 
"", 
CASE(Download_Speed__c,
"",60,  
"1.5 Mbps",85, 
"3 Mbps",85,  
"7 Mbps",85,  
"12 Mbps",85, 
"20 Mbps",85,  
"40 Mbps",95, 
"60 Mbps",95, 
"80 Mbps",95, 
"100 Mbps",105, 
"120 Mbps",105, 
"140 Mbps",105, 
"200 Mbps",125, 
"500 Mbps",125, 
"1000 Mbps",125,  
0), 
0),
"", 
CASE(Modem_Lease__c,
"Lease Modem",
CASE(Download_Speed__c, 
"1.5 Mbps",55, 
"3 Mbps",55,  
"7 Mbps",55,  
"12 Mbps",55, 
"20 Mbps",55,  
"40 Mbps",65, 
"60 Mbps",65, 
"80 Mbps",65, 
"100 Mbps",75, 
"120 Mbps",75, 
"140 Mbps",75, 
"200 Mbps",95, 
"500 Mbps",95, 
"1000 Mbps",95, 
0), 
"Purchase Modem", 
CASE(Download_Speed__c,
"1.5 Mbps",45, 
"3 Mbps",45,  
"7 Mbps",45,  
"12 Mbps",45, 
"20 Mbps",45,  
"40 Mbps",55, 
"60 Mbps",55, 
"80 Mbps",55, 
"100 Mbps",65, 
"120 Mbps",65, 
"140 Mbps",65, 
"200 Mbps",85, 
"500 Mbps",85, 
"1000 Mbps",85, 
0), 
"Use Own Modem",
CASE(Download_Speed__c,  
"1.5 Mbps",45, 
"3 Mbps",45,  
"7 Mbps",45,  
"12 Mbps",45, 
"20 Mbps",45,  
"40 Mbps",55, 
"60 Mbps",55, 
"80 Mbps",55, 
"100 Mbps",65, 
"120 Mbps",65, 
"140 Mbps",65, 
"200 Mbps",85, 
"500 Mbps",85, 
"1000 Mbps",85,  
0), 
"", 
CASE(Download_Speed__c,  
"1.5 Mbps",45, 
"3 Mbps",45,  
"7 Mbps",45,  
"12 Mbps",45, 
"20 Mbps",45,  
"40 Mbps",55, 
"60 Mbps",55, 
"80 Mbps",55, 
"100 Mbps",65, 
"120 Mbps",65, 
"140 Mbps",65, 
"200 Mbps",85, 
"500 Mbps",85, 
"1000 Mbps",85, 
0), 
0),
0)